Opgelost Verversen van userform

[Mark_68]

Ik heb een knop gemaakt waarmee ik gegevens kan wissen en ik het volgende commando gebruik:

Unload Me
Start.Show

Echter als ik dan op deze knop klik dan ververst het userform wel maar komt ook het werkblad van excel naar voren en dat is nou net niet wat ik wil.
Is er een manier om dit op te lossen?

 

[edmoor]

Staat daarover misschien iets in de Userform_Initialize?
Plaats anders een voorbeeld documentje.

 

[Mark_68]

Hierbij het gevraagde bestand

 

[AHulpje]

Doe het eens zo (iets compacter):

Private Sub cmdWissen_Click()
    If MsgBox("WEET U ZEKER DAT U ALLES WILT WISSEN?", vbQuestion + vbYesNo, "confirmation") = vbNo Then Exit Sub
    For Each sht In Worksheets
        If sht.Name <> "Totaalbeeld" Then sht.Range("a2:g20").Clear
    Next
    Unload Me
    Application.WindowState = xlMinimized
    Start.Show
End Sub

 

[Mark_68]

Is niet helemaal wat ik bedoel door deze code minimaliseerd hij naar de taakbalk, wil eigenlijk dat het werkblad weg blijft

 

[AHulpje]

Kijk eens naar je eigen code in ThisWorkbook:

Application.Visible = False

 

[Mark_68]

Die staat zoals jij beschrijft

 

[AHulpje]

Hint:
Wijzig

Application.WindowState = xlMinimized

in

Application.Visible = False

 

[Mark_68]

Het werkt

Dank je wel