Ouverture application VBA excel 2010
Bonjour,
Je reviens sur le forum, car l'application qui fonctionnait bien avec le code communiqué sur le forum fin septembre, se bloque depuis ce matin.
Je ne parviens plus à ouvrir le fichier.
Je dois alors ouvrir un classeur excel vierge et sélectionner le classeur concerné dans la liste qui apparaît.
Enfin, quand j'éteinds le PC il me précise qu'excel ne veut pas se fermer et me demande si je veux quand même quitter.
Auriez vous une idée de ce qui peut bloquer ?
Le code que j'ai passé est le suivant:
Dans thisworbook, pas de changement
Code:
1
2
3
4
5
6
|
Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub |
Sur chaque bouton du userform6 destiné à lancer l'aperçu avant l'impression:
Code:
1
2
3
4
5
6
7
| Private Sub Cmd35_Click()
Me.Hide
Application.Visible = True
Feuil2.PrintPreview
Application.Visible = True
Me.Show
End Sub |
Sur le bouton quitter des 6 userform:
Code:
1
2
3
4
| Private Sub Cmd54_Click()
Unload Me
Application.visible=false
End Sub |
Merci de votre aide.
