Udføre en noget i en VB-makro når en bestemt celle forlades

Hey Jensen !
Den nemmeste måde er, at chekke på eventen, når du forlader en celle, og så tjekke, om det er en celle, du er ude efter. :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$M$3" Then
MsgBox Target.Value
End If
End Sub

/Killer

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Static oldRange As Range
    If Not oldRange Is Nothing And Range("M3").FormulaR1C1 <> "" Then
        If oldRange.Address = "$M$3" Then
            sFilename = "Faktura" & Format(oldRange.Text, "000")
            ans = MsgBox("Save file as " & sFilename, vbOKCancel)
            If ans = vbOK Then
              ActiveWorkbook.SaveAs Filename:=sFilename
            Else
              Range("M13").FormulaR1C1 = ""
            End If
        End If
    End If
    Set oldRange = Target
End Sub

Glemte at lukke

ups - nææ