Petit probleme de macro

Bonjour Bonjour

Petite question

J'essaye de faire un macro qui si je quitte la feuille 1 (a l'aide des onglet sa m'ouvre un user form). J'ai fais cela mais sa ne marche pas

Private Sub Workbook_Sheetbeforeclose(ByVal Sh As Object)
If Sh.Name = "sheet1" Then Exit Sub
userform1.show
End Sub

Et deuxieme question j'essaye de faire que si je choisi la feuille 4 a travers les onglet j'ai un user form qui apparaisse. J'ai essayer ca mais ca ne marche pas non plus

Private Sub Workbook_Sheetopen(ByVal Sh As Object)
If Sh.Name = "sheet4" Then Exit Sub
userform4.Show
End Sub

Merci de votre aide