LinkBack URL
About LinkBacks
You probably just need this:
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.EnableEvents = False Range("A1").Value = ActiveCell.Address Application.EnableEvents = True End Sub
You probably just need this:
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.EnableEvents = False Range("A1").Value = ActiveCell.Address Application.EnableEvents = True End Sub
Trevor Shuttleworth - Retired Excel/VBA Consultant
I dream of a better world where chickens can cross the road without having their motives questioned
'Being unapologetic means never having to say you're sorry' John Cooper Clarke
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
Register To Reply
Bookmarks