Avec une macro ouvrir un fichier

HADORN

XLDnaute Nouveau
À partir de la valeur d'une cellule en exécutant une macro je veux aller ouvrir un fichier dont le nom est la valeur de cette cellule . Comment écrire la macro ?
 

Lolote83

XLDnaute Accro
Salut,
Avec l'enregistreur de macro, cela donnerait ceci.
Code:
Sub Ouvrir()
    xChemin = "Ton chemin"          'Sans \ à la fin
    xFichier = "Ta cellule"         '
    Workbooks.Open Filename:=xChemin & "\" & xFichier           'Si l'extention du fichier est indiqué dans Ta Cellule
    Workbooks.Open Filename:=xChemin & "\" & xFichier & ".xls"  'Si l'extention du fichier N'EST pas indiquée (a adapter)
End Sub
Il te faudra renseigner :
- le chemin complet ou se trouve le fichier (variable xChemin)
- le nom du fichier inscrit dans ta cellule (Attention, deux possibilités)
- Soit l'extention du fichier est inscrite en dur dans ta cellule (Exemple : toto.xlsx)
- Soit l'extention du fichier n'est pas inscrite (Exemple : toto) et dans ce cas il faut la rajouter dans le code. (Voir l'exemple du code)
@+ Lolote83
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas