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

Forumthread: Zellen markieren

Zellen markieren
gerhard
Hallo zusammen,
Bitte um VBA Hilfe
in meine Tabelle trage ich Messwerte in die Zellen:
B2, B7, B12, B17, B22, B27
G2, G7, G12, G17, G22, G27,
L2, L7, L12, L17, L22 und L27
ein!
Wie kann ich über eine Eingabeabfrage z.B Startwert 5 entspricht die Zelladresse B22 alle vorherigen Zellen wie B2, B7, B12 und B17 mit dem Text "Leer" beschriften?
Die Zelladresse L27 hat entsprechend den Startwert 18 (alle vorherigen mit "Leer" kennzeichnen" !!
Vielen Dank für Eure Hilfe
Gruß gerhard
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Zellen markieren
01.09.2009 15:53:08
Peter
Hallo Gerhard,
meinst Du so?
Public Sub leerschreiben()
Dim start As Integer
start = InputBox("Bitte Startwert eingeben", "Startwert")
For spalte = 2 To 12 Step 5
For zeile = 2 To 27 Step 5
Cells(zeile, spalte) = "LEER"
zähler = zähler + 1
If zähler = start - 1 Then Exit Sub
Next
Next
End Sub

Anzeige
AW: Zellen markieren
02.09.2009 08:09:15
gerhard
Hallo Peter
Super genauso wollte ich es...
Vielen Dank
Gerhard

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige