Tabellenblatt erst einblenden wenn Auswahl erfolgt
Aelsbeth
mal wieder eine kleine Frage, an der ich vergeblich rumtüftele :-(
Ich habe in einer Workbook_Open Prozedur eine Abfrage eingebaut ("Welche Art der Berechnung soll gewählt werden?"). Klappt auch alles ganz super, außer dass im Hintergrund schon das Anfangstabellenblatt zu sehen ist.
Gibt es eine Möglichkeit, den Bildschirm erst mal grau zu lassen und erst nach bestätigter Auswahl (über UserForm) dann die entsprechende Ansicht einzublenden?
Der Code sieht im Moment so aus:
Private Sub Workbook_Open()
Blattschutz_rein
Application.ScreenUpdating = False
If Worksheets(4).Cells(48, 10) = 0 Then
Planungstools.Show
End If
Toolbox.StartUpPosition = 0
Toolbox.Left = ActiveWindow.Left + 685
Toolbox.Top = ActiveWindow.Top + 160
Toolbox.Show
Worksheets(1).Activate
Cells(13, 5).Activate
End Sub