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

Вход

Регистрация

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

 

= Мир MS Excel/Цвет ячейки по значению RGB из других ячеек - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Цвет ячейки по значению RGB из других ячеек
Цвет ячейки по значению RGB из других ячеек
eifel Дата: Вторник, 21.03.2017, 13:22 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Помогите, пожалуйста, составить макрос, чтобы при открытии файла все ячейки из столбца А была раскрашены в цвета RGB, которые берутся из столбиков Е,F,G
Количество строк - 300-400. Если бы было десять, я бы ручками сделала и не стала бы никого беспокоить. Второй день бьюсь как муха о стекло, хелп.

.
К сообщению приложен файл: colorchart.xls (20.5 Kb)


Сообщение отредактировал eifel - Вторник, 21.03.2017, 15:32
 
Ответить
СообщениеПомогите, пожалуйста, составить макрос, чтобы при открытии файла все ячейки из столбца А была раскрашены в цвета RGB, которые берутся из столбиков Е,F,G
Количество строк - 300-400. Если бы было десять, я бы ручками сделала и не стала бы никого беспокоить. Второй день бьюсь как муха о стекло, хелп.

.

Автор - eifel
Дата добавления - 21.03.2017 в 13:22
китин Дата: Вторник, 21.03.2017, 13:45 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 7014
Репутация: 1073 ±
Замечаний: 0% ±

Excel 2007;2010;2016
красивая картинка. ответ тоже так же красиво нарисовать?


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщениекрасивая картинка. ответ тоже так же красиво нарисовать?

Автор - китин
Дата добавления - 21.03.2017 в 13:45
eifel Дата: Вторник, 21.03.2017, 15:36 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Нет, ответ желательно в файле для Excel 2013. Сорри, почему-то мой файл не загрузился сразу.
 
Ответить
СообщениеНет, ответ желательно в файле для Excel 2013. Сорри, почему-то мой файл не загрузился сразу.

Автор - eifel
Дата добавления - 21.03.2017 в 15:36
Manyasha Дата: Вторник, 21.03.2017, 15:53 | Сообщение № 4
Группа: Модераторы
Ранг: Старожил
Сообщений: 2198
Репутация: 898 ±
Замечаний: 0% ±

Excel 2010, 2016
eifel, здравствуйте, так пойдет?
[vba]
Код
Private Sub Workbook_Open()
    Dim lr&, i&
    With ThisWorkbook.Sheets(1)
        lr = .Cells(Rows.Count, 1).End(xlUp).Row
        For i = 1 To lr
            .Cells(i, 1).Interior.Color = RGB(.Cells(i, "e"), .Cells(i, "f"), .Cells(i, "g"))
        Next i
    End With
End Sub
[/vba]
К сообщению приложен файл: colorchart-1.xls (35.5 Kb)


ЯД: 410013299366744 WM: R193491431804
 
Ответить
Сообщениеeifel, здравствуйте, так пойдет?
[vba]
Код
Private Sub Workbook_Open()
    Dim lr&, i&
    With ThisWorkbook.Sheets(1)
        lr = .Cells(Rows.Count, 1).End(xlUp).Row
        For i = 1 To lr
            .Cells(i, 1).Interior.Color = RGB(.Cells(i, "e"), .Cells(i, "f"), .Cells(i, "g"))
        Next i
    End With
End Sub
[/vba]

Автор - Manyasha
Дата добавления - 21.03.2017 в 15:53
eifel Дата: Вторник, 21.03.2017, 17:46 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Manyasha,

Вы - волшебница! Спасибо большое!
 
Ответить
СообщениеManyasha,

Вы - волшебница! Спасибо большое!

Автор - eifel
Дата добавления - 21.03.2017 в 17:46
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Цвет ячейки по значению RGB из других ячеек
  • Страница 1 из 1
  • 1
Поиск:

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