Discussion :

[pite0611]

Bonjour,

Je souhaiterai créer un programme qui permettrait d’additionner des valeurs dans une colonne.

J'ai ecris le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Range("B1").Value = Application.Sum(Range("F1").EntireColumn)

Je souhaiterai qu'il m’exécute ce code mais dans la feuille 1 quand j'appuis sur un bouton en feuille 7

Pouvez-vous m'aider ?

Cordialement

[lucasgaetan]

bonjour,
précise où est ta cellule:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.Sheets("feuille 1").Range("B1").Value=Application.Sum(ThisWorkbook.Sheets("feuille 1").Range("F1").EntireColumn)

pour les 2 sont en feuille 1
a+