right click sheet tabview codecopy/paste this. Be aware that it will erase
all others.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlColorIndexNone
Cells(3, Target.Column).Interior.ColorIndex = 36
End Sub

--
Don Guillett
SalesAid Software

wrote in message
oups.com...
I have searched and cannot find an answer. I am using Excel 2000 and
would like to create a function that will highlight a column heading in
row three if the current cell is in that particular column. Let's say I
have 10 columns. If I am at a cell in any row in column 2, then
highlight cell B2 else leave white. Is this possible via vba? How?