Hello,
I have a sub procedure that uses a color as an argument (ie RGB(0, 0, 0)), and then colors the selected cells:
I am given a mismatch error. I know it's possible to store shadeColor As Integer and then use 123456 as a color, but I was hoping I could use RGB instead as it makes more sense.
Thanks
I have a sub procedure that uses a color as an argument (ie RGB(0, 0, 0)), and then colors the selected cells:
Code:
Sub Shade_Cell(shadeColor As String)
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = shadeColor
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End Sub
Thanks