XL 2010 creation d un tableau recapitulatif a partir de plusieurs onglets

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 !

laurent p

XLDnaute Nouveau
Bonjour,
j ai un classeur excel avec une multitude d onglet et je voudrai créer un onglet recapitulatif pour récuperer dans chaque onglet des valeurs se trouvant dans des cellules identiques ( exemple la cellule U24 de la feuille 1 puis celle de la feuille 2 etc...)
pouvez vous m aider
 
Bonjour à toutes et à tous.

Bienvenue sur XLD, laurentp.

Un essai avec le code suivant, après avoir inséré un onglet nommé "Récapitulatif" :
VB:
Option Explicit
Sub U24_récapituler()
    Dim o As Object
    With Sheets("Récapitulatif")
        .Columns(1).Clear
        .Range("a1") = "Récapitulatif"
        For Each o In Worksheets
            If o.Name <> "Récapitulatif" Then
                With Worksheets("Récapitulatif").Range("a" & Rows.Count).End(xlUp)(2)
                    .Value = o.Range("u24").Value
                End With
            End If
        Next
        .Activate
    End With
End Sub
A bientôt 🙂
 
Option Explicit
Sub
U24_récapituler()
Dim o As Object
With Sheets("Récapitulatif")
.Columns(1).Clear
.Range("a1") = "Récapitulatif"
For Each o In Worksheets
If o.Name <> "Récapitulatif" Then
With Worksheets("Récapitulatif").Range("a" & Rows.Count).End(xlUp)(2)
.Value = o.Range("u24").Value
End With
End If
Next
.Activate
End With
End
Sub
Merci il faut donc que je me mette sérieusement à l anglais. merci beaucoup je vais me lancer
 
- 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
5
Affichages
472
Réponses
0
Affichages
478
Réponses
3
Affichages
470
Retour