Discussion :

[meuah]

Bonjour,

Je suis actuellement en train de réaliser des calculs sur Excel, mais que je dois aller chercher des données qui se situent dans la feuille qui précéde ma feuille courante. En réalisant la macro, j'ai le code suivant :

Code :

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

  ActiveCell.FormulaR1C1 = "=RC[-4]+RC[-15]-'2001'!RC[-27]"

mais j'aimerais remplacer le '2001' par le code signifiant qu'il faut aller chercher les données dans la feuille précédente. Etant donné que je dois faire ça de 2001 à 2008 et que les données sont toujours situées dans les mêmes cases d'une feuille à une autre, serait-il possible de me fournir le code de remplacement s'il vous plait?
Merci d'avance

[ouskel'n'or]

Si tes feuilles se nomment "2001" à "2008", alors utilise le nom de la feuille Juste pour le principe

Code :

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

1
2
3
4
5
Sub Macro3()
For i = 2002 To 2008
    Worksheets(CStr(i)).Range("B1").FormulaR1C1 = "='" & CStr(i) & "'!RC[-1] -'" & CStr(i - 1) & "'!RC[-1]"
Next
End Sub

Mais n'utilise pas activecell, désigne la cellule dans laquelle tu veux placer la formule.
Je ne connais pas l'adresse de cette cellule mais j'ai testé ce que j'ai mis et si tu adaptes correctement, tu ne devrais pas avoir de pb.
J'ai volontairement commencé la boucle sur 2002 afin de ne pas avoir 2001 - 2000
A+

[meuah]

merci ouskelnor!

je vais tester!
_____________________________________________________________

ça fonctionne merci