Hi
as this is an event procedure on worksheet level you have to insert
this procedure in every worksheet module.
You may take a look at the following add-in:
http://www.cpearson.com/excel/RowLiner.htm

Just a note: Using this add-in will disable the Undo functionality of
your workbook.


--
Regards
Frank Kabel
Frankfurt, Germany


DAA wrote:
The macro below changes the cell pointer color. However,
it only works on A sheet in a workbook. I need the macro
to work in ALL the sheets in the workbook without pasting
the macro on all worksheet modules.

Public OldRng As Range

Private Sub Worksheet_SelectionChange(ByVal Target As
Range)
If Not OldRng Is Nothing Then
OldRng.Interior.ColorIndex = xlNone
End If
Target.Interior.ColorIndex = 6
Set OldRng = Target
End Sub

Please edit MACRO to work on all sheets. Thanks