Rendre le classeur Excel invisible et ouvrir une forme utilisateur spécifique

Private Sub Workbook_Open()
   Application.Visible = False
   ThisWorkbook.Windows(1).Visible = False
   UserForm1.Show
 End Sub
Michael Futral