Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Récupérer données d'un fichier, vba ou recherchev ?

  • Initiateur de la discussion Initiateur de la discussion Barazouti
  • 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 !

Barazouti

XLDnaute Nouveau
Re-bonjour,

Deuxième topic pour moi aujourd'hui. L'envie d'apprendre ..

Je vais expliquer ma situation.

J'ai créé un fichier standardisé auquel je rempli exactement de la même façon.
Dans le bordereau au dessus des tableaux j'y intègre un nombre (toujours au même emplacement) suivant le moyen adapté.

Je dois faire un tableau récapitulatif de tous mes fichiers créer sur le même standard de cette ligne.
c'est à dire que j'ai besoin de récupérer les informations de la ligne 11 (nombre uniquement) associés au moyen de la ligne 10.

A part ouvrir les 150 fichiers un par un, je souhaiterais savoir s'il existait une méthode "intelligente" permettant de récupérer tout ça.

je vous mets les 2 fichiers.


Merci la compagnie
 

Pièces jointes

Bonjour
pour traiter toutes les feuilles d'un fichier standard, il suffit de modifier comme ceci
Sub deb()
chemin = ThisWorkbook.Path & "\"
fich = Dir(chemin)
While fich <> "" 'liste les fichiers du dossier
If fich <> ThisWorkbook.Name Then
Set f = Workbooks.Open(chemin & fich)
For Each feuille In f.Sheets
Call cherche(feuille) ' Traitement d'un fichier standard
Next
f.Close savechanges:=False
End If
fich = Dir()
Wend

End Sub
 
- 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
2
Affichages
381
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…