Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Prüfen, ob Formelwert geändert hat

Prüfen, ob Formelwert geändert hat
24.03.2015 09:24:39
Pepi
Hallo Herberforum
Private Sub Worksheet_Change(ByVal Target As Rang)
dim z%, s%
z = target.row
s = target.column
if z = 10 and s = 1 then 'mach dies und das
End Sub
Mit diesem Makro kann ich prüfen ob sich Zelle A10 verändert hat - jetzt habe ich aber in Zelle A10 eine Summenformel - wir kann ich in diesem Fall eine Veränderung feststellen.
Habe leider im WEB nichts gefunden
vielen Dank für Tipps
Pepi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Zwei Ansätze...
24.03.2015 09:55:18
Michael
Hallo Pepi,
hätte ich. Einmal müsste Folgendes funktionieren:
Public AlterWert As Variant
Private Sub Worksheet_Calculate()
If Not Range("A10").Value = AlterWert Then
MsgBox "A10 geändert"
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
AlterWert = Range("A10").Value
End Sub
Oder, ganz kurz, könnte auch
Private Sub Worksheet_Calculate()
If Not Range("A10").Value Then
MsgBox "A10 geändert"
End If
End Sub
funktionieren; ist aber die Frage, was sonst noch so in Deiner Mappe an Code läuft.
LG
Michael

Anzeige
AW: Zwei Ansätze...
24.03.2015 13:33:10
Pepi
Vielen Dank Michael - hab den Schnipsel schon eingebaut und funktioniert einwandfrei
lg
Pepi

Super, Danke für die Rückmeldung, owT
24.03.2015 14:17:51
Michael
.

311 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige