macro starten als ik cel verlaat

[otmar]

hoe kan ik er voor zorgen dat als ik een cel (in dit geval C2) verlaat dat dan op de achtergrond een macro wordt gestart?

ik probeer het met:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$c$2" Then
        MsgBox ("test")
    End If
End Sub

maar deze werkt niet.

 

[Roncancio]

Dan moet je Worksheet_SelectionChange gebruiken.

Dim sTGT As String
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$C$2" Then
        sTGT = "$C$2"
    ElseIf sTGT = "$C$2" Then
        MsgBox ("test")
    End If
End Sub

Met vriendelijke groet,


Roncancio

 

[otmar]

Dan moet je Worksheet_SelectionChange gebruiken.

Dim sTGT As String
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$C$2" Then
        sTGT = "$C$2"
    ElseIf sTGT = "$C$2" Then
        MsgBox ("test")
    End If
End Sub

Met vriendelijke groet,


Roncancio

bedankt voor de snelle reactie
er gaat iets fout: ook als ik cel c3 verlaat wordt deze macro gestart. en dat wil ik niet
alleen bij het verlaten van c2 moet de code voor het verlaten van c2 starten

 

[Roncancio]

bedankt voor de snelle reactie
er gaat iets fout: ook als ik cel c3 verlaat wordt deze macro gestart. en dat wil ik niet
alleen bij het verlaten van c2 moet de code voor het verlaten van c2 starten

In dat geval:

Dim sTGT As String
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If sTGT = "$C$2" Then
        MsgBox ("test")
    End If
    sTGT = Target.Address
End Sub

Met vriendelijke groet,


Roncancio

 

[otmar]

In dat geval:

Dim sTGT As String
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If sTGT = "$C$2" Then
        MsgBox ("test")
    End If
    sTGT = Target.Address
End Sub

Met vriendelijke groet,


Roncancio

perfect hier kan ik wat mee!