Additionner plusieurs cellules sur page différentes

Bonjour,

j'ai un fichier excel avec pas pas mal d'onglet, il sont nommé comme suit

greg g

cédric t

maxime d

gerrard f

etc...

sur chacune des feuilles il y a un listing de choses avec à chaque fois un TOTAL à la cellule C34

Comment faire pour que je puisse avoir un TOTAL générale de toutes les cellule C34 de chaque feuilles?

A savoir que j'en ajoute régulièrement, donc il faudrait une formule qui puisse prendre en compte que chaque fois que j'ajoute un onglet, il ajoute cette onglet à mon total.

je suis très très num en excel

mercipour votre aide

Bonjour le forum,

Voir le fichier joint.

71indirect.xlsx (12.24 Ko)

ouff merci d'avoir pris du temps pour moi c'est super gentil !!

par contre est ce que c'est possible de faire en sorte que lorsque j'ajoute un onglet il s'ajoute sur l'onglet RECAP, là ce serait le TOP

merci!!!

est ce possible?

merci

Bonjour,

Merci de joindre un fichier à ta demande.

Cdlt.

Bonjour et merci pour votre réponse, en exemple je vais prendre le fichier de mbbp , le voici annexe

25indirect.xlsx (12.24 Ko)

donc il y a un onglet RECAP

j'aimerai lorsque j'atoute un nouvel onglet, qu'il vienne s'ajouter en à la suite des autre sans devoir le faire manuellement..

d'avance je vous remercie!!!

Bonjour,

Une proposition à étudier.

Les données sont sous forme de tableau et le total calculé en dernière ligne.

A tester à l'usage (insertion nouvelle feuille et valeur en C34 et activer la feuille Recap).

Cdlt.

21indirect.xlsm (26.92 Ko)
Private Sub Worksheet_Activate()
Dim ws As Worksheet
Dim lo As listobject
Dim rng As Range
Dim lr As ListRow
Dim x As Double
    Set lo = Me.ListObjects(1)
    Set rng = lo.ListColumns(1).DataBodyRange
    For Each ws In ActiveWorkbook.Worksheets
        If ws.Name <> Me.Name Then
            On Error Resume Next
            x = Application.Match(ws.Name, rng, 0)
            If Err.Number <> 0 Then
                Err.Clear
                Set lr = lo.ListRows.Add
                lr.Range.Cells(1, 1).Value = ws.Name
            End If
        End If
    Next ws
End Sub

euhh je vous suis pas là j'ai ouvert votre fichier que dois je faire ensuite sorry

Re,

A tester à l'usage (insertion nouvelle feuille et valeur en C34 et activer la feuille Recap).

PArfait merci!!!!!!!!!!!

Rechercher des sujets similaires à "additionner page differentes"