Creation d'une macro

Résolu/Fermé
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 - 24 août 2010 à 14:59
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 - 25 août 2010 à 13:52
Bonjour,

J'ai un problème avec excel.

Sur une feuille, j'ai deux listes à choix multiple. Une première qui définie un lieu et une autre qui définie une action à faire sur ce lieu.

J'ai créé un bouton auquel j'aimerais associer une macro qui ouvrirai une autre feuille excel d'un autre classeur en fonction des deux résultats sélectionnés.

Exemple:

lieu : coignieres

à faire : tableau de bord

Je clique sur le bouton et je me retrouve sur la feuille excel "tableau de bord" de "coignieres"

Voilà merci d'avance pour votre aide ;)


A voir également:

7 réponses

bigfood Messages postés 24 Date d'inscription mardi 24 août 2010 Statut Membre Dernière intervention 6 juin 2011 2
24 août 2010 à 20:32
si j'ai bien compris tu veux faire un lien vers le fichier source.....
Donc voila tu vas dans le menu insertion et tu met lien hypertexte et tu choisi ton fichier ...

j'éspere que je t'ai été utile
2
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
25 août 2010 à 09:54
Bonjour,
Un petit fichier exemple est nécessaire, car, entre autre, nous ne savons pas comment ont été créée tes 2 listes déroulantes. Place nous ici, grâce à https://www.cjoint.com/ ou http://www.cijoint.fr/ une copie de ton classeur sans données confidentielles.
1
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 6
24 août 2010 à 16:08
personne ?
0
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 6
25 août 2010 à 09:20
Merci bigfoot mais ce n'est pas vraiment ça.
Cette fonction je la connais et elle est très pratique dans le cas où l'on souhaite créer un racourci vers un autre classeur/feuille excel à partir d'un seul choix.
Mais dans mon cas je renvoie à un classeur/feuille excel en fonction de 2 résultats différant donnés par l'utilisateur.
En fait l'utilisateur fait un premier choix dans une liste, puis un second dans une autre liste, et en fonction de ces 2 choix, excel ouvre le bon classeur.
0

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

Posez votre question
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 6
25 août 2010 à 11:10
ok pijaku le voici

https://www.cjoint.com/?izljTOvoV3

Merci d'avance
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
25 août 2010 à 11:28
Alors, il s'agit d'ouvrir le fichier excel dont le nom est contenu en D9 et d'activer la feuille dont le nom est contenu en H9. C'est bien cela?
Attention a ne pas appeler votre macro OK, c'est un nom ambigü.
Ce code suppose que vos classeurs y compris celui contenant la macro soient tous dans le même répertoire. Si ce n'est pas le cas, remplacez : ActiveWorkbook.Path (en gras dans le code ci dessous) par le chemin d'accès au répertoire entre guillemets. Exemple : "C:\Mes Documents\travail"
Sub bouton()
Dim classeur, feuille, chemin As String
classeur = Range("D9").Value
feuille = Range("H9").Value
If classeur = "" Or feuille = "" Then
MsgBox "vous devez faire votre choix dans les 2 listes déroulantes"
Exit Sub
End If
chemin = ActiveWorkbook.Path & "\" & classeur & ".xls"
Workbooks.Open chemin
Sheets(feuille).Activate
End Sub
0
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 6
25 août 2010 à 11:44
Merci pijaku
ça correspond parfaitement à ce que souhaite même plus (le coup de la msgbox j'y avais pas pensé ;))
il ne me reste plus qu'a peaufiner tout cela
encore merci
0
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 6
25 août 2010 à 11:58
Je pense qu'il doit y avoir omission du terme "feuille" dans cette ligne non ?

chemin = ActiveWorkbook.Path & "\" & classeur & ".xls"
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
25 août 2010 à 12:04
Non. Dans cette ligne, j'attribue à la variable "chemin" le chemin d'accès complet + le nom du fichier + l'extension...
La variable feuille ne sert qu'une fois le classeur ouvert à activer la feuille concernée...
0
hillmick Messages postés 70 Date d'inscription mardi 29 décembre 2009 Statut Membre Dernière intervention 25 août 2010 6
25 août 2010 à 13:52
exacte ;)
je l'ai mis à ma sauce et ça donne ceci:
chemin = ActiveWorkbook.Path & "\" & classeur & "\" & feuille & ".xls"
et ça marche très bien
encore merci à toi tu m'as sorti d'une bien mauvaise passe.
je te met +1
0