Microsoft 365 extraction de données vba

Créer une discussion
Répondre
  • Initiateur de la discussion Initiateur de la discussion Bob 31
  • 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 !

S'inscrire
B

Bob 31

XLDnaute Occasionnel
Bonjour,
je souhaite extraire depuis une trentaine de classeurs vers un classeur les données de personnes depuis une cellule pour chaque mois de l'année
Ces données me serviraient a calculer les moyennes mensuelles et également des moyennes au fil des mois de l'année pour chacune des personnes
En vous remerciant par avance pour votre aide
 
Solution
job75
Maintenant pour traiter uniquement les dossiers listés dans la feuille SANITAIRE utilisez cette macro :
VB: 
Sub Liste_Fichiers()
Dim annee$, chemin$, P As Range, fso As Object, lig&, dossier As Object, f As Object, fichier$, x$, col%
annee = ActiveSheet.Name
If Not annee Like "####" Then Exit Sub 'ne traite pas les autres feuilles
'chemin = "\\192.168.0.250\shared\drh\"
chemin = ThisWorkbook.Path & "\" 'plus facile pour tester
Set P = ActiveSheet.ListObjects(1).Range 'tableau structuré
Application.ScreenUpdating = False
P.Rows(2) = "" 'efface toute la ligne
Rows(P.Rows(3).Row & ":" & Rows.Count).Delete 'RAZ en dessous
Set fso = CreateObject("Scripting.FileSystemObject")
lig = 2
For Each dossier In fso.GetFolder(chemin).SubFolders...
Trier par date Trier par votes
merinos à dit:
Salut Chris,

Microsoft se démène pour créer un outil d'extraction et de transformation de données.

PowerQuery est juste GENIAL...

Mais certains préfèrent la spéléologie, avec lampe frontale, cordes de rappel et tout le toin-toin...

Visiblement ils sont toujours occupés à explorer les cavernes...

Bonne journée,

Merinos
Cliquez pour agrandir...
Eh oui...
Et je pense que l'erreur signalée mais non détaillée lundi était probablement la même que ces multiples échanges VBA reprochent : un manque de rigueur dans le nommage des onglets il me semble (les espaces en trop étant faciles à gérer dans PQ)
 
Vote positif 0 Vote négatif
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

S
  • Question Question
Microsoft 365 Consolider des données de plusieurs feuilles
Réponses
2
Affichages
132
Sissou71
S
S
  • Question Question
Microsoft 365 Extraction de données sans doublon très complexe
Réponses
14
Affichages
632
stephvico
S
F
  • Résolu(e)
XL 2019 Power Query - Importer plusieurs sources de données Excel en 1 seul fois
Réponses
3
Affichages
74
wDog66
wDog66
J
  • Résolu(e)
Microsoft 365 PQ toujours : je butte sur des problèmes de base : moyenne, mini et maxi
Réponses
2
Affichages
248
José FELIX
J
Syracoti
  • Question Question
XL 2021 Automatisation Extraction de données et de sommes
Réponses
1
Affichages
78
chris
chris
T
  • Résolu(e)
Microsoft 365 Exporter les plages nommées vers un nouveau classeur - plage nommée invalide selon VBA
Réponses
2
Affichages
151
tnion
T
E
  • Question Question
Microsoft 365 Tableau de notation
Réponses
0
Affichages
523
Egypto95
E
V
  • Résolu(e)
Microsoft 365 Problème de soustraction d'heures
Réponses
3
Affichages
104
vincenot
V
H
  • Question Question
Power Query Récupérer des données multiples dans un dossier
Réponses
9
Affichages
102
hijackfr
H
Caninge
  • Résolu(e)
XL 2019 Extraction de données dans une autre plage !
Réponses
6
Affichages
350
Caninge
Caninge
P
  • Question Question
XL 2016 Macro VBA remplissage tableau de synthèse % déchet ligne de production
Réponses
4
Affichages
84
vgendron
vgendron
O
  • Question Question
XL 2016 transférer les données d'un tableau brut, dans un autre format pour analyse.
Réponses
12
Affichages
265
ORL
O
bbb38
  • Résolu(e)
XL 2021 Apparition des lettres ou des chiffres lors de la frappe
Réponses
5
Affichages
213
TooFatBoy
TooFatBoy
O
  • Question Question
XL 2019 Formulaire vba pour filtrer les données
Réponses
7
Affichages
523
olivier1984
O
G
  • Question Question
XL 2021 création graphique type gantt
Réponses
5
Affichages
209
sylvanu
sylvanu
D
  • Résolu(e)
Microsoft 365 Remplissage colonne automatique dépendant d'un tableau
Réponses
7
Affichages
603
fanfan38
fanfan38
S
  • Question Question
XL 2019 Calculer dimanche de pâques puis insertion du 29 février
2
Réponses
26
Affichages
550
dysorthographie
dysorthographie
R
  • Question Question
XL 2019 Aide à la création d'un fichier de saisie et suivi des engagements budgétaires sous Excel
Réponses
2
Affichages
78
Royaulté
R
A
  • Question Question
XL 2021 Calculer le prorata d'un objectif en fonction de l'arrivée ou du départ du salarié
Réponses
4
Affichages
165
job75
job75
kaine
  • Question Question
Microsoft 365 Importer données depuis un lien web
Réponses
1
Affichages
276
gbinforme
G
Retour