Solved: Run macro after leaving a cell

[Gunilla]

:help Problem: I want a macro to run when I leave a cell. The only thing I've found is EXIT and LostFocus, but it looks like those can only be used on forms. Do you have any suggestions.

[Aflatoon]

Use the Worksheet_SelectionChange event. You will need to store a reference to the previous selection in a variable so that you can check it in the code, then update the variable to the current selection.
Alternatively, if you wanted to run the code when that cell is changed, rather than simply left, you can use the Worksheet_Change event.

[Gunilla]

Thank you
I am not that familiar with targets and such. Can you give me an example. I only want the macro to run when I leave cell "A2" not to specify target cell. I don't want it to run if I change something in another cell. My other option is to link the macro to a button or something.:friends:

[GTO]

Not tested. You'd probably want to add checking what cell is active upon the sheet becoming active after the workbook opens.

Option Explicit

Dim OldAddress As String
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If OldAddress = Range("A2").Address Then
MyMacro
End If
OldAddress = ActiveCell.Address
End Sub

Private Sub MyMacro()
MsgBox " I just left A2", 0, ""
End Sub

[mikerickson]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static RunMe As Boolean

If RunMe Then
Rem do something
Beep
End If

RunMe = (Target.Address = "$A$2")
End Sub

[Aflatoon]

Just to be absolutely sure: you would like the code to run if you select A2, then select A3 without changing A2?

[Gunilla]

Absolutly perfect!!
Thank you
:beerchug: