Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender Navigationstipps
Inhaltsverzeichnis

Schleife bei Worksheet_Change

Schleife bei Worksheet_Change
20.02.2008 13:18:27
Luftibus
Hallo Forum
ändere ich den Wert inZelle D4, wird mit unten stehendem Code in der Zelle E4 der Text "Hier neu auswählen" ausgegeben.
Wer kann mir sagen, wie die Schleife aussehen muss, wenn ich den gleichen Mechanismus in den Zellen D4:E18 anwenden möchte (Bsp. Änderung in D7, Textausgabe in E7 / Änderung in D12, Textausgabe in E12 / etc.)?

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$D$4" Then
Range("$E$4").FormulaR1C1 = "Hier neu auswählen!"
End If
End Sub


Herzlichen Dank für eure Unterstützung!
Gruss Luftibus

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

Betreff
Datum
Anwender
Anzeige
AW: Schleife bei Worksheet_Change
20.02.2008 13:22:36
Beverly
Hi,

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("D4:D18")) Is Nothing Then
Target.Offset(0, 1) = "Hier neu auswählen!"
End If
End Sub




Genial - Herzlichen Dank !!! (owT)
20.02.2008 13:31:00
Luftibus
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige