Get the Color Index of a cell, , eg =getcolor(A1)
Function GetColor(cell As Range) As Long
GetColor = cell.Interior.ColorIndex
End Function
© Copyright
andrewsexceltips.net
All Rights Reserved.