Color cells with a button

[xThomi]

Hi

I am new to this and could not find a proper answer by searching.

I want to color the selected cells with a color. Instead of going to the fill drop down i want to pre define a color to a button. How can i do this?

For now i have this macro:

Sub Green()
'
' Green Macro
'
' Keyboard Shortcut: Ctrl+g
'
Range("A12:S12").Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 13434828
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End Sub

What i am struggling with is that i do not know the code for "highlighted cells" or "highlighted line"

Thomas

 

[hennahairgel]

Just delete that line. Then to use simply select the cells and press Ctrl G