Macro en Excel

[invitea9e36f4d]

Bonjour,
Je veux créer un tableau sous Excel qui continent plusieurs lignes et ajouter un bouton lie à une Macro qui fait plusieurs taches :
1) Faire la somme de deux colonnes (C et D) pour chaque ligne.
2) Afficher le résultat en colonne E.
3) Remplacer la valeur précédente dans C par la valeur de E et mettre la colonne D à zéro.
4) En cas ou la valeur de la colonne E >= 14 afficher un message.
Alors, j’ai arrivé à faire la somme pour une seule ligne par les commandes suivantes :
Sub test()
Range("E2").Select
ActiveCell.FormulaR1C1 = "=SUM(RC[-2],RC[-1])"
End Sub
Mais, lorsque je veux l’appliquer sur les autres lignes ça marche pas et je n’arrive pas à faire les autres taches, et est ce que vous pouvez m’aider à réaliser ce simple projet ?
Merci en avance.
-----

[invite948b37db]

Bonjour,
Je veux créer un tableau sous Excel qui continent plusieurs lignes et ajouter un bouton lie à une Macro qui fait plusieurs taches :
1) Faire la somme de deux colonnes (C et D) pour chaque ligne.
2) Afficher le résultat en colonne E.

Ce serait beaucoup plus efficace avec des fonctions

3) Remplacer la valeur précédente dans C par la valeur de E et mettre la colonne D à zéro.

Heu, comprends pas trop la manip ?

Alors, j’ai arrivé à faire la somme pour une seule ligne par les commandes suivantes :
Sub test()
Range("E2").Select
ActiveCell.FormulaR1C1 = "=SUM(RC[-2],RC[-1])"
End Sub
Mais, lorsque je veux l’appliquer sur les autres lignes ça marche pas et je n’arrive pas à faire les autres taches, et est ce que vous pouvez m’aider à réaliser ce simple projet ?

Sub test()
     Range("E2").Select
     do While Cells(0,-1).value<>"" and Cells(0,-2).value<>"" 
          ActiveCell.FormulaR1C1 = "=SUM(RC[-2],RC[-1])"
          cells(1,0).select
     loop
End Sub