Bonjour,
J'aimerais trouver une macro pour ne pas avoir à entrer une formule dans chaque feuille de calcul.
J'ai essayé plusieurs écritures qui ne fonctionnent pas. Voilà le problème :
La valeur de la cellule AA40(fusionnée jusque AG40) de ma 1ère feuille doit être = à la cellule T40 de cette même feuille.
Pour toutes les autres feuilles il faudrait que AA40 = T40 (de la même feuille) + AA40 de la feuille précédente.
En résumé la cellule T40 est cumulée de feuille en feuille en AA40.
J'en suis restée à cette dernière écriture sans succès, avec les neurones qui s'échauffent et s'emmêlent.
Pourriez-vous m'aider ?
J'aimerais trouver une macro pour ne pas avoir à entrer une formule dans chaque feuille de calcul.
J'ai essayé plusieurs écritures qui ne fonctionnent pas. Voilà le problème :
La valeur de la cellule AA40(fusionnée jusque AG40) de ma 1ère feuille doit être = à la cellule T40 de cette même feuille.
Pour toutes les autres feuilles il faudrait que AA40 = T40 (de la même feuille) + AA40 de la feuille précédente.
En résumé la cellule T40 est cumulée de feuille en feuille en AA40.
J'en suis restée à cette dernière écriture sans succès, avec les neurones qui s'échauffent et s'emmêlent.
For Each Sheet In Worksheets
If Sheet.Index = 1 Then
Range("AA40:AG40").Select
ActiveCell.FormulaR1C1 = "=RC[-7]"
Else
ActiveSheets.Select
Range("AA40:AG40").Select
ActiveCell.FormulaR1C1 = "=SUM('ActiveSheet.previous.Name'!RC:RC[6],RC[-7])"
End If
Next Sheet
Pourriez-vous m'aider ?