Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Отобржение заливки ячейки по формату с другого Листа - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Отобржение заливки ячейки по формату с другого Листа (Формулы/Formulas)
Отобржение заливки ячейки по формату с другого Листа
Gold_Barsik Дата: Пятница, 21.06.2019, 16:41 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
Как по значению в ячейке определить заливку ячейки с таким же значением на Листе2 и залить её ячейку на Листе1
 
Ответить
СообщениеКак по значению в ячейке определить заливку ячейки с таким же значением на Листе2 и залить её ячейку на Листе1
Автор - Gold_Barsik
Дата добавления - 21.06.2019 в 16:41
Nic70y Дата: Пятница, 21.06.2019, 16:47 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 9137
Репутация: 2416 ±
Замечаний: 0% ±

Excel 2010
Цитата Gold_Barsik, 21.06.2019 в 16:41, в сообщении № 1 ()
по значению в ячейке определить заливку
ну наверное есть некие соответствия,
по ним и заливать,
а может и нет вовсе...

ЮMoney 41001841029809
 
Ответить
Сообщение
Цитата Gold_Barsik, 21.06.2019 в 16:41, в сообщении № 1 ()
по значению в ячейке определить заливку
ну наверное есть некие соответствия,
по ним и заливать,
а может и нет вовсе...
Автор - Nic70y
Дата добавления - 21.06.2019 в 16:47
Gold_Barsik Дата: Пятница, 21.06.2019, 17:19 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
в ячейке P23 имеем показатель и что бы понять когда придёт пипец она должна окраситься в цвет той ячейки столбца в которой есть такое же значение на Листе2.
 
Ответить
Сообщениев ячейке P23 имеем показатель и что бы понять когда придёт пипец она должна окраситься в цвет той ячейки столбца в которой есть такое же значение на Листе2.
Автор - Gold_Barsik
Дата добавления - 21.06.2019 в 17:19
Nic70y Дата: Пятница, 21.06.2019, 17:22 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 9137
Репутация: 2416 ±
Замечаний: 0% ±

Excel 2010
ну можно конечно, файл бы позырить,
[p.s.]я уже сёдня зырыть не буду, с работы еду домой, а там пивас,
но другие посмотрят (наверное)[/p.s.]

ЮMoney 41001841029809
 
Ответить
Сообщениену можно конечно, файл бы позырить,
[p.s.]я уже сёдня зырыть не буду, с работы еду домой, а там пивас,
но другие посмотрят (наверное)[/p.s.]
Автор - Nic70y
Дата добавления - 21.06.2019 в 17:22
Gold_Barsik Дата: Пятница, 21.06.2019, 17:33 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
Так какие проблемы?
только таблица цветов третий лист
К сообщению приложен файл: 30.xls (81.5 Kb)


Сообщение отредактировал Gold_Barsik - Пятница, 21.06.2019, 17:34
 
Ответить
СообщениеТак какие проблемы?
только таблица цветов третий лист
Автор - Gold_Barsik
Дата добавления - 21.06.2019 в 17:33
Gold_Barsik Дата: Пятница, 21.06.2019, 17:38 | Сообщение № 6
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
на странице Сахар ячейка P23 имеет данные 3,9% что соответствует ячейке B43 на листе гемоглобин фиолетового цвета. Нужно ячейку P23 окрасить в фиолетовый цвет. И всё.
 
Ответить
Сообщениена странице Сахар ячейка P23 имеет данные 3,9% что соответствует ячейке B43 на листе гемоглобин фиолетового цвета. Нужно ячейку P23 окрасить в фиолетовый цвет. И всё.
Автор - Gold_Barsik
Дата добавления - 21.06.2019 в 17:38
Gold_Barsik Дата: Пятница, 21.06.2019, 17:40 | Сообщение № 7
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
Nic70y, А на работе времени не хватило пиваса задавить?
Кто берёт работу на дом, значить на работе не дорабатывает.


Сообщение отредактировал Gold_Barsik - Пятница, 21.06.2019, 17:41
 
Ответить
СообщениеNic70y, А на работе времени не хватило пиваса задавить?
Кто берёт работу на дом, значить на работе не дорабатывает.
Автор - Gold_Barsik
Дата добавления - 21.06.2019 в 17:40
Nic70y Дата: Суббота, 22.06.2019, 08:29 | Сообщение № 8
Группа: Друзья
Ранг: Экселист
Сообщений: 9137
Репутация: 2416 ±
Замечаний: 0% ±

Excel 2010
Цитата Gold_Barsik, 21.06.2019 в 17:40, в сообщении № 7 ()
А на работе времени не хватило
ну как бы это не прилично (зачем людей на зависть провоцировать)
[vba]
Код
Private Sub Worksheet_Calculate()
    u = Application.Match(Range("p23"), Sheets("гемоглобин").Range("b:b"), 1)
    v = Sheets("гемоглобин").Range("b" & u).Interior.Color
    Range("p23").Interior.Color = v
End Sub
[/vba]
К сообщению приложен файл: 30-1-.xls (95.0 Kb)

ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Суббота, 22.06.2019, 08:30
 
Ответить
Сообщение
Цитата Gold_Barsik, 21.06.2019 в 17:40, в сообщении № 7 ()
А на работе времени не хватило
ну как бы это не прилично (зачем людей на зависть провоцировать)
[vba]
Код
Private Sub Worksheet_Calculate()
    u = Application.Match(Range("p23"), Sheets("гемоглобин").Range("b:b"), 1)
    v = Sheets("гемоглобин").Range("b" & u).Interior.Color
    Range("p23").Interior.Color = v
End Sub
[/vba]
Автор - Nic70y
Дата добавления - 22.06.2019 в 08:29
Gold_Barsik Дата: Суббота, 22.06.2019, 10:39 | Сообщение № 9
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
yes Спасибо.
 
Ответить
Сообщениеyes Спасибо.
Автор - Gold_Barsik
Дата добавления - 22.06.2019 в 10:39
krosav4ig Дата: Суббота, 22.06.2019, 15:43 | Сообщение № 10
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
А еще можно UDF дя этого использовать <_<

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеА еще можно UDF дя этого использовать <_<
Автор - krosav4ig
Дата добавления - 22.06.2019 в 15:43
Gold_Barsik Дата: Суббота, 22.06.2019, 23:59 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
;) %) krosav4ig, Только вчера понял кто такой макрорекордер, а сегодня Вы предлагаете UDFa. Не знаю такого.
 
Ответить
Сообщение;) %) krosav4ig, Только вчера понял кто такой макрорекордер, а сегодня Вы предлагаете UDFa. Не знаю такого.
Автор - Gold_Barsik
Дата добавления - 22.06.2019 в 23:59
krosav4ig Дата: Понедельник, 24.06.2019, 17:15 | Сообщение № 12
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Gold_Barsik, ну дык, макрорекодером записали, немного дописали, поскакали вокруг с шаманским бубном - и UDF готова
в Module1[vba]
Код
Option Explicit
Dim dic As Object
Function HbA1c(v As Variant, ByRef r As Range) As Variant
    Dim s$
    Application.Volatile False
    s = Application.Caller.Address(, , , 1)
    HbA1c = v
    If dic Is Nothing Then Set dic = CreateObject("scripting.dictionary")
    If dic(s) <> v Then
        dic(s) = v
        On Error Resume Next
        Evaluate "Module1.xx(" & s & "," & r.Cells(Application.Match(v, r.Value)).Interior.Color & ")"
    End If
End Function
Sub xx(ByRef r As Range, c&)
    r.Interior.Color = c
End Sub
[/vba]В ячейке листа
Код
=HbA1c(ВЫБОР(ОКРУГЛ(--ПСТР(N23;4;2)/7;)+1;P11;P9;P7)/1,307086614;гемоглобин!B4:B143)
К сообщению приложен файл: 30.xls.xz (23.6 Kb)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Понедельник, 24.06.2019, 17:16
 
Ответить
СообщениеGold_Barsik, ну дык, макрорекодером записали, немного дописали, поскакали вокруг с шаманским бубном - и UDF готова
в Module1[vba]
Код
Option Explicit
Dim dic As Object
Function HbA1c(v As Variant, ByRef r As Range) As Variant
    Dim s$
    Application.Volatile False
    s = Application.Caller.Address(, , , 1)
    HbA1c = v
    If dic Is Nothing Then Set dic = CreateObject("scripting.dictionary")
    If dic(s) <> v Then
        dic(s) = v
        On Error Resume Next
        Evaluate "Module1.xx(" & s & "," & r.Cells(Application.Match(v, r.Value)).Interior.Color & ")"
    End If
End Function
Sub xx(ByRef r As Range, c&)
    r.Interior.Color = c
End Sub
[/vba]В ячейке листа
Код
=HbA1c(ВЫБОР(ОКРУГЛ(--ПСТР(N23;4;2)/7;)+1;P11;P9;P7)/1,307086614;гемоглобин!B4:B143)
Автор - krosav4ig
Дата добавления - 24.06.2019 в 17:15
Gold_Barsik Дата: Вторник, 25.06.2019, 11:33 | Сообщение № 13
Группа: Проверенные
Ранг: Обитатель
Сообщений: 459
Репутация: 6 ±
Замечаний: 0% ±

2003
krosav4ig, Большое спасибо! Теперь буду знать. Осталось купить шаманский бубен.
 
Ответить
Сообщениеkrosav4ig, Большое спасибо! Теперь буду знать. Осталось купить шаманский бубен.
Автор - Gold_Barsik
Дата добавления - 25.06.2019 в 11:33
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Отобржение заливки ячейки по формату с другого Листа (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!