❤️ Helfen Sie noch heute, unser LibreOffice Forum zu erhalten! ❤️
Unterstützen Sie das LibreOffice-Forum und helfen Sie uns, unser Ziel für 2025 zu erreichen!
🍀 Jeder Beitrag zählt – vielen Dank für Ihre Unterstützung!🍀
Mit Ihrer Spende sichern Sie den Fortbestand, den Ausbau und die laufenden Kosten dieses Forums. 🌱
>> Dank Ihrer Unterstützung -> Keine Werbung für alle registrierten LibreOffice-Forum User! <<
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗
Externes Programm per Button/Textfeld starten
Externes Programm per Button/Textfeld starten
Guten Tag,
Dokumente oder Internetseiten können aus Calc per Hyperlink aufgerufen werden.
Ist es möglich, auch auf dem lokalen PC gespeicherte exe-Programme per Hyperlink oder Schaltflächenmakro zu starten?
Danke für jeden Hinweis.
Dokumente oder Internetseiten können aus Calc per Hyperlink aufgerufen werden.
Ist es möglich, auch auf dem lokalen PC gespeicherte exe-Programme per Hyperlink oder Schaltflächenmakro zu starten?
Danke für jeden Hinweis.
.
Windows 10 Home, Vers. 1903; LibreOffice Version 6.3.4.2.(x64)
Windows 10 Home, Vers. 1903; LibreOffice Version 6.3.4.2.(x64)
Re: Externes Programm per Button/Textfeld starten
Hallo Peter,
vielen Dank für den raschen Hinweis. Ich habe das Beispiel kopiert und meinen eigenen Pfad eingesetzt wie folgt:
Sub DateiOeffnen
url=converttourl("C:\Programme\Free M4a to MP3 Converter\m4a_converter.exe")
dim myFileProp() as new com.sun.star.beans.PropertyValue
oDocument = StarDesktop.loadComponentFromURL(url, "_blank", 0, myFileProp() )
end sub
Beim testen sind nun leider von allen geöffneten LibreOffice-Programmen die Bildschirminhalte verschwunden, es erfolgte keine Reaktion mehr und nach ca. 1 - 2 Minuten sind die Programme abgestürzt.
Oder habe ich eine falsche Vorlage erwischt?
vielen Dank für den raschen Hinweis. Ich habe das Beispiel kopiert und meinen eigenen Pfad eingesetzt wie folgt:
Sub DateiOeffnen
url=converttourl("C:\Programme\Free M4a to MP3 Converter\m4a_converter.exe")
dim myFileProp() as new com.sun.star.beans.PropertyValue
oDocument = StarDesktop.loadComponentFromURL(url, "_blank", 0, myFileProp() )
end sub
Beim testen sind nun leider von allen geöffneten LibreOffice-Programmen die Bildschirminhalte verschwunden, es erfolgte keine Reaktion mehr und nach ca. 1 - 2 Minuten sind die Programme abgestürzt.
Oder habe ich eine falsche Vorlage erwischt?
.
Windows 10 Home, Vers. 1903; LibreOffice Version 6.3.4.2.(x64)
Windows 10 Home, Vers. 1903; LibreOffice Version 6.3.4.2.(x64)
Re: Externes Programm per Button/Textfeld starten
Code: Alles auswählen
Sub startApp(ByVal sPathApp As String)
' URL pointing to location of executable file of application
sUrl = ConvertToUrl(sPathApp)
oService = createUnoService("com.sun.star.system.SystemShellExecute")
oService.execute(sUrl, ,0)
end sub
http://de.openoffice.info/viewtopic.php?f=18&t=12680
ODER
http://www.starbasicfaq.de/Wiekannmanan ... icauf.html
Re: Externes Programm per Button/Textfeld starten
Guten Tag,
vielen Dank an alle Antwortenden. Die Schaltfläche funktioniert inzwischen wie gewünscht.
vielen Dank an alle Antwortenden. Die Schaltfläche funktioniert inzwischen wie gewünscht.
.
Windows 10 Home, Vers. 1903; LibreOffice Version 6.3.4.2.(x64)
Windows 10 Home, Vers. 1903; LibreOffice Version 6.3.4.2.(x64)
An alle, die das LibreOffice-Forum gern nutzen und unterstützen wollen:
Bitte helfen Sie uns mit 7 Euro pro Monat.
Durch Ihren Beitrag tragen Sie dazu bei, unsere laufenden Kosten für die kommenden Monate zu decken.
Unkompliziert per Kreditkarte oder PayPal.
Als ein kleines Dankeschön werden Sie im LO-Forum als SUPPORTER gekennzeichnet.