Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$r$6" Then
Call Makro1
End If
End Sub
Makro wird nich gestartet, sondern das Makro Fenster öffnet sich.
Was mache ich falsch?
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$r$6" Then
Call Makro1
End If
End Sub
If Not Intersect(target, Range("R6")) is nothing then
Call Makro1
end if
Gruß,Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$R$6" Then
Call Makro1
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
Gruß Werner