Microsoft Excel

Herbers Excel/VBA-Archiv

EXE-Datei in VB ausführen

Betrifft: EXE-Datei in VB ausführen von: Dirk
Geschrieben am: 07.09.2004 10:50:01

Hallo,
ich habe mit vielen Tipps und Hilfen dieser HP mein Programm soweit am Laufen.
Dabei führe ich eine exe-Datei aus, die eine zuvor gespeicherte CSV-Datei benutzt und nach der Ausführung eine neue CSV-Datei erstellt.

Application.Wait (Now + TimeValue("0:00:01"))

Application.DisplayAlerts = False
ChDir "H:\Verchromungsdatenbank\Daten"
ActiveWorkbook.SaveAs Filename:="C:\Test\daten\liste.csv", _
FileFormat:=xlCSVMSDOS, CreateBackup:=False
Application.DisplayAlerts = True

Application.Wait (Now + TimeValue("0:00:01"))

Dim strDeinProgramm As String
strDeinProgramm = "C:\Test\Programm.exe"
ChDir "C:\Test"
Call Shell(Environ("COMSPEC") & " /C " & strDeinProgramm, vbHide)

Application.Wait (Now + TimeValue("0:00:01"))

Leider beinhaltet die von der exe-Datei erstellte csv-Datei nur gähnende Leere.
Wenn ich danach die exe-Datei von Hand aus dem Explorer starte und auch die zuvor erstellte liste.csv benutze, dann erstellt das Programm eine csv-Datei mit gewünschtem Inhalt !!!
Das klappt also nur nicht, wenn ich mein VB-Programm ausführe.
Hab ich nen Fehler im Quelltext ?

Ich hab mittlerweile viel auspobiert, komme aber als Anfänger nicht mehr weiter.
Z.B. wurde die exe-Datei ohne die Zeile "ChDir "C:\Test"" nicht ausgeführt, weil Daten, die das exe-Programm braucht nicht gefunden wurde.
Liegt vielleicht da noch mein Fehler ?

Über Eure Hilfe würde ich mich freuen.

Vielen Dank und Grüße von der Mosel
Dirk

  


Betrifft: Zusatz: Datei wird nicht richtig ausgeführt von: Dirk
Geschrieben am: 07.09.2004 11:48:06

-


  


Betrifft: AW: Zusatz: Datei wird nicht richtig ausgeführt von: Dirk
Geschrieben am: 09.09.2004 08:36:06

hat sich erledigt.
Danke für Eure Hilfe.
Gruß
Dirk