Additionner

Résolu
Messages postés
110
Date d'inscription
lundi 27 mars 2006
Statut
Membre
Dernière intervention
21 octobre 2008
-
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
-
Bonjour je souhaite mettre dans la cellule N8 (feuille 4)le résultat de la somme B8 jusqu'à M8 (feuille4)

et voilà le code que j'ai ecrit
Sheets(4).Range("N8").Value = (WorksheetFunction.Sum("B8:M8"))

Quelqu'un peut me donner le code exact car là je sèche. Pas un pro du VB!!!!
Merci

1 réponse

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,

Essaie ceci
'Active la feuille d'indice 4
Worksheets(4).Activate 
'Selectionne la plage B8=>M8
ActiveSheet.Range("B8:M8").Select 
'Place le resultat de la somme de cette selection dans N8
ActiveSheet.Range("N8").Value = WorksheetFunction.Sum(Selection) 

 

<small> Coloration syntaxique automatique [AFCK]</small>
      

@+, Julien
Pensez: