Frag zu VBA Schleife
26.05.2013 22:05:02
astis
Ich habe einen VBA Code erstellt, der Daten aus einer IBM Konsole abfragt.
Grundlage sind hierfür Kundennummern, für jede Kundennummer soll das Makro ausgeführt werden.
Bisher habe ich das mit dieser Funktion erledigt,
strSource = InputBox("Agt Nummer eingeben vierstellig", "Auswertung Vc050")
If Trim(strSource) = "" Then Exit Sub
autECLSession.autECLPS.SetText "a119" & strSource, 5, 20
Das bringt mich nur bedingt weiter, da ich jede Nummer noch manuell in die InputBox schreiben muss. Wie kann ich die Liste den Kundennummern im Tabelle "Kunden" / Spalte "A" direkt auswählen damit es automatisch durchläuft?