Liste deroulante renvoie vers le fichier correspondante

Bonjour,

Je suis une nouvelle utilisateur de VBA.

Je souhaite que quelqu'un m'aide s'il vous plait. ça fait une 5jours que je suis bloquée sur un truc.

J'ai crée une liste de deroulante de 19 noms. Et chacubn des noms corrspond un fichier spécifique qui sont enregistrées sur mon ordi (données sources). et c'est la que je bloque.

Au debut j'étais allée sur une autre idée qui n'a pas marché. c'était si je tape le nom de nom fichier, il s'ouver. Je suis arrivée à faire pour un seul fichier. Mais je change le nom du fichier, il ne passe rien .

Voice le code

Private Sub Worksheet_Change(ByVal Target As Range)

'

Dim fichier As String

fichier = ActiveWorkbook.Name

If Target.Address = Range("c3").Address Then

' Macro2 Macro

' Range("C3").Select

' ActiveCell.FormulaR1C1 = "=""*.xlsx"""

If Target.Value = "Belleville" Then

Workbooks.Open Filename:= _

"\\atlas.fvfdff.fr\\_D.Diarra\Données sources des sites\trent(e.xlsx"

Workbooks(fichier).Activate

End If

End If

End Sub

Je vous remercie d'avance

Bonjour

Cordialement

cc,

merci pour la reponse !

voici un exemple de fichier

12essais.xls (17.00 Ko)
31-copie-2.xls (16.00 Ko)
41-copie-3.xls (16.00 Ko)
111-copie-4.xls (16.00 Ko)

Re,

A quoi servent les fichiers 2, 3 et 4 ??? ils sont vides

Concernant le fichier Essai, il y a une liste de 19 chiffres en colonne A.

Merci de donner plus d'explications sur ce que vous cherchez à faire à partir de ces données

Dans votre code vous mettez une donnée en C3 sur base de la liste en colonne A ? Si oui, vous voulez faire quoi ensuite ?

Cordialement

Rechercher des sujets similaires à "liste deroulante renvoie fichier correspondante"