Somme avec dernière ligne variable [RESOLU]

goldenboy

XLDnaute Occasionnel
Bonjour à tous,

Mon objectif est d'obtenir la somme d'une colonne dont le nombre de données peut varier.

Donc l'emplacement de cette somme doit également varier.

Voici un fichier test pour plus de compréhension.

Merci d'avance à vous tous pour vos réponses.
 

Pièces jointes

  • TEST-SOMME-VARIABLE.xls
    84 KB · Affichages: 34
  • TEST-SOMME-VARIABLE.xls
    84 KB · Affichages: 34
  • TEST-SOMME-VARIABLE.xls
    84 KB · Affichages: 39
Dernière édition:

goldenboy

XLDnaute Occasionnel
Re : Somme avec dernière ligne variable

Bonsoir,

Je viens de trouver tout seul en faite :

Code:
'==Ici, je souhaite mettre dans la dernière cellule, le résultat de la somme de la colonne B.

Range("b" & DLigne + 1).Select
somme1 = DLigne + 1 - DLigne - DLigne
somme2 = DLigne - DLigne - 1
MsgBox "Première ligne = " & somme1 & Chr(10) & Chr(10) & _
"Deuxième ligne = " & somme2

Selection.FormulaR1C1 = "=SUM(R[" & somme1 & "]C[]:R[" & somme2 & "]C[])"

Merci quand même.
 

Pièces jointes

  • TEST-SOMME-VARIABLE.xls
    84 KB · Affichages: 47
  • TEST-SOMME-VARIABLE.xls
    84 KB · Affichages: 30
  • TEST-SOMME-VARIABLE.xls
    84 KB · Affichages: 44
Dernière édition:

DoubleZero

XLDnaute Barbatruc
Re : Somme avec dernière ligne variable [RESOLU]

Bonjour, goldenboy, excfl, le Forum,

Le total peut également être obtenu ainsi :

Code:
Option Explicit
Sub Totaliser_B()
Range("b65536").End(xlUp).Offset(1, -1) = "total : "
Range("b65536").End(xlUp).Offset(1, 0) = Application.WorksheetFunction.Sum(Range("b:b"))
End Sub

A bientôt :)
 

DoubleZero

XLDnaute Barbatruc
Re : Somme avec dernière ligne variable [RESOLU]

Re-bonjour,

En attendant pour ceux qui ont un peu de curiosité : Le clip vidéo de mon groupe de Rock !!!

attachment.php


A bientôt :)
 

Pièces jointes

  • Bravo !.gif
    Bravo !.gif
    19.5 KB · Affichages: 73

Discussions similaires

Réponses
7
Affichages
334

Statistiques des forums

Discussions
312 438
Messages
2 088 421
Membres
103 847
dernier inscrit
Girardon