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

Forumthread: zahlenformat in for schleife

zahlenformat in for schleife
27.07.2005 21:12:26
Bernd
halllo,
ich habe folgendes problem:
per for-schleife importiere ich aus verschiedenen textdateien daten.
die textdateien heissen vb000001.txt, vb000002.txt usw. bei der datei vb000010.txt habe ich nur noch 4 führende nullen, nicht mehr 5.
die for schleife ist so:
for i = 1 to 10
workbook open "pfad\vb00000" & i & ".txt" dadada
nach 9 mal durchlaufen bricht der code ab weil die datei vb0000010.txt nicht existiert. er sollte vb000010.txt importieren.
kann mir da einer helfen?
vilen dank
gruss bernd
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zahlenformat in for schleife
27.07.2005 21:21:42
Leo
Hi,
teil auf:
for i = 1 to 9
workbook open "pfad\vb00000" & i & ".txt"
next
for i = 10 to 99
workbook open "pfad\vb0000" & i & ".txt"
next
mfg Leo
AW: zahlenformat in for schleife
27.07.2005 21:22:29
Ramses
Hallo Bernd
vielleicht so
Sub test()
Dim i
Dim preString As String
Dim myPfad As String
preString = "00000"
myPfad = "C:\DeinOrdner\"
For i = 1 To 10000
    Select Case i
        Case Is > 9999
            preString = "0"
        Case Is > 999
            preString = "00"
        Case Is > 99
            preString = "000"
        Case Is > 9
            preString = "0000"
    End Select
    Workbooks.Open myPfad & "\vb" & preString & i & ".txt"
    'Dein Code
Next i
End Sub

Gruss Rainer
Anzeige
danke euch beiden :-)
27.07.2005 21:33:33
Bernd
AW: zahlenformat in for schleife
27.07.2005 21:39:17
Luschi
Hallo Bernd,
hier die kürzeste Lösung:
workbook open "pfad\vb" & Right("00000" & i, 6) & ".txt"
Gruß von Luschi
aus klein-Paris
genial, danke luschi
27.07.2005 21:45:03
Bernd
Anzeige
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige