Variable VBA nom fichier ouvert
Résolu
varin
-
varin -
varin -
Bonjour,
J'effectue des Copier-Coller d'un fichier vers l'autre.
Deux fenêtres sont ouvertes avec mon fichier et un autre fichier (*Export) dont le nom est toujours différent.
Je cherche à l'aide d'une macro à déclarer en variable le nom du deuxième fichier ouvert qui est toujours différent pour insérer cette variable dans la macro.
Actuellement la macro fonctionne avec le nom du fichier différent en dur.
Dim Nom_Fichier_Export As Variant
Sub Transfert()
Nom_Fichier_Export = "14-20000 Export.xlsx"
Windows(Nom_Fichier_Export).Activate
Sheets("Ouvrage").Select
Range("M2").Select
End Sub
Je vous remercie beaucoup pour votre aide éventuelle.
J'effectue des Copier-Coller d'un fichier vers l'autre.
Deux fenêtres sont ouvertes avec mon fichier et un autre fichier (*Export) dont le nom est toujours différent.
Je cherche à l'aide d'une macro à déclarer en variable le nom du deuxième fichier ouvert qui est toujours différent pour insérer cette variable dans la macro.
Actuellement la macro fonctionne avec le nom du fichier différent en dur.
Dim Nom_Fichier_Export As Variant
Sub Transfert()
Nom_Fichier_Export = "14-20000 Export.xlsx"
Windows(Nom_Fichier_Export).Activate
Sheets("Ouvrage").Select
Range("M2").Select
End Sub
Je vous remercie beaucoup pour votre aide éventuelle.
8 réponses
-
Bonjour,
un autre fichier (*Export) ---> vous l'ouvrez comment: par du VBA, manuellement ????? -
Bonjour,
Le fichier *Export sera ouvert manuellement par les utilisateurs.
Merci de votre aide -
Bonjour,
Il faudrait prevoir a ouvrir le fichier "export" par le VBA avec une boite a dialogue ouvrir fichier pour choisir le fichier a ouvrir.
Que pensez vous de la chose ???? -
Ce n'est pas possible, les fichiers export ont des noms différents et proviennent de diverses sources.
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Re,
Oui, mais ils sont bien dans un repertoire -
Non ces fichiers sont nomades et sur les clés des utilisateurs.
Dans la macro, j'ai récupéré le nom du fichier export ouvert et je l'ai collé dans une cellule de mon fichier.
Je chercher maintenant la méthode pour coller ce nom de fichier (figurant dans une cellule de mon fichier) dans la macro à l'emplacement suivant :
Nom_Fichier_Export ="xxxxxxxxxxxxx.xlsx"
Merci -
Re,
Non ces fichiers sont nomades et sur les clés des utilisateurs. Bonjour les virus
adaptez le nom de feuille et la celluleNom_Fichier_Export =Worksheets("feuil1").Range("A1")
ou si vous avez recupere le nom de fichier par votre macro, ecrivez directement Nom_Fichier_Export -
J'avais déclaré la variable du nom du fichier "As Workbook" donc elle ne fonctionnait pas.
Je l'ai maintenant déclarée "As Variant" pour ouvrir la fenêtre du fichier Export et tout fonctionne.
Merci pour votre aide.
