Ouvrir fichier excel en fonction d'une cellul [Résolu/Fermé]

Signaler
-
 loulou38 -
Bonjour,

Une petite question??? est il possible d'ouvrir un fichier excel en fonction du contenu d'une cellule.

Exemple: J'ai une liste déroulante en A1, je selectionne un nom de ma liste déroulante puis je clique sur un bouton qui me permet de lancer une macro qui ouvre mon fichier du genre:

sub ouvrir_le fichier()

Dim Dossier As String, Fichier As String, Chemin As String
Dossier = "C:\Documents and Settings\"
Chemin = Dossier & Fichier
fichier = Range("A1")

Workbooks.Open Filename:= Chemin.xls

end sub

Si quelqu'un a une idée????

Merci d'avance

1 réponse

C'est bon j'ai trouvé, la preuve que quand on cherche on trouve!!!!:)

Ci-joint ma macro qui fonctionne ( si ça peut aider...)

sub ouvrir_le fichier()

Dim Dossier As String, Fichier As String, Chemin As String
Dossier = "C:\Documents and Settings\"

fichier = Range("A1")

Workbooks.Open Filename:= dossier & fichier

end sub

A+