Insetion instructions à la création feuilles

[AL]

Bonjour le forum

Je coince sur un pb d' insertion, je m' explique, j' ai un bouton qui me permet de créer les 12 mois de l' Année (12 feuilles).
J' ai une colonne E qui contient les heures et je voudrais qu' à la création des feuilles que soit inserez sur la céllule E39 sur toute les feuiiles la foemule de la somme de (E7:E37)

Merci à celui qui me viendra en aide
AL

 

[Popeye]

Bonjour

dans le code de ton bouton rajoute simplement

Dim feuille As Worksheet
For Each feuille In Worksheets

feuille.Range("E39").FormulaR1C1 = "=SUM(R[-37]C:R[-2]C)"

Next

attention il copie la formule sur TOUTES les feuilles

 

[Pyrof]

Bonjour,

Une autre solution que j'utilise souvent.
Faire un onglets de base dans lequel tu fait tout tes calculs.

Et ta macro duplique cet onglet pour tes mois (ainsi toutes tes formules seront recopiées)


Bonne fin de journée

 

[AL]

Merci à vous deux, mais j' ai utilisé la solution de popeye et elle fonctionne très bien.

AL