démasquer un obglet à la sortie d'un USF

[Novice avance !?]

bonsoir,

voici mon code qui à l'ouverture du USF masque la l'onglet xxxx

Private Sub UserForm_Initialize()
Sheets("xxxx").Activate
ActiveWindow.SelectedSheets.Visible = False
End Sub


et j'aimerais qu'en quittant le USF cela démasque cette feuille là !?

Dans mon USF
Private Sub CommandButton1_Click()
Unload Me

le code pour démasquer cette feuille xxxx

End Sub

est-ce possible ?


merci

 

[wilfried_42]

Re : démasquer un obglet à la sortie d'un USF

bonjour nocive avance

Private Sub UserForm_Initialize()
Sheets("xxxx").Activate
ActiveWindow.SelectedSheets.Visible = False
End Sub

on racourcit

Private Sub UserForm_Initialize()
Sheets("xxxx").Visible = false
End Sub

pour la rendre visible :

Private Sub CommandButton1_Click()
Sheets("xxxx").Visible = true
Unload Me
End Sub