Macro avec chemin de fichier

  • Initiateur de la discussion Initiateur de la discussion bloublou
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

bloublou

XLDnaute Occasionnel
Bonjour à tous,

J’ai regardé dans pas mal de forums et de tutoriels mais en fait svt je ne comprends pas les mots clés utilisés, pouvez vous m’aider à faire une macro ? 🙂


Je voudrais créer une macro qui me permette de faire un copier coller valeurs et formats de 11 fichiers « maitre » dans 11 nouveaux classeurs. 🙂
Jusque là ca va mais le chemin change tous les mois : P07..P08..P09.

Pour pallier à cet inconvénient, j’avais pensé me positionner directement dans le fichier et lancer la macro à ce moment là comme ca Excel ne se serait pas occupé du chemin à trouver…

Seulement j’ai un dossier ou il y a 50 fichiers et seulement 11 fichiers qui m’intéresse. Ces 11 fichiers commencent tous par HFM-…

Dans ces 11 fichiers, c’est l’onglet ordersforecast dont je veux faire un copier / coller dans 11 nouveaux classeurs.

Le chemin est : F:\11lymulti\HFM\P07\POR\HFM-19FR025LP07.xlsm ou il y a 11 fichier de même type


1) Ouvrir le fichier HFM-19FR025LP07.xlsm
2) Se positionner sur la feuille ordersforecast
3) Copier
4) Ouvrir nouveau classeur
5) Coller Valeurs & Formats
6) Enregistrer le nouveau classeur dans F:\ 11lymulti\HFM\P07\POR\orderforecast ( nom du nouveau classeur = nom de la feuille & nom de l’ancien classeur & extension.xlsx : ordersforecast - HFM-19FR025LP07-xlsx
7) Revenir au classeur HFM-19FR025LP07.xlsm
8) Fermer sans enregistrer le classeur HFM-19FR025LP07.xlsm
9) Passer au classeur suivant qui se trouve dans le dossier du POR :

Comment faire pour qu’Excel n’ouvre et effectue le cop/coll que sur les fichiers qui commencent par HFM ? 😡
Et repète ainsi le cop/coller dans un autre classeur.

A part le 6) ou je ne sais pas trop faire le nom du classeur = nom de la feuille & nom de l’ancien classeur & extension.xlsx)
Et surtout le 9), le reste je peux me débrouiller :


J'ai déjà commencé à fair eun bout :

Sub OF()
'
' OF Macro
' copie colle l'onglet OF dans un nouveau classeur
'

'
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("ordersforecast").Select
Cells.Select
Selection.Copy 'copie la feuille orderforecast
Workbooks.Add 'rajoute un nouveau classeur


' fait un collage spécial & valeurs
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

'Choisit le chemin - correspond au point 6)
ChDir "F:\"
ActiveWorkbook.SaveAs Filename:="F:\ordersforecast-19FR0025.xlsx", FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False
ActiveWindow.Close
ActiveWindow.Close

End sub


Si vous avez d'autres idées ou toutes astuces, merci d'avance 🙂

ArnO
 
Re : Macro avec chemin de fichier

Bonjour,

J'ai quelquechose comme ça dans mes outils : on calcule le nom du fichier et le chemin à l'intérieur de la macro avec :
VB:
territoire = range("TERRITOIRE").Value
    codemois = range("Mois_courant").Value
    
ActiveWorkbook.SaveAs FileName:= _
        "G:\BSP_DASR\Sales_Excellence\BUs\Imagerie\Dom Tom\01 - Résultats\2011\Ville\" & territoire & ".xls" _

Cordialement
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
549
Réponses
9
Affichages
591
Réponses
5
Affichages
480
Retour