Hallo,

ich möchte per vba eine Verknüpfung öffnen.

Hintergrund:

Ich arbeite mit Adams Chassis und habe 2 Möglichkeiten das Programm zu starten.

1. Klick auf die *.exe --> Dann wird nur das Programm geladen ohne diverse Einstellungen

2. Möglichkeit: Ich öffne eine Verlinkung. --> Diese Verlinkung öffnet zusätzlich zum Programm meine Einstellungen, D.h. beliebig viele Manöver, Fahrzeuge und Einstellungen werden mitgeladen.

Nun möchte ich Prozesse beschleunigen und per VBA auf die Verlinkung zugreifen, damit die Manöver, Fahrzeuge und Einstellungen automatisch mitgeladen werden.

Bisher habe ich 3 Skripte gefunden. Alle können die *.exe ausführen aber nicht die *.lnk 

Hier ein Beispiel mit DVDMaker

Sub aaa()

1.

appID = Shell("C:\Program Files\DVD Maker\DVDMaker.exe")     -->läuft
appID = Shell("C:\Users\...\DVDMaker.lnk")                   -->läuft nicht

2.
 Dim Shex As Object
 Set Shex = CreateObject("Shell.Application")
 tgtfile = "C:\Program Files\DVD Maker\DVDMaker.exe"              --> läuft
 tgtfile = "C:\Users\...\DVDMaker.lnk"                            -->läuft nicht
 Shex.Open (tgtfile)

3.
Dim WshShell As Object
Set WshShell = CreateObject("Wscript.Shell")

WshShell.Run """C:\Program Files\DVD Maker\DVDMaker.exe"""     -->läuft
WshShell.Run """C:\Users\...\DVDMaker.lnk"""                   -->läuft nicht


End Sub