XL 2013 calcul somme sur une feuille avec Range et cells

jojo2006 · 13 Juillet 2023

Bonjour à tous, j'ai un souci de syntaxe en VBA pour calculer une somme dans une plage de cellule mais en définissant le nom de la feuille , dans mon cas "data"

j'utilise cette syntaxe :

Sub calcul_somme()

Dim somme As Double

somme = Application.WorksheetFunction.Sum(Range(Cells(1, 1), Cells(5, 1))) ' ça fonctionne sur la feuil 1 !!! 🙂
somme = Application.WorksheetFunction.Sum(Sheets("data").Range(Cells(1, 1), Cells(5, 1))) ' ça fonctionne PAS !!! :-(

End Sub

merci d'avance pour votre aide

fanfan38 · 13 Juillet 2023

Bonjour
somme = Application.WorksheetFunction.Sum(Sheets("data").Range(Sheets("data").Cells(1, 1),Sheets("data"). Cells(5, 1)))
A+ François

jojo2006 · 13 Juillet 2023

c'est pour ça que j'adore ce forum !!!! c'est parfait
Merci Fanfan38 A+

olivier 76 · 31 Octobre 2023

bonjour a tous
je souhaite faire la même chose mais ma plage est variable.
je comence juste en vba.
merci de votre aide

Dim x As Integer
Dim somme As Double
Sheets("BDC_FR (2)").Select
x = Range("c1").Value + 6
somme = Application.WorksheetFunction.Sum(Sheets("BDC_FR (2)").Range(Sheets("BDC_FR (2)").Cells(7, 6), Sheets("BDC_FR (2)").Cells(7, x)))
Range("F" & (x + 1)) = somme

XL 2013 calcul somme sur une feuille avec Range et cells

jojo2006

XLDnaute Occasionnel

fanfan38

XLDnaute Barbatruc

jojo2006

XLDnaute Occasionnel

olivier 76

XLDnaute Nouveau

Discussions similaires

XL 2013 calcul somme sur une feuille avec Range et cells

jojo2006

XLDnaute Occasionnel

fanfan38

XLDnaute Barbatruc

jojo2006

XLDnaute Occasionnel

olivier 76

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency