Macro Excel pour remplissage automatique

Bonjour,

Je voudrais créer une macro sur excel pour automatiser le remplissage de fichier excel mais je suis novice dans ce domaine et je souhaiterai un peu d´aide

Ma requête est la suivante :

J´ai un fichier d´origine et je voudrais prendre 5 données de ce fichier et rajouter une ligne avec ces 5 données (appelons les A,B,C,D,E) dans plusieurs fichiers excel. Tous les fichiers réceptions sont présents dans un même dossier et les données sont copiées seulement dans les fichiers qui dans une de leurs cases ont la donnée A. Cette donnée A est aussi présente dans une des cases du fichier origine.

Auriez-vous quelques indications ou un début de code à me donner pour réussir à faire cela ?
Merci beaucoup

bonsoir
Je crois que c'est difficile de comprendre ta demande au moins pour moi ; débutant et autodidacte en VBA
mais si tu cherche à récupérer des données d'un dossier fermé voila un code commenté à adapter à tes besoins

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Sub importProdVte() Dim wkA As Workbook, wkB As Workbook Dim chemin As String, fichier As String Dim j As Long Application.ScreenUpdating = False ' arrêter l'affichage de l'écran pour gagner en temps d'exécution du code Set wkA = ThisWorkbook 'le fichier ouvert pour recevoir les données chemin = "Z:\TRAVAUX COMPTABLES BNA\Controle de Gestion\" 'adresse du dossier à ouvrir fichier = "RAPPORT JOURNALIER.xlsx" 'classeur à ouvrir Workbooks.Open chemin & fichier ' ouvrir le classeur Set wkB = ActiveWorkbook j = wkB.Sheets("Alf3").Range("A" & Rows.Count).End(xlUp).Row ' chercher la dernière cellule non vide de l'onglet ou se trouve les données wkA.Sheets("Feuil1").Range("C1:G" & j).Value = wkB.Sheets("Alf3").Range("D1:H" & j).Value ' copier les données     wkB.Close True ' fermer le classeur source Application.ScreenUpdating = True 'reprendre l'affichage arrêté si haut End Sub

---

J'espère que ça te donne un début de piste
BONNE CONTINUATION