Macro Excel pour activer un fichier Excel à partir d'une cellule
zizou83200
Messages postés
1
Statut
Membre
-
Gyrus Messages postés 3360 Statut Membre -
Gyrus Messages postés 3360 Statut Membre -
Bonjour
Merci d'avance à tous pour votre future réponse.
Je vous explique mon cas.
J'ai un fichier qui doit copier des données vers un autre fichier mais comme le nom du fichier qui va recevoir la copie des données va changer tous les mois j'ai donc besoin d'une macro qui va activer le classeur en question à partir d'une cellule.
Ce la m'éviterai de changer le nom du fichier manuellement dans le code macro car il faudrait le changer au moins une trentaine de fois.
J'espère que vous pourrez m'aider.
Merci d'avance.
Cordialement.
Merci d'avance à tous pour votre future réponse.
Je vous explique mon cas.
J'ai un fichier qui doit copier des données vers un autre fichier mais comme le nom du fichier qui va recevoir la copie des données va changer tous les mois j'ai donc besoin d'une macro qui va activer le classeur en question à partir d'une cellule.
Ce la m'éviterai de changer le nom du fichier manuellement dans le code macro car il faudrait le changer au moins une trentaine de fois.
J'espère que vous pourrez m'aider.
Merci d'avance.
Cordialement.
A voir également:
- Macro Excel pour activer un fichier Excel à partir d'une cellule
- Liste déroulante excel - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Word et excel gratuit - Guide
- Fichier bin - Guide
- Déplacer une colonne excel - Guide
2 réponses
Bonjour
Ce la m'éviterai de changer le nom du fichier manuellement dans le code macro
Sans le code----> boule de cristal !
Ce la m'éviterai de changer le nom du fichier manuellement dans le code macro
Sans le code----> boule de cristal !
Bonjour zizou83200,
bonjour michel_m,
Un exemple de macro pour l'ouverture d'un fichier dont le nom est indiqué en A1 (nom + extension)
A+
bonjour michel_m,
Un exemple de macro pour l'ouverture d'un fichier dont le nom est indiqué en A1 (nom + extension)
Sub test()
Dim MonFichier As String, Chemin As String
Dim WbExcel As Workbook
MonFichier = Range("A1").Value 'Nom complet du fichier que tu veux ouvrir : "Classeur1.xls" par exemple
Chemin = "C:\Users\Toto\Documents\" 'le chemin où il se trouve
Set WbExcel = Workbooks.Open(Chemin & MonFichier)
MsgBox "Vous venez d'ouvrir le classeur " & WbExcel.Name
End Sub
A+
