Registriert seit: 01.03.2023
Version(en): 365
Guten Abend,
ich habe folgende Herausforderung.
Ich möchte in einer Tabelle einen Schalter, der eine Batch-datei mit 3 Parametern aufruft.
Die Parameter sollen hierbei aus 3 Zellen auf dem Tabellenblatt gelesen werden.
Kann mir hier jemand den Code als Beispiel zeigen?
Vielen Dank im voraus
Registriert seit: 11.03.2015
Version(en): mittlerweile meistens 2019
warum will eigentlich jeder eine Batch-Datei starten, wenn man doch in VBA alles das was da drin steht idR z. B. mit Shell auch machen könnte ...
Gruß
Michael
Registriert seit: 01.03.2023
Version(en): 365
Gute Frage.
Ich komme noch aus der Batch-Zeit. Und in dem Fall bekomme ich soweit alles mit Batch-dateien geregelt. Aber VBA ist für mich Neuland. Daher möchte ich für meinen derzeitigen Bedarf nicht erst alles über VBA erlernen. Aber man lernt ja bekanntlich nie aus.
Gruß
Jürgen
Registriert seit: 11.03.2015
Version(en): mittlerweile meistens 2019
Dann zeig doch mal bitte, was in der Batch-Datei steht. Vielleicht kriegen wir da was in VBA hin.
Gruß
Michael
Registriert seit: 17.04.2014
Version(en): MS Office 365(32)
01.03.2023, 23:05
(Dieser Beitrag wurde zuletzt bearbeitet: 01.03.2023, 23:10 von Kuwer.)
Hallo Jürgen,
Michael sprach ja schon den VBA-Befehl "shell" an. Ein Batchaufruf damit sieht dann so aus:
Code:
Sub aaa()
Dim strPfad As String
strPfad = "C:\Users\kuwer\Documents\Excel\Foren\CEF\Test"
Shell "cmd /c " & strPfad & "\batch1.cmd " & Range("A1").Value & " " & Range("A2").Value & " " & Range("A3").Value
End Sub
Gruß Uwe
PS: Allerdings musste ich den Exploit-Schutz meines Antivirenprogramms deaktivieren, weil der diese Aktion sonst kassiert.
Registriert seit: 01.03.2023
Version(en): 365
Guten Morgen,
vielen Dank für die Antworten.
@Uwe
Werde ich heute Morgen mal umsetzen und probieren. Sieht für mich gut aus.
Da ich mehrere Batch-Dateien auf diese weise ausführen möchte kann ich das dann auch entsprechen übertragen.
Gruß
Jürgen
Registriert seit: 01.03.2023
Version(en): 365
Danke Uwe hat gepasst. Macht genau das was es soll!
Vielen Dank.
Gruß
Jürgen