Makro starten durch Zelländerung
24.04.2006 13:35:50
Stefan
ich habe mir ein Formular erstellt (ohne Userform),
indem 10 Textfeldern enthalten sind. Es müssen mind. 6 Textfelder ausgefüllt werden. Jetzt habe ich jedes Feld mit einer Zelle verlinkt, die dann eine 1 enthält, wenn das jeweilige Textfeld beschrieben wird.
Zelle R19 enthält eine Formel zur Summenbildung und soll überwacht werden.
Wenn R19 = 6 ist, soll ein Makro gestartet werden (bekomme ich nicht hin).
Ich habe jetzt diesen Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$R$19" Then
Call makro
Else: Exit Sub
End If
End Sub
Könnt Ihr mir bitte dabei helfen ?
Es funktioniert, solange ich R19 per Hand geändert wird.
Bei Änderung durch die Formel tut sich gar nichts.
Danke vorab für Eure Mühe.
Gruß Stefan