Quote Originally Posted by salman8200 View Post
How About Only Select the Rows?????Plz tell me, I dont know much about VBA. thanks
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Cells.Interior.ColorIndex = xlColorIndexNone
  Union(Target.EntireRow, Target.EntireColumn).Interior.ColorIndex = 6
End Sub
Give this a try...
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Cells.Interior.ColorIndex = xlColorIndexNone
  Target.EntireRow.Interior.ColorIndex = 6
End Sub