Inclure la fermeture d'un classeur à l'ouverture d'un autre

Résolu/Fermé
Legoffio Messages postés 4 Date d'inscription dimanche 9 novembre 2014 Statut Membre Dernière intervention 10 novembre 2014 - 9 nov. 2014 à 16:25
Legoffio Messages postés 4 Date d'inscription dimanche 9 novembre 2014 Statut Membre Dernière intervention 10 novembre 2014 - 10 nov. 2014 à 14:21
Bonjour à tous,

Tout d'abord Félicitations pour la qualité du forum que j'épuise quotidiennement pour trouver des solutions simple aux questions de mon esprit torturé de comptable :-).

Je suis débutant en VBA et j'essaye désespérément de boucler une procédure.
Le principe : je me sers d'un classeur "interface" qui me permet de créer et d'ouvrir d'autre classeurs (en fonction de la période qui est concernée). Je voudrais qu'à l'ouverture du deuxième classeur le premier soit fermé et que le userform d'accueil du second fichier soit lancé.

C'est là que se situe mon problème, tout se passe correctement jusqu'à la fermeture du fichier qui stoppe ma procédure et n'affiche pas le userform.

Voilà le code que j'utilise :

Private Sub Workbook_Open()

dim i as integer
for i = workbooks.count to 1 step -1
if workbooks(i).name = "General Cashier interface.xlsm" then workbooks(i).close false
next
userform1.show
end sub


en espèrant que vous pourrez m'aider

Merci d'avance
Steph
A voir également:

7 réponses

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
9 nov. 2014 à 20:01
Bonjour,

petit probleme ici qui me permet de créer et d'ouvrir d'autre classeurs comment le code que vous avez ecrit arrive dans le deuxieme classeur

ouvrir le deuxieme classeur avant de fermer le premier.

classeur gene ......, pour ouverture du deuxieme classeur

Workbooks.Open ("D:\_atest\class2.xlsm")
ThisWorkbook.Close False
0
Legoffio Messages postés 4 Date d'inscription dimanche 9 novembre 2014 Statut Membre Dernière intervention 10 novembre 2014
10 nov. 2014 à 09:25
Bonjour !

le premier classeur vérifie l'existence du fichier et le créer si nécessaire sur la base d'un classeur modèle auquel il change le nom. Il l'ouvre ensuite, et à l'ouverture du deuxième classeur un userform apparait. la procédure fonctionne très bien mais les 2 classeurs restent ouverts.

J'avais essayé de mettre le code de fermeture dans le premier ou le deuxieme classeur mais rien n'y fait, apparemment cela est du au fait que le userform ouvert dans le deuxieme classeur à l'ouverture bloque les autres procédure.

Donc ton code fonctionne bien tant qu'il n'y a pas de usf ouvert dans le 2eme classeur...

une autre option peut etre ?
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
10 nov. 2014 à 10:54
Bonjour,

J'ai teste mon code avec deux classeurs et ca marche. Pouvez-vous mettre vos fichiers a dispo sur https://www.cjoint.com/ pour que je puisse voir de quoi il en retourne

A+
0
Legoffio Messages postés 4 Date d'inscription dimanche 9 novembre 2014 Statut Membre Dernière intervention 10 novembre 2014
10 nov. 2014 à 11:14
Ce site est bloqué par le firewall de ma boîte...

je mets le lien depuis wetransfer.com :

http://we.tl/fhiDqLP7yS

merci bcp !
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
10 nov. 2014 à 11:48
Re,

Fermeture fichier interface aleatoire apres modif code dans interface. Je regarde en modifiant dans l'UF a l'activation de celle-ci
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié par f894009 le 10/11/2014 à 13:48
Re,

la solution la plus simple que j'ai trouve, apres quelques modifs ou j'avais bien la fermeture du fichier gene........ mais l'UF ne faisait qu'une apparition sur le deuxieme fichier cree, c'est dans d'ouvrir l'UF en VbModeless

Le classeur Gene.... a le code de fermeture de lui-meme

https://www.cjoint.com/c/DKknZRsNZa1

par contre cela obligera a faire des modifs pour eviter les clics sur les onglets

A+
0
Legoffio Messages postés 4 Date d'inscription dimanche 9 novembre 2014 Statut Membre Dernière intervention 10 novembre 2014
10 nov. 2014 à 14:21
Re,

Merci pour le temps consacré et les recherches ! :-)

Je vais faire les tests comme ca et essayer de bloquer l'accès aux onglets au demarrage.

Excellente journée !
Steph
0