T terry08200 XLDnaute Nouveau 11 Novembre 2021 #1 Bonjour à tous, Je ne sais pas si mon problème vient de mon code ou de ma configuration mais je commence à douter ... sur ma feuille 1 il y a des valeurs en O1, O2 jusque O10 mais quand je fais la somme des ces valeurs avec excel donc Code: =SOMME(O1:O10) j'obtiens 8,7 Quand je fais la même chose avec VBA j'obtiens 9,00 Je cherche une solution sur internet, mais quelle est la bonne ? Car après tentative des divers méthode, j'échoue. Voici ma dernière tentative, sachant que je vais adapter cela à un autre fichier qui à le même problème. VB: Sub toto() Dim toto As Long toto = Application.Sum(Feuil1.Range("O1:O10").Value) [P1] = toto End Sub Merci par avance.
Bonjour à tous, Je ne sais pas si mon problème vient de mon code ou de ma configuration mais je commence à douter ... sur ma feuille 1 il y a des valeurs en O1, O2 jusque O10 mais quand je fais la somme des ces valeurs avec excel donc Code: =SOMME(O1:O10) j'obtiens 8,7 Quand je fais la même chose avec VBA j'obtiens 9,00 Je cherche une solution sur internet, mais quelle est la bonne ? Car après tentative des divers méthode, j'échoue. Voici ma dernière tentative, sachant que je vais adapter cela à un autre fichier qui à le même problème. VB: Sub toto() Dim toto As Long toto = Application.Sum(Feuil1.Range("O1:O10").Value) [P1] = toto End Sub Merci par avance.
Wayki XLDnaute Impliqué 11 Novembre 2021 #2 Bonjour, Sans fichier nous ne pouvons t'aider. Tu peux déjà faire un raccourci en mettant [P1] = application.sum(etc...) et enlever ta variable toto. A + Dernière édition: 11 Novembre 2021 Vote positif 0 Vote négatif
Bonjour, Sans fichier nous ne pouvons t'aider. Tu peux déjà faire un raccourci en mettant [P1] = application.sum(etc...) et enlever ta variable toto. A +
Chris401 XLDnaute Accro 11 Novembre 2021 #3 Bonsoir Modifie ta variable VB: Dim toto As Single Vote positif 0 Vote négatif Solution
T terry08200 XLDnaute Nouveau 15 Novembre 2021 #4 Chris401 à dit: Bonsoir Modifie ta variable VB: Dim toto As Single Cliquez pour agrandir... bonjour, J'étais en weekend, je vais tester cela ce soir. Merci !! Vote positif 0 Vote négatif
Chris401 à dit: Bonsoir Modifie ta variable VB: Dim toto As Single Cliquez pour agrandir... bonjour, J'étais en weekend, je vais tester cela ce soir. Merci !!
T terry08200 XLDnaute Nouveau 15 Novembre 2021 #5 Chris401 à dit: Bonsoir Modifie ta variable VB: Dim toto As Single Cliquez pour agrandir... C'est parfait !!!!! Vote positif 0 Vote négatif
Chris401 à dit: Bonsoir Modifie ta variable VB: Dim toto As Single Cliquez pour agrandir... C'est parfait !!!!!