Calcul entre plusieurs feuilles

Bonsoir. Je viens encore une fois vous demander de l’aide.

Calcul entre plusieurs feuilles sur condition, mais comme un exemple vaut mieux qu’un grand discourt, le voici..

Si quelqu’un peut m’aider, merci

Bonsoir, pas testé :

Private Sub CommandButton1_Click()
    Total = 0
    TextBox1.Value = ""
    If Me.OptionButton1.Value = True Then
        For i = 1 To Worksheets.Count
            If Right(Sheets(i).Name, 2) = "11" Then
                Total = Total + Sheets(i).Range("A1").Value
            End If
        Next i
    Else
        For i = 1 To Worksheets.Count
            If Right(Sheets(i).Name, 2) = "12" Then
                Total = Total + Sheets(i).Range("A1").Value
            End If
        Next i
    End If
    TextBox1.Value = Total
End Sub

vbMBHB

Ça marche à merveille.

Merci beaucoup

Merci

vbMBHB

Enfaite je viens de me rendre compte que ça ne vas pas, il faudrait que ça prenne en charge le nom de page genre « exemple_*_11»

Mon problème c’est que j’aurai des feuilles « Dupont_1_11 » , « Dupont_1_12» et « Marie_1_11 »

Et j’ai besoin de calculer par exemple juste celles de Dupont _..._11

Bon et bien regardez ce fichier :

vbMBHB

Rechercher des sujets similaires à "calcul entre feuilles"