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

Zelle in einem Bereich überwachen

Forumthread: Zelle in einem Bereich überwachen

Zelle in einem Bereich überwachen
19.09.2005 09:47:23
Jürg
Hallo Leute,
ich möchte eine Meldung anzeigen, wenn eine Zelle im Bereich A14 bis A140 geändert wird? Das folgende Macro bringt einen Fehler.
Tanks for help

Private Sub Worksheet_Change(ByVal Target As Range)
Set bereich = Sheets("Tabelle1").Range("a14:a140")
If Range(bereich).Address = Target.Address Then
MsgBox "Bei Änderungen auch das nächste Jahr berücksichtigen!", vbOKOnly
End If
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle in einem Bereich überwachen
19.09.2005 10:00:31
WernerB.
Hallo Jürg,
wie gefällt Dir das?

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("A14:A140"), Target) Is Nothing Then Exit Sub
MsgBox "Bei Änderungen auch das nächste Jahr berücksichtigen!", vbOKOnly
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
Anzeige
AW: Zelle in einem Bereich überwachen
19.09.2005 10:09:02
Jürg
Danke viel mal,
es funktioniert super.
:-) Jürg
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige