Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
604to608
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
604to608
604to608
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Target und Range

Target und Range
27.04.2005 15:52:02
Markus
Hallo Excelsier,
ich möchte bei Änderung in den Zellen A1:A20 ein Makro ausführen lassen. Die Prozedur unten funktioniert, wenn das Range aus einer Zelle besteht, aber nicht wenn mehrer Zellen das Range bilden. Ich habe für den Bereich auch bereits einen Namen vergeben, mit dem es auch nicht geht. Kann mir jemand sagen was da falsch ist?
Schn mal Danke Gruß Markus

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("A1:A20").Address Then
MsgBox "Hier wird gearbeitet!"
End If
End Sub

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

Betreff
Datum
Anwender
Anzeige
AW: Target und Range
27.04.2005 15:58:01
Dr.
Hi, das funzt so:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A20")) Is Nothing Then MsgBox "Hier wird gearbeitet!"
End Sub

AW: Target und Range
27.04.2005 16:00:59
UweD
Hallo
so gehts:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B1")) Is Nothing Then
MsgBox "Hier wird gearbeitet!"
End If
End Sub

Gruß UweD
AW: Target und Range
27.04.2005 16:14:22
Markus
Hallo,
Dank zusammen.
Gruß Markus

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige