Microsoft 365 recuperer les données de plusieurs onglets

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

marcmarc

XLDnaute Junior
Bonjour le forum,

je souhaiterai dans mon fichier excel avoir récapitulatif de mes km dans un nouvel onglet unique,
c'est a dire de récupérer toutes les données de tous les onglets du fichier ou se trouve les deux lettres "KM" de l'onglet, attention car il y en a plusieurs onglets avec et sans le "KM"
de prendre les données utiles ( pas les cases vides) de chaque onglet, les cellules (jaunes) du tableau de (ai12:au36)
et de les recopier dans l'onglet unique et les trier par noms

La couleur jaune c'est pour montrer les données, sinon, pas besoin de couleur 🙂
Ainsi, j'aurais la liste complète de mes déplacement et le nombre total des km
pouvez vous m'aider a organiser mon fichier

en vous remerciant tous
bonne semaine à tout le monde
Marcmarc
 

Pièces jointes

Hello

un début de réponse ici:
VB:
Sub SynthKm()

Dim ws As Worksheet

For Each ws In ActiveWorkbook.Sheets
    If ws.Name Like "*km*" And ws.Name <> "Onglet unique" Then
        tabdata = ws.Range("AI12:AU36").Value
    
        fin = Sheets("Onglet unique").Range("B" & Rows.Count).End(xlUp).Row
        Sheets("Onglet unique").Range("B" & fin + 1).Resize(UBound(tabdata, 1), UBound(tabdata, 2)) = tabdata
    End If
Next ws
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
4
Affichages
109
Réponses
5
Affichages
337
Réponses
16
Affichages
821
Réponses
4
Affichages
163
Réponses
6
Affichages
690
Réponses
12
Affichages
619
Retour