Bonjour à tou(te)s
J’ai du mal à peaufiner ma macro, un pro pourrait-il m’aider ?
Tous les mois nous procédons aux mêmes manipulations :
- copier les données du mois d’un fichier source (même plage de données) - ce fichier comporte 24 feuilles (1 par mois de préparation et 1 par mois pour la copie)
- coller ces données sur d’autres fichiers de destinations - ces fichiers comportent 12 feuilles (1 par mois prête à recevoir la copie) - tous les fichiers de destinations ont la même configuration et les mêmes noms de feulles (Janvier 2023, Février 2023…)
Nous filtrons uniquement sur une colonne du fichier source pour copier et coller les bonnes données dans les bons fichiers - la plage de copie reste identique à tous les fichiers. Il peut arriver qu’un fichier de destination ne soit plus concerné le mois suivant par cette manipulation.
Voici ce que j’aimerai écrire dans mon code :
Créer un fichier dédié à la macro pour ne l’utiliser que mensuellement sans alourdir les fichiers concernés
Copier dans la plage A2:A4 de ma macro le premier élément et ouvrir dans le dossier des fichiers de destination le fichier excel dont le nom comporte l’élément copié mais si cet élément contient « (plus) » alors passer à l’élément suivant de la plage A2:A4
Si une boite de dialogue s’affiche à l’ouverture du fichier alors cliquer sur « Mettre à jour » sinon continuer
Ouvrir le fichier source dans le dossier du fichier source
Copier dans la plage B2:B4 de la macro le premier élément mais si cet élément contient « (plus) » passer à l’élément suivant de la plage B2:B4
Filtrer dans la cellule H2 de la feuille du mois concerné du fichier source par l’élément copié dans la plage B2:B4 puis OK
Si le filtre est vide, fermer le fichier de l’élément copié dans la plage A2:A4 et recommencer
Sinon copier toutes les lignes non vides de la plage A:V à partir de la ligne 2
Coller ces lignes dans la cellule A5 de la feuille du mois concerné du fichier excel ouvert de l’élément copié dans la liste A2:A4
Se positionner sur O6, écrire « = » en début de formule puis Entrer
Faire glisser la formule de la cellule O6 jusqu’à la dernière ligne non vide
Enregistrer et fermer ce fichier
Recommencer ainsi jusqu’au dernier élément de la liste A2:A4 et à la fin afficher dans une boite de dialogue « Les tableaux fournisseurs ont été complétés »
J’espère avoir été claire dans mes propos, n’hésitez pas à m’indiquer si une zone de flou persiste.
Merci pour votre temps !