Excel Zeilen als separate .txt Dateien ausgeben

Liebe Administrator Community,

ich habe in diesem Forum bereits einen ähnlichen Beitrag zu folgendem Problem gefunden, jedoch ist dieser veraltet und passt nicht speziell auf meine Frage (den anschließenden Code habe ich diesem entnommen und nach bestem Gewissen angepasst). Ich habe eine Excel Tabelle mit mehreren Tausenden Zeilen der Spalte A, welche alle als einzelne .txt Dateien auf meinem Rechner landen sollen. Folglich ist der Inhalt der Zeile auch der Inhalt des Textdokumentes.

Sub ErstelleDateien()
Ziel = "C:\Dateiordner" #<- habe ich hier natürlich richtig benannt
Stellen = 5
Typ = ".txt"
AbZeile = 1
Spalte = "A"

Zeile = AbZeile
Nr = 1000001

Set fso = CreateObject("Scripting.FileSystemObject")
If Right(Ziel, 1) <> "\" Then Ziel = Ziel & "\"

Do While Cells(Zeile, Spalte).Value <> ""
fso.CreateTextFile(Ziel & Right(Nr, Stellen) & Typ).Write Cells(Zeile, Spalte).Value
Zeile = Zeile + 1
Nr = Nr + 1
Loop
End Sub

Nutze ich den vorangegebenen Code, so erhalte ich den Laufzeitfehler '5'. Handelt es sich um zu viele zu bearbeitende Zeilen? Versuche ich den Code durch F8 in Einzelschritten durchlaufen zu lassen, so ist bei dem dritten Dokument Schluss. Ich habe einen Test mit der gleichen Anzahl an Zeilen gemacht, wo der Inhalt der Zeilen lediglich aus ein paar Zeichen bestand, da ging es. Mache ich das jetzt mit den Zeilen (die mehrere Sätze enthalten), erscheint geschildertes Problem.

Über Hilfe würde ich mich freuen, vielen Dank im voraus!

Grüße 007007B

Content-Key: 1594470536

Url: https://administrator.de/contentid/1594470536

Ausgedruckt am: 22.01.2022 um 10:01 Uhr

Mitglied: NordicMike
NordicMike 07.12.2021 aktualisiert um 07:07:19 Uhr
Goto Top
Du schließt die Datei gar nicht mehr. Drittes Dokument klingt für mich wie drei Dateien, die du dann ständig offen hältst.

Mitglied: 007007B
007007B 07.12.2021 um 14:20:14 Uhr
Goto Top
Zitat von @NordicMike:

Du schließt die Datei gar nicht mehr. Drittes Dokument klingt für mich wie drei Dateien, die du dann ständig offen hältst.


Vielen Dank für deine Antwort! Wo genau soll das ergänzt werden? Wenn ich das versuche reinzuschreiben, wird mir ein Syntaxfehler entgegengebracht.
Mitglied: NordicMike
NordicMike 08.12.2021 um 06:57:48 Uhr
Goto Top
Das war ein Beispiel, das muss nicht ergänzt werden, so sollte dein Code aussehen.
Google einfach danach wie man eine geöffnete Datei wieder schließt.
Heiß diskutierte Beiträge
question
Welche Linux Distribution kommt ohne Schnick und ohne Schnack?StefanKittelVor 1 TagFrageLinux22 Kommentare

Hallo, ich möchte zwei neue Mini-PCs (Celeron, 2 x 1.7 GHz, 4 GB RAM, 64 GB Storage) mit Linux Desktop installieren. Darauf soll einzig Chrome ...

question
MFA mit Microsoft?cseVor 1 TagFrageWindows Userverwaltung6 Kommentare

Hi Leute, ich hoffe ihr könnt mir ein wenig helfen. Von unserer Gruppe (central IT im Ausland) verlange ich (im Zuge TISAX Audit) auf unseren ...

question
O365 Outlook + Teams sperren gelöst sraL91Vor 1 TagFrageMicrosoft Office17 Kommentare

Hallo Zusammen, wir haben in unserer Firma Office 365 ausgerollt und ich stehe nun vor folgendem Problem. Unsere Firma sind in 50 Standorte unterteilt und ...

general
Liste von URLs in wininet.dllFennek11Vor 1 TagAllgemeinInternet12 Kommentare

Hallo, die Frage ist zugleich enrsthaft und Satire: Windows enthält die Datei "c:\windows\system32\wininet.dll", die für viele Verbindungen ins Internet benötigt wird. Ein Blick in die ...

question
PC - Komplettsicherunggreenhorn1Vor 1 TagFrageBackup10 Kommentare

Hallo, welche Möglichkeit gibt es an Sicherungen, wo man das gesamte System Win10 sichern kann? Sodass ich mit einer Sicherung einen neuen PC 1 zu ...

question
2 Faktor Authentifizierung generell abschaltenratzekahl1Vor 1 TagFrageGoogle Android9 Kommentare

Hallo zusammen, ich habe eine Frage: Kann ich in Google die 2 Faktor Authentifizierzung generell abschalten? Wenn ich ein Gerät als vertrauenswürdig hinzugefügt habe, ja, ...

question
Gebrauchte SQL-Lizenz im Rechenzentrum möglich?karin1511Vor 1 TagFrageMicrosoft4 Kommentare

Moin aus Hamburg, vielleicht kann mir zufällig jemand helfen oder von seiner Erfahrung berichten. Ich habe vor 8 Jahren mehrere SQL-Server-Lizenzen gebraucht gekauft, welche damals ...

question
Netzwerk Grafisch darstellen?FireWorldVor 20 StundenFrageInternet7 Kommentare

Hallo, ich bin der Zeit auf der Suche nach einem Programm zur Grafischen Darstellung von inbound/outbound eines Servers in einem Rechenzentrum. Hat Jemand eine idee ...