VBA

[Barbara]

Salut,

Voilà mon problème

J'ai 2 classeurs:

1) Le premier classeur est un menu principal avec des boutons:
J'ai un bouton qui m'ouvre une boîte de dialogue (3) avec des options boutons

Lorsque je choisis un option bouton j'ai un classeur (2) qui s'ouvre

Problème:

J'aimerais dans le classeur (2) avoir un bouton qui m'ouvre directement la boîte de dialogue (3)

Voici le début de mon code:

ActiveWorkbook.Save
ActiveWorkbook.Close
Workbooks.Open Filename:="C:\programme1.xls"
Application.Run "programme1.xls!MenuPrincipal"

Je ferme ma feuille et j'arrive dans le menu principal mais après j'arrive pas à afficher ma boîte de dialogue automatiquement??

Merci d'avance

 

[STéphane]

c'est boites de dialogue de quel type ?

bye
stéphane

 

[Barbara]

C'est un userform

 

[STéphane]

il y a au moins une méthode pour

Charger un userform appelé My_form en provenance d'un autre classeur appelé myform.xls situé dans le répertoire c:\mes documents
Inscrire la procédure Load_the_form dans votre classeur actif et la procédure load_my_form dans le classeur myform.xls contenant le formulaire.

Sub Load_the_form()
'your code here
ChDir "C:\My documents\"
application.run "myform.xls!Load_My_form"
'your code here
end Sub

Sub Load_My_form()
My_form.show
end Sub

 

[Barbara]

Merci beaucoup pour ton code mais j'ai encore un petit problème

Quand j'appuie sur le bouton ma boîte s'affiche et je peux choisir un autre option bouton (ton code c'est ok) mais mon problème c'est que j'ai chaque fois un classeur qui s'ouvre et j'aimerais que quand ma boîte s'affiche le classeur où j'étais se ferme. Je sais pas comment mettre mon code

Sub Choixzones()


ActiveWorkbook.Save

Application.Run "programme1.xls!ChoixZones"


End Sub


Merci trop cool

 

[STéphane]

???
en supposant que ta boîte de dialogue soit fermée.
workbooks("classeurquialancé").close savechanges:=false