folgende Problematik mit dem Code:
Private Sub Btn_Druckoption_Mieter_Click()
Unload Frm_Druckoptionen
Sheets("Start2").Activate '1)
Worksheets("Druckbereich").Btn_MieterN.Value = True '2
Worksheets("Druckbereich").Btn_VorschauN.Value = True '2
frm_Administration.Show
End Sub
1) dieses Blatt ist nur eingefärbt und hat keinen weiteren Inhalt. Zweck: es soll angezeigt werden solange der Code 2 ausgeführt wird. Tut es aber nicht sondern das Blatt ("Druckbereich") wird angezeigt. Hat jemand eine Lösung für das Problem