Insertion feuille automatique

[BRUNO62]

Bonjour,

J'ai besoin d'aide, voir fichier joint
je souhaite à chaque fois qu'il y a une insertion de feuille copier les formules de la feuille XX Colonne G2 vers celle-ci
En feuille 1 le code ????
Avez vous une idée ?
Merci, d'avance
Bon dimanche A+

 

[Dormeur74]

Re : Insertion feuille automatique

Pas bien compris le besoin. Si on créée une feuille YY que doit-on voir exactement dedans ? Uniquement la colonne G ?

 

[BRUNO62]

Re : Insertion feuille automatique

Bonsoir Dormeur74,
Oui, c'est exactement cela.
A chaque fois qu'il y a une insertion de feuille, je copie les formules de la feuille XX Colonne G2 vers la nouvelle feuille
a+

 

[BRUNO62]

Re : Insertion feuille automatique

Bonsoir,

La solution est trouvée, j'ai utilisé le Post
Re : Insérer une date de dernière mise à jour par onglet dans l'en-tête de page.
23/12/2010*18h15
phlaurent55*
Encore Merci, phlaurent55*
A+

 

[Dormeur74]

Re : Insertion feuille automatique

tu peux aussi utiliser l'événement Workbook_NewSheet :

Private Sub Workbook_NewSheet(ByVal Sh As Object)
    Sheets("XX").Select
    Columns("G:G").Select
    Selection.Copy
    Sheets(Sh.Name).Select
    Columns("G:G").Select
    ActiveSheet.Paste
End Sub