Discussion :

[leprogrammeur.vba]

Bonjour à tous je viens solliciter votre aide. J'ai un fichier Excel que je veux remplir à partir d'informations contenues dans plusieurs autres classeurs Excel. Je voudrais le faire donc à partir d'un macro. Les fichiers sont dans un dossier source de mon ordinateur et dont le chemin est C:\Users\amouedraogo\Documents\Cours .

Les fichiers sont nommés sous forme de dates et ces dates correspondent aux dates inscrites dans le classeur ''Tableau on devra copier la les valeurs des colonnes E, G et H en fonction des dates et du code symboles (colonne A).





C'est à dire pour les dates et les codes symboles du classeur ''Tableau synthèse'' feuille synthèse, ouvrir chacun des fichiers dans le répertoire C:\Users\amouedraogo\Documents\Cours , copier les valeurs des colonnes E, G et H et les coller dans la feuille ''Synthèse" du classeur "Tableau de synthèse''.



Je joins le fichier Excel à renseigner et les classeurs Excel (fichier .rar) contenant les données à copier :

Tableau de synthese V0.xlsx

Données de Janv à Fev.rar

[Trystan441]

Bonjour,

J'ai eu la même problématique à résoudre il y a quelques temps. J'utilise le code suivant pour ouvrir, piocher les infos dont j'ai besoin, et enfin fermer le fichier, puis rebelote :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Sub BoucleFichier
Dim Chemin As String, Fichier As String
 
'Définit le répertoire contenant les fichiers
Chemin = 'Le lien du répertoire
 
'Boucle sur tous les fichiers xls du répertoire.
Fichier = Dir(Chemin & "*.xlsx")
 
'Utilisez la syntaxe suivante pour boucler sur tous les types de fichiers:
'Fichier = Dir(Chemin & "*.*")
 
Do While Len(Fichier) > 0
 
    'Ouverture du fichier
    Workbooks.Open Filename:=Chemin & Fichier
 
'Procédure
'
'
'
        'Fermeture du fichier
        Workbooks(Fichier).Close
 
        Fichier = Dir()
 
Loop

Bonne journée à toi,

[leprogrammeur.vba]

Bonjour Trystan441 merci beaucoup pour ta réponse. J'ai essayé de coller le code et de changer les variables mais pour te dire vrai je ne m'y connais pas vraiment en programmation VBA. j'ai essayé d'adapter le code mais je me plante. Si tu peux bien m'aider stp

[Trystan441]

Pas de soucis, j'ai eu mal aux yeux aussi la première fois que j'ai vu ça !

Sur quelle ligne ça plante ?

[leprogrammeur.vba]

Pas de soucis, j'ai eu mal aux yeux aussi la première fois que j'ai vu ça !

Sur quelle ligne ça plante ?

C'est pas simple pour les novices

Déjà en collant le chemin il me montre un message d'erreur




'Procédure dans le code je suppose que je dois décrire ce que doit faire le macro une fois le fichier ouvert?


Merci!!

[clementmarcotte]

Bonjour,


Mets tes chemins d'accès entre guillemets

P.S. Presque personne n'ouvre les fichiers-joints.