Batch-Datei per VBA aufrufen?

[Käpt'n Blaubär]

Hallo Julia,

Sicher, aber ich muss mit Variablen arbeiten.

so kann man einen Pfad als Variable übergeben.
Kannst Du damit weitermachen?

Sub test()
a = ActiveWorkbook.Path
MsgBox a
End Sub

[o0Julia0o]

ja, das hatte ich ja bereits so ausgeben lassen. Die Frage ist, ob VBA automatisch umschließende Anführungszeichen bei disem Code hier setzt:

Code:

Dim Pfadname As String
Dim Dateiname As String
Dateiname = Worksheets("Rech").Range("B34")
Pfadname = ActiveWorkbook.Path & "\Starter\"
Call Shell(Pfadname & Dateiname, vbMaximizedFocus)

Wird es so ausgeführt:

Code:

Pfadname & Dateiname

oder so:

Code:

"Pfadname & Dateiname"

[Käpt'n Blaubär]

Hallo Julia,

Excel und VBA sind schlau, aber nun überforderst Du sie.

Das was Du da in "Gänsebeinchen" setzen willst sind mehrere Variable.
Setzt Du die Dinger in Gänsefüßchen und so, wie Du das da vorgeführt
hast, dann ist das was bleibt einfach nur eine Zeichenfolge, also ein
sogenannter "String". Den kann man einblenden oder ausblenden, kopieren
oder verschieben, aber dann ist auch schon das Ende der Fahnenstange
erreicht. Das ist doch nicht das, was Du damit tun willst, oder?

Woher soll VBA denn wissen, daß Du um eine echte Variable, die Du auch
hoffentlich als solche deklariert hast, siehe auch Option Explicit, einen
popeligen String zu machen.
Na klar kann das VBA auch, ... jedenfalls dann, wenn man dafür ein Makro
geschrieben hat :05: .
Trotzdem bleibt diese ganze Geschichte hmmm, gelinde gesagt, sinnfrei.
Ich jedenfalls kann darin nicht mal ansatzweise einen Sinn erkennen.

[chris-ka]

Hallo Julia,

lasse es einfach so. ;)
Da du ohnehin nicht die Anwendung bei der Shell angibst, werden die doppelten "" auch nicht gebraucht.

also müsste 
"" & Pfadname & Dateiname & ""

oder

"""" & Pfadname & Dateiname & """"

oder auch nur

Pfadname & Dateiname

funktionieren.

[Kuwer]

Hallo Julia,

auf der sicheren Seite bist Du, wenn Du das zu Übergebende in Anführungszeichen packst, weil es sonst nicht funktioniert, sobald Leerzeichen enthalten sind.
Weil das schon etwas verwirrend sein kann mit den ganzen Anführungszeichen, benutze ich gerne die Chr()-Funktion für die umgebenden Anführungszeichen:

Debug.Print Chr(34) & Pfadname & Dateiname & Chr(34)   'Ausgabe im Direktfenster
MsgBox Chr(34) & Pfadname & Dateiname & Chr(34)        'Ausgabe im Meldungsfenster
Shell Chr(34) & Pfadname & Dateiname & Chr(34)         'Übergabe an Shell

34 ist der Ascii-Code für ein Anführungszeichen.

Gruß Uwe

[chris-ka]

Hallo Uwe,

Einspruch ;)

Bei Wscript.run 
Müssten unbedingt die doppelten "" gesetzt werden, sonst geht es nicht.
Wobei die Shell vertragt Leerzeichen, wenn die Anwendung nicht angegeben ist.

lg

[Kuwer]

Hallo Chris,

Einspruch ;)

Bei Wscript.run 
Müssten unbedingt die doppelten "" gesetzt werden, sonst geht es nicht.

das ist ja kein Problem. Dann nimmt man eben 2 davon.

MsgBox Chr(34) & Pfadname & Dateiname & Chr(34)
MsgBox String(2, Chr(34)) & Pfadname & Dateiname & String(2, Chr(34))

Ich wollte ja nur demonstrieren, wie man ohne große Hirnakrobatik Anführungszeichen drumherum machen kann.
Gerade Julia jedoch hat das wohl nicht verstanden, wenn ich ihre Bedankungen richtig interpretiere.  

Gruß Uwe