Clever-Excel-Forum

Hallo Leute!

Beim Start von meien Projekt wird Excel minimiert und die UF erscheint.
Das funktioniert auch so wie das möchte
Der Code dafür steht in DieseArbeitsmappe und lautet

Ich möchte jetzt über einen ToggleButton1 Excel wieder sichtbar machen.
Das man in den Tabellenblättern arbeiten kann.
Dies geht mit diesen Code leider nicht!

Was ist daran FALSCH?

Moin!
Hast Du die .ShowModal-Eigenschaft des UserForm auf False gestellt?

Gruß Ralf

Ergänzend würde ich eher das ToggleButton1_Change() nehmen.

Hallo!

zu 1 Nein und was bewirkt das
zu 2 Warum Change?

Hallo!

Jetzt habe ich das umgestellt.
Geht einmal und dann verschwindet meine UF (wird minimiert)

Zeig mal die Datei, dann muss ich das nicht nachbauen.

Gruß Ralf

Hallo!

In der UF Start ist der ToggleButton eingebaut

Mal ohne das ganze Klassengedöns.
Folgendes reicht völlig:
Microsoft Excel Objekt DieseArbeitsmappe

Option Explicit 
 
Private Sub Workbook_Open() 
UserForm1.Show vbModeless 
End Sub 

Dialog UserForm1

Option Explicit 
 
Private Sub UserForm_Initialize() 
Application.WindowState = xlMinimized 
End Sub 
 
Private Sub ToggleButton1_Change() 
Application.WindowState = IIf(ToggleButton1, xlNormal, xlMinimized) 
Me.Show vbModeless 
End Sub 
 

Datei mit dem Nötigsten anbei.

Gruß Ralf

Hallo Ralf!

Danke für die Hilfe!

Ich habe das getestet und bin der Meinung das isses.
Habe wieder was dazu gelernt.