Automatic Highlighting as you move down the spreadsheet

R

rition

Hello

I have a spread sheet with 100 names down the lefthand side in column
one.

I enter details all the way along the rows and I would like the name
to change to bold when I am in any cell in the relevant row. (i.e. If
I am in E6 I would like the name in E1 to be in bold)

Is this possible?

If so please can you tell me how to do it, I have seen it on a
commercial programme which seems to be based around Excel.

TIA
 
D

dolivastro

Excel already has something like this built in. When you are in any
cell, the row and column heading are highlighted. Is that not useful
enough?

Dom
 
O

Otto Moehrbach

The following macro will do what you want. Note that this macro is a sheet
event macro and must be placed in the sheet module of the pertinent sheet.
To do that, right-click on the sheet tab, select View Code, and paste this
macro into that module, "X" out of the module to return to your sheet. HTH
Otto
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
If Target.Rows.Count > 1 Then Exit Sub
Range("A:A").Font.Bold = False
Cells(Target.Row, 1).Font.Bold = True
Application.ScreenUpdating = True
End Sub
 
Top