---

Hallo zusammen,

bei der Programmierung für ein Partserver-System bin ich auf das Problem gestoßen, ein externes Programm mit einem Makro starten zu müssen, dessen Lage im Verzeichnisbaum ich nur relativ kenne.

Gibt es eine Möglichkeit, den Pfad zu dem Programm in VBA relativ zu dem Verzeichnis anzugeben, in dem das Makro liegt?

Viele Grüße,

CEROG

------------------
Inoffizielle Linux-Hilfeseite
Meine Firma

---

Mit '..\' gehst in das übergeordnete Verzeichnis.
Mit '..\..\' gehst zwei Verzeichnisse weiter hoch.
usw.

Grüssle TP

------------------

"Soll es funktionieren oder darf es auch etwas von Siemens sein?" ...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Bloody Mess,

dann müßte ".\" doch das aktuelle Verzeichnis sein - das funktioniert aber leider nicht. Oder läuft es bei Windows in der Beziehung anders als bei den Unices?

Viele Grüße,

CEROG

------------------
Inoffizielle Linux-Hilfeseite
Meine Firma

---

Eine Datei im aktuellen Verzeichnis kannst ohne irgendwelche Zusätze aufrufen.

[Edit] ... weil falsch ... [/Edit]

------------------

"Soll es funktionieren oder darf es auch etwas von Siemens sein?" ...

[Diese Nachricht wurde von BloodyMess am 15. Feb. 2006 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Morgen,

@BloodyMess,

Wie kommst Du denn darauf ? Sowohl ".\" als auch "..\" funktionieren IMHO auch in Windows. Auch wenn man das ".\" nicht wirklich braucht.

@CEROG,
was für ein Makro denn ?

In Excel-VBA gibt's z.B. ThisWorkBook um auf die den VBA-Code enthaltende Mappe zuzugreifen. Via .FullName, .Name und .Path kommt man an deren Pfad und/oder Name.

Vielleicht tut's ja sowas wie: ThisWorkBook.Path & "\Pfad\xyz" oder
auch was wie ThisWorkBook.Path & "\..\AndererPfad\abc"

CU, Bernd

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ja Du hast Recht! Schön das hier noch jemand mitliest!

------------------

"Soll es funktionieren oder darf es auch etwas von Siemens sein?" ...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo zusammen,

Ich arbeite gerade an einem VBA-Makro für CATIA V5.

Aus diesem heraus möchte ich das Programm thinkCADtls.exe aufrufen, um Screenshots umzuwandeln.

Leider funktioniert der einfache Aufruf "thinkcadtls.exe" mit den zugehörigen Optioenen und Argumenten nicht :-(.

Ich muß mir wohl was anderes suchen.

Viele Grüße,

CEROG

------------------
Inoffizielle Linux-Hilfeseite
Meine Firma

---

Hallo,

weiß nicht, ob es zur Lösung beiträgt, aber mit Hilfe des folgendem Beispiels habe ich Übergabeparameter mit relativen Pfaden an eine ausführbare Datei übergeben können.

Code:

---

Sub teer()

Debug.Print VBA.CurDir
'' -> C:\Dokumente und Einstellungen\UserXY\Eigene Dateien

'' -> Programmordner ... C:\Programme\loesche_mich
'' -> Datei zum einlesen ... C:\
'' -> Datei zum schreiben ... c:\Temp

'' 1te Möglichkeit
VBA.Shell ("..\..\..\Programme\loesche_mich\rotateBMP.exe ..\..\..\draw_1.bmp ..\..\..\Temp\rota.bmp")

'' 2te Möglichkeit
Dim WSHShell As Object
Set WSHShell = CreateObject("WScript.Shell")
WSHShell.Run ("..\..\..\Programme\loesche_mich\rotateBMP.exe ..\..\..\draw_1.bmp ..\..\..\Temp\rota.bmp")

End Sub

---

Grüssle TP

------------------

"Soll es funktionieren oder darf es auch etwas von Siemens sein?" ...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP