Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
1364to1368
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

Textdateien in eine Textdatei umwandeln

Textdateien in eine Textdatei umwandeln
10.06.2014 11:00:06
Martin
Sehr geehrte Damen und Herren,
ich möchte eine beliebige Anzahl von Textdateien über VBA in eine Textdatei kopieren - dies geht über DOS problemlos, aber ich bekomme den Befehl über VBA nicht sauber gestartet.
Ich probiere folgenden Befehl auszuführen
Dim Filename As String
Dim retVal As Variant
retVal = Shell("cmd.exe" & CopyZeichenkette, vbNormalFocus)
Die Variable CopyZeichenkette lautet:
Copy /Y C:\Users\S8884\Desktop\BUE_0009751_AMIS.txt + C:\Users\S8884\Desktop\BUE_0009975_AMIS.txt Gesamtganzneu.txt
Fehlermeldung Datei nicht gefunden - wenn ich es manuell über DOS-Fenster ausführe - dann klappt es.
Kann mir jemand helfen - danke
Martin

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

Betreff
Datum
Anwender
Anzeige
AW: Textdateien in eine Textdatei umwandeln
10.06.2014 11:32:19
Rudi
Hallo,
Muster:
Sub aaa()
Dim x$
Open "c:\test\gesamt.txt" For Append As #1
Open "c:\test\test00.txt" For Input As #2
Do While Not EOF(2)
Line Input #2, x
Print #1, x
Loop
Close #2
Open "c:\test\test01.txt" For Input As #2
Do While Not EOF(2)
Line Input #2, x
Print #1, x
Loop
Close #2
Close #1
End Sub

Gruß
Rudi

AW: Textdateien in eine Textdatei umwandeln
10.06.2014 22:37:26
Martin
Danke hat funktioniert!
Anzeige

377 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige