A Boolean expression
try:
Private Sub Worksheet_Change(ByVal Target As Range)
Target.Interior.ColorIndex = IIf(Target = "A", 6, xlNone)
End Sub
If this is not the expected soluntion please post more informations
The user will select the cells of choice and run a macro with a short cut key.
So target does not work nor change event'
Howard
|