Schleifenerstellung

Forumthread: Schleifenerstellung

Schleifenerstellung

03.01.2026 13:42:05

Werner

Hallo JoWE und BoskoBiati!

Eure Vorschläge gefallen mir sehr gut!
Je mehr ich darüber nachdenke, finde ich sie optimal.

Ich werde den Vorschlag von JoWE umsetzen.

Schönen Dank für Eure Bemühungen.
Habt mir sehr geholfen.

Schöne Grüße Werner

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Schleifenerstellung

03.01.2026 13:58:05

JoWE

AW: Schleifenerstellung

03.01.2026 13:58:05

JoWE

Du hattest ausdrücklich nach einer Schleifen-Lösung gefragt.
Hier eine eine weitere Lösung:

Option Explicit

Sub schleife()

  Dim ze As Long

  For ze = 1 To 19

    If ze > 8 Then Cells(ze, 1) = ze 'hier wird die Zeile 8 einfach übersprungen

  Next

End Sub

Gruß
Jochen

Forumthread: Schleifenerstellung

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread