Calcul somme de plusieurs onglets

Bonjour,

Mon soucis est le suivant:

j'ai une feuille excel, mon premier onglet "Récap" est un récapitulatif des noms de mes onglets ente l'onglet Début et l'onglet fin (Bien entendu dans l'exemple, il y en a deux mais, ça sera variable).

J'aimerais récupérer la somme de tous mes onglets entre Début et Fin afin de les placer dans mon onglet "Récap"

J'espère m'être bien fais comprendre

En vous remerciant

bonjour,

une proposition

Sub aargh()
    With Sheets("récap")
        k = 1
        For i = Worksheets("début").Index + 1 To Worksheets("fin").Index - 1
            k = k + 1
            .Cells(k, 1) = Sheets(i).Name
            .Cells(k, 2) = Sheets(i).Range("C2")
        Next i
    End With
End Sub

Bonjour h2so4,

Merci de votre aide

C'est super niquel, j'ai essayé et sais exactement cela

J'ai quasi tous compris le code

hormis une ou deux truc, pourriez-vous m'expliquer, svp (est-ce que le détail avec mes mots, pardon, et plus au moins juste) afin que je comprenne bien votre code

With Sheets("récap")
k = 1 'le 1 est la première celule ou ce trouve le même nom de l'onglet
For i = Worksheets("début").Index + 1 To Worksheets("fin").Index - 1 'ouvre est prend en considération tous entre début et fin
k = k + 1 '+1 il va rechercher la deuxième celule et ainsi de suite
.Cells(k, 1) = Sheets(i).Name 'ouvre l'onglet de la cellule
.Cells(k, 2) = Sheets(i).Range("C2") 'récupére le montant "C2" de la celule
Next i
End With

En vous remerciant de votre temps à mon soucis

bonjour,

With Sheets("récap") 'toutes les méthodes, propriétés ou objets qui sont précédés d'un point appartiennent à la feuille récap.
        k = 1 ' k est le pointeur de ligne qui sera utilisé pour écrire sur la feuille récap
        For i = Worksheets("début").Index + 1 To Worksheets("fin").Index - 1 ' prend en considération les index de feuilles que l'on trouve entre début et fin
            k = k + 1 'on pointe vers la ligne suivante de récap.
            .Cells(k, 1) = Sheets(i).Name 'on écrit le nom de l'onglet de numéro d'index i sur récap en ligne k, colonne 1
            .Cells(k, 2) = Sheets(i).Range("C2") 'on écrit le montant trouvé en C2 de la feuille d'index i sur la feuille récap en ligne k, colonne 2
        Next i
    End With

Bonsoir h2so4,

Je vous remercie pour le développement détaillé

Je m'étais un peu trompé

Je le comprends beaucoup mieux

Encore merci pour votre aide