Makro

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Makro

Re: Makro

von Karolus » Fr, 04.04.2008 10:46

Hallo Hannes

Code: Alles auswählen

Sub Datei_Oeffnen
Dim Arg()
Dim oDoc As Object
   sUrl1 = convertToURL("C:\Dokumente und Einstellungen\tbh\EIGENE DATEIEN\AI003700.XLS")
   sUrl2 = convertToURL("C:\Dokumente und Einstellungen\tbh\EIGENE DATEIEN\AI003800.XLS")
   StarDesktop.loadComponentFromURL (sURL1, "_blank", 0, Arg())
   StarDesktop.loadComponentFromURL (sURL2, "_blank", 0, Arg())
End Sub
Gruß Karo

Nach oben