Faire référence à une cellule fixe pour calcu

Fermé
vaness - 21 avril 2010 à 14:29
J'ai un tableau de type

A B C ...
1 6 Calcul Calcul
2 7 Calcul Calcul
3 1 Calcul Calcul

Je souhaiterai faire référence à la cellule A1 pour tous mes calculs de la ligne 1 puis arrivée à la fin de la ligne passer à la cellule B2 pour tous les calculs de la ligne 2 ainsi de suite.

Voilà ce que j'ai écrit mais je n'arrive pas à fixer la cellule.

Do
ActiveCell.FormulaR1C1 = "=Arrivée!R[-31]C-Départ!R[-31]C"
If ActiveCell = 0 And ActiveCell.Offset(0, -4) = 6 Then
ActiveCell = ""
End If
ActiveCell.Offset(0, 1).Activate
Loop Until ActiveCell = "s"

Merci à qui pourra m'éclairer