Affichage du userform dès l'ouverture du fichier excelRésolu

Question

Bonjour, 

je suis d&#233;butant dans l'environnement VB, j'aimerai savoir comment voir
appara&#238;tre mon userform d&#232;s l'ouverture de mon fichier excel et ou
est-ce que je dois rentrerce code, est-ce dans code workbook??

Je voudrais aussi que ce userform d'accueil prenne tout mon &#233;cran et
que l'on ne voit pas l'application excel et pour finir enlever la crois
de fermeture du userform.

Merci d'avance.

michelxld · Answer

bonjour

pour afficher l'USF &#224; l'ouverture du classeur , tu peux utiliser l'evenement Workbook_Open au niveau de ThisWorkbook


Private Sub Workbook_Open()
UserForm1.Show
End Sub



plutot que de masquer la croix tu pourrais la d&#233;sactiver : 


n'oublie pas d'ajouter un bouton dans le UserForm afin de pouvoir le refermer , sinon tu vas bloquer ton classeur


Private Sub CommandButton1_Click()
Unload Me
End Sub


pour que l'USF s'affiche en pleine page tu peux tester :



Private Sub UserForm_Activate()
With Me 
.StartUpPosition = 3
.Width = Application.Width
.Height = Application.Height
.Left = 0
.Top = 0
End With
End Sub


bon week end
michel

michelxld · Answer

Oouuppss...un petit oubli....

pour d&#233;sactiver la croix de fermeture :

Private Sub userForm_queryClose(Cancel As Integer, closeMode As Integer)If closeMode 0 Then Cancel True
End Sub

bonne journ&#233;e
michel

cs_aslalaud · Answer

Pour afficher directement votre userform, il vaut mieux utiliser la procédure suivante:

Private Sub Workbook_Open()

Application.visible= false

load userform1

userform1.show

End sub


 Et vous aurez l'USF qui s'affiche directement sans retourner aux feuilles excel.

cs_aslalaud · Answer

Bonne année à toutes et à tous.

Affichage du userform dès l'ouverture du fichier excel

4 réponses

Discussions similaires