Hallo excelfreunde,
ich starte mit
--------------------------------------------------------------------------
Dim objExcel, xlBook
msgbox " ich Starte bitte warten "
Set objExcel = CreateObject("Excel.Application")
ObjExcel.Application.Visible = True
Set xlBook = objExcel.Workbooks.Open("P:\test1\datei1.xlsb,3 , true)
ObjExcel.Application.Visible = True
objExcel.Application.OnTime Now(), "ListBox_Modul.UFZeigen" ' Userform starten
Msgbox " Ok bin fertig die Datei ist offen. Viel Spass "
set xlBook = Nothing
-----------------------------------------------------------------------
Dies funktioniert auch zuverlässig.
Ich habe dazu mal zwei Fragen:
Was bedeutet der Parameter 3 in dieser Zeile
Set xlBook = objExcel.Workbooks.Open("P:\test1\datei1.xlsb,3 , true)
Und ist es möglich hier ein Parameter mit anzugeben so das die Userform nach dem start im Vordergrund ist?
Diese versteckt sich leider immer hinter den anderen Fenster von Windows. So das man nicht auf den ersten Blick sieht das sie gestartet ist.
habt schon mal recht vielen dank für euer interesse.
mfg Thomas