ich starte eine Excel-Mappe mit folgendem VB-Modul:
Sub Main()
Dim xlApp As New Excel.Application
Form1.Show
On Error Resume Next
xlApp.Visible = False
xlApp.Workbooks.Open "C:\vb\test.xls"
If Err.Number > 0 Then MsgBox "Fehler beim Öffnen der Datei!"
Unload Form1
Set xlApp = Nothing
End
End Sub
Da das Laden der Datei etwas dauert, will ich mit Form1.Show ein "bitte warten"-Fenster anzeigen.
In der Excel-Datei steht nun in der Workbook_Open-Prozedur:
UserForm1.Show
Application.Visible=True
Jetzt kommt es aber oft vor, dass das "Bitte warten"-Form des VB-Codes vor dem Excel-Userform steht. Erst beim Klick auf dieses UF kommt es in den Vordergrund.Wie kann ich mit Excel- (oder VB-) Mitteln das Excel-Userform in der Vordergrund bzw. das VB-Form in den Hintergrund zwingen?
Grüße,
Matthias
----------------------------------------------------------------------
VB-Zusatzfrage:
Beim Klick auf das VB-Form wärend des Ladens der Excel-Datei kommt ein Fenster mit der Meldung:
Ich will aber, dass ein Klick auf das Form ignoriert wird...?)