Цитата:
Sub Макрос1()
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End Sub
|
Это зальет выделенные ячейки желтым цветом
Назначь макросу hotkey и наслаждайся.
Можно поступить наоборот
1 выделил ячейки
2 Сервис,макросы, начать запись
3 В диалоге назначил клавишу
4 Выполнил заливку (у тебя при этом записываются твои команды, не делай ни чего лишнего)
5 Останови запись