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

Récapitulatif de feuilles excels dans une

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Juju89
  • 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
J

Juju89

XLDnaute Nouveau
Bonjour à tous,
je suis nouvelle sur ce genre de forum.. et commence dans les macros et VBA !
Du coup même après plusieurs essais (en reprenant des codes sur différents forums)
je n'ai jamais réussi à faire exactement ce que je voulais.

Je voudrai:
-rassembler tous les éléments de mon classeur (les données de toutes les feuilles) dans
une feuille récapitulative...
-commencer à copier à la 2eme ligne des différentes feuilles
-commencer à coller à la 2eme ligne de mon fichier "recap" pour laisser la 1ere ligne de titre
-avoir un "bouton" pour réactualiser ma feuille "recap" lorqu"il y a des changements dans les autres (ça je sais le faire !)

Toutes mes feuilles ont le même nombre de colonne ( 9 ) et un nombre de lignes différent et indéfini...
Par contre des feuilles peuvent se rajouter ou être éliminer: donc un nombre de feuilles non défini également.


J'espere avoir été claire... j'ai mis quelques données dans le fichier joint
Merci par avance
 

Pièces jointes

Trier par date Trier par votes
Re : Récapitulatif de feuilles excels dans une

Hello,

Une autre version... adaptée d'une idée de Doublezero, merci à elle !

À coller dans la feuille "Recap" avec un bouton.
Code: 
    Dim i As Long
    Dim tabloNomsFeuilles() As String
    
    Application.ScreenUpdating = False
    
    Sheets("Recap").[A1].CurrentRegion.Offset(1, 0).Clear
    
    For i = 1 To ActiveWorkbook.Sheets.Count
        ReDim tabloNomsFeuilles(1 To i)
        tabloNomsFeuilles(i) = Sheets(i).Name
        If Sheets(i).Name <> "Recap" Then
            Sheets(i).[A1].CurrentRegion.Offset(1, 0).Copy Sheets("Recap").[A65000].End(xlUp).Offset(1, 0)
        End If
    Next i

    Application.ScreenUpdating = True
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Récapitulatif de feuilles excels dans une

Merci à tous !

tous ce que vous m'avez donné fonctionne comme je le voulais.

Je vais maintenant essayer de le decripter pour bien comprendre...

Bonne journée et encore merci

Juju
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
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

C
  • Question Question
XL 2016 Récapitulatif de plusieurs feuilles sur un tableau (en fonction de dates)
Réponses
11
Affichages
150
job75
R
  • Question Question
XL 2010 Copier des lignes de données de plusieurs feuilles dans une seule
Réponses
6
Affichages
718
AtTheOne
E
  • Résolu(e)
Autres série de feuilles à incrémenter dans un tableau
Réponses
9
Affichages
164
Etienne
E
S
  • Question Question
XL 2013 Copier automatiquement des données dans plusieurs onglets
Réponses
4
Affichages
403
Phil69970
S
  • Question Question
Microsoft 365 Consolider des données de plusieurs feuilles
Réponses
2
Affichages
295
Sissou71
S
  • Question Question
Microsoft 365 Création automatique de feuille et le remplissage correspondant
Réponses
8
Affichages
286
gbinforme
G
  • Résolu(e)
Microsoft 365 rendre visible automatiquement l'onglet de la feuille active sur la barre de navigation inférieure
Réponses
11
Affichages
754
Eric 888
C
  • Question Question
Microsoft 365 macro copie de feuilles (avec formules à adapter)
Réponses
9
Affichages
292
caseras
C
  • Question Question
XL 2021 Remplissage de plusieurs cellules dans une colonne
Réponses
5
Affichages
159
AtTheOne
J
  • Résolu(e)
Microsoft 365 Impression groupée de plusieurs feuilles dans plusieurs onglets
2
Réponses
15
Affichages
565
Phil69970
C
  • Résolu(e)
XL 2016 Automatisation de l'alimentation des cellules de plusieurs feuilles Excel (Formules : Recherchev...)
Réponses
10
Affichages
255
micheldu52
S
  • Résolu(e)
XL 2016 copier des données d'une feuille à une autre selon critères et protection de la feuille 1
Réponses
6
Affichages
694
steph_29120
S
L
  • Question Question
Microsoft 365 Soustraction de plusieurs cellules sur plusieurs feuilles.
Réponses
1
Affichages
172
Staple1600
K
  • Question Question
XL 2010 copier le contenu de plusieurs feuilles sur une seule
Réponses
3
Affichages
235
sylvanu
  • Question Question
XL 2021 Déclaration de variables à partir d'une liste de noms
Réponses
8
Affichages
423
PMG
T
  • Question Question
XL 2013 Impression, choix de feuilles et nombre de copie
Réponses
11
Affichages
574
AtTheOne
P
  • Résolu(e)
Microsoft 365 Utiliser la même macro dans des feuilles différentes
2 3
Réponses
35
Affichages
861
cathodique
  • Question Question
Microsoft 365 Comment exporter certaines feuilles d'un classeur dans un nouveau classeur.
Réponses
2
Affichages
410
Jacky67
R
  • Question Question
XL 2010 Copie de données de plusieurs feuilles dans une seule
Réponses
5
Affichages
770
Renaud22
R
P
  • Question Question
XL 2016 Macro VBA remplissage tableau de synthèse % déchet ligne de production
Réponses
4
Affichages
266
vgendron
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…