Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
420to424
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
420to424
420to424
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
For Schleife mit Bedingung
Robert
Liebe Excel User,
ich habe eine Excel-Tabelle mit ca. 3000 Kunden.
(Kundennummer in A und Abverkaufsdaten in den Spalten dahinter).
Auf einem anderen Auswertblatt habe ich ein Abfrageformular erstellt,
das bei der Eingabe der Kundennummer mit den aktuellen Abverkaufsdaten
gefüllt wird.
Mein Wunsch: Ich habe eine kleine "For-Schleife" geschrieben, um die
Daten auszudrucken.
Aber leider sind die Kundennummern (4-stellig) nicht vollzählig, das heißt es
sind Lücken drin.
Wenn ich also die Kunden 1100 bis 1200 ausfdrucken will, gibt es auch Nummern,
die nicht belegt sind.
Wie kann ich per VBA überprüfen, ob die Nummer vorhanden ist und nur dann
den Ausdruck "anschieben" bzw. die Nummer überspringen, die in der Kundentabelle nicht enthalten sind.
Ich freue mich auf Eure Lösungen.
Robert Ka

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

Betreff
Benutzer
Anzeige
AW: For Schleife mit Bedingung
Ramses
Hallo
zeig mal das Druckmakro.
Dann muss man den Rest nicht neu erfinden.
Gruss Rainer
AW: For Schleife mit Bedingung
02.05.2004 19:11:29
Robert
Hallo Rainer,
anbei das Makro.

Sub Kunden_ausdrucken()
Dim von As Integer
Dim bis As Integer
von = Application.InputBox("Kundennummer: Von")
bis = Application.InputBox("Kundennummer: Bis")
For i = von To bis
Range("C2").Value = i
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Next i
End Sub

Robert
Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige