Afficher userform a l'ouverture de l'application

[Abf]

Bonjour,
Je suis novice en vba. Mon soucis est j'essaie de créer une application et lorsque je lance userform à l'ouverture, je n'arrive pas à utiliser ou afficher les feuilles de mon classeur
je souhaiterais afficher uniquement userform à l'ouverture de l'application et pouvoir afficher les feuilles du classeur de façon sélective comme une application proprement dite.
Merci

 

[Argos88620]

Bonjour,

affichage des feuilles en mode réduit et USF au premier plan

Private Sub Workbook_Open()
Application.ScreenUpdating = False
Application.WindowState = xlMinimized
Worksheets("Menu").Visible = True
For i = 2 To Worksheets.Count
Worksheets(i).Visible = False
Next
UserForm.Show 0
End Sub

Slts

 

[Abf]

Je perçois un message d'erreur exécution, et voici le message: le focus ne peut être déplacé sur le contrôle car celui-ci est invisible, non activé, ou d'un type n'acceptant pas le focus
Merci!

 

[Abf]

Worksheets("Menu").visible=True est surligné en jaune

 

[Argos88620]

Il faut renplacer "Menu" par le nom de la première page qui doit rester visible mais réduite

 

[Abf]

J'ai fait mais Worksheets(i).visible=false est surligné en jaune

 

[Abf]

erreur d'exécution'1004':
Impossible de définir la propriété visible de la classe Worksheet

 

[Argos88620]

"i" n'est le nom de la premiere page!
Feuil1, Page1, Accueil ....

 

[Abf]

C'est mais c'est une feuille qui s'affiche sur 16 et mon userform est toujours activé dans ma feuilles. Y-a-t-il une codification spéciale ?

 

[Argos88620]

exemple