VBA - Ordner in externem Programm öffnen (ACDSee)
Hallo,
ich bin absoluter Makro-Neuling und versuche gerade, einen Ordner mit Bildern über ein Makro zu öffnen, allerdings nicht im Explorer sondern im Programm ACDSee. Beides getrennt habe ich hinbekommen (Makro, um ACDSee zu öffnen und den Ordner im Explorer öffnen), aber leider nicht beides zusammen. Kann mir da jemand helfen?
Hier meine getrennten Versuche, die soweit funtionieren.
Sub Rechteck1_Klicken()
EinPfad = "C:\Ordnerpfad\"
Shell "explorer.exe """ & EinPfad & """", vbNormalFocus
End Sub
Sub RunRegistredProgram2()
CreateObject("WScript.Shell").Run "ACDSeeStandard2019.exe", vbNormalFocus
End Sub
Vielen Dank für eure Hilfe!
ArianeVictoria
ich bin absoluter Makro-Neuling und versuche gerade, einen Ordner mit Bildern über ein Makro zu öffnen, allerdings nicht im Explorer sondern im Programm ACDSee. Beides getrennt habe ich hinbekommen (Makro, um ACDSee zu öffnen und den Ordner im Explorer öffnen), aber leider nicht beides zusammen. Kann mir da jemand helfen?
Hier meine getrennten Versuche, die soweit funtionieren.
Sub Rechteck1_Klicken()
EinPfad = "C:\Ordnerpfad\"
Shell "explorer.exe """ & EinPfad & """", vbNormalFocus
End Sub
Sub RunRegistredProgram2()
CreateObject("WScript.Shell").Run "ACDSeeStandard2019.exe", vbNormalFocus
End Sub
Vielen Dank für eure Hilfe!
ArianeVictoria
Comment
Share
Share on Facebook
Share on X (Twitter)
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-ID: 488401
Url: https://administrator.de/forum/vba-ordner-in-externem-programm-oeffnen-acdsee-488401.html
Printed on: May 8, 2025 at 04:05 o'clock
2 Comments
Latest comment
Übergeb doch einfach mal den Ordner als ersten Parameter an das Programm, verstehe nicht warum du das beim Explorer gemacht hast aber nicht bei Acdsee wäre doch der primäre Ansatz da das bei den meisten Programmen der Fall ist?!
CreateObject("WScript.Shell").Run """c:\Pfad\zu\ACDSeeStandard2019.exe"" ""C:\Ordnerpfad""", 1, False 
Wow, das habe ich gerade probiert und es hat geklappt. War ja doch gar nicht so kompliziert! Vielen Dank für die Hilfe 