Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1316to1320
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
Inhaltsverzeichnis

Loop Problem

Loop Problem
10.06.2013 09:14:40
lesshuhn
hallo zusammen,
ich habe einmal ein kleines problem.
in möchte den nachstehenden code nutzen um eine zweite seite zu drucken.
leider kommt dann die fehlermeldung "LOOP ohne DO".
Tja und nun die Frage, warum ist das so.
Schon jetzt danke für eure Hilfe
Sub Switchgear_BeiKlick()
Dim n As Integer
n = 3
Dim n_str As String
Dim pos_cable As String
Dim schreib_datum As Boolean
Application.ScreenUpdating = False
Do Until (n = 300)
n_str = n
schreib_datum = False
If Range("e" & n_str)  "" And Range("g" & n_str)  "" And Range("b" & n_str) = ""  _
And Range("m" & n_str) 

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Loop Problem
10.06.2013 09:17:14
Hajo_Zi
die Meldung kommt da ein End if vor Loop fehlt.
Gruß Hajo

AW: Loop Problem
10.06.2013 09:38:09
lesshuhn
Dank dir,
es klappt einwandfrei.
Gruß Hartmut

noch ein Fehler, Textvergleich
10.06.2013 09:31:09
Rudi
Hallo,
du vergleichst eine Zahl mit einem Text.
And Range("m" & n_str) 

"1234" ist auch kleiner "999".
Vermutlich eher
And Range("m" & n_str) 
Gruß
Rudi

AW: noch ein Fehler, Textvergleich
10.06.2013 09:40:22
lesshuhn
Hi Rudi,
die "999" muss genauso sein ansonsten macht er keinen ausdruck. die lösung von hajo klappt einwandfrei.
Trotzdem auch dir ein Danke für deine Hilfe.
Bis demnächst wenn es wieder heißt
"Ich brauche ein Problem" :-)
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige