Inserer colonne chaque fois je copie un nouvel onglet

bonjour

je cherche un code qui insere une colonne dans une feuille "statistique" chaque fois ou je fais une copie d'une feuille

exemple: j'ai une feuille nommé 2018 je fais une copie 2018(1) je la nomme 2019 et du coup dans une autre feuille nommé "statistique" .. une colonne s’insère dans un tableau nommé 2019

mercii pour votre aide

Bonjour,

Sans fichier sur lequel travailler ...

Une ébauche ...

Private Sub Worksheet_Activate()
Dim NbF, NbCol As Integer

NbCol = Cells(1, Columns.Count).End(xlToLeft).Column
NbF = ThisWorkbook.Sheets.Count

If NbCol < NbF Then Columns(NbCol + 1).Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

End Sub

ric

ca pas marché

en fait le but que chaque fois je copie une feuille, une colonne s'insere dans le tableau

je vous joins mon fichier

Bonjour,

Good, je regarde cela.

ric

Bonjour,

En fait, il y a 3 endroits où il faut ajouter une colonne.

C'est plus compliqué (pour mon petit cerveau endommagé).

J'espère que je vais réussir.

ric

j'espere moi aussi xD

mais si tu réussi le premier c deja le top quoi

Salut mrregaieg,

voici un premier jet : tu cliques sur la croix dans la barre d'onglet pour créer une nouvelle feuille et la macro se charge du reste.

Il faudra compléter, évidemment...

Je n'aurai sans doute pas le temps ce WE : si quelqu'un veut prendre la main...

A+

merci sauf que j ai voulu que chaque fois je copie une feuil et non pas ajouter une avec la croix

Rechercher des sujets similaires à "inserer colonne chaque fois copie nouvel onglet"