Re : création de feuilles paramétrées avec conservation de présentation
salut!
oué, je te cache pas que c'est bizarre,de plus les graphiques sautent aussi.... sans les graphiques mon fichier n'a plus de valeur. je te les avais enlever pour alléger le fichier, je vais gratter vers d'autres post car la je ne vois pas.
il y a celui ci qui permet de dupliquer un onglet :
Sub AjoutFeuilles()
Dim NbOngletAjout As Integer
Dim PositionOnglet As Byte
PositionOnglet = 2
NbOngletAjout = InputBox("Combien de feuille(s) veux-tu insérer ?")
For i = 1 To NbOngletAjout
Sheets("N1").Copy After:=Sheets(PositionOnglet)
Sheets("N1 (2)").Name = "N" & i + 1
PositionOnglet = PositionOnglet + 1
Next i
End Sub
Ce code adapté a mon cas permet de duppliquer de facon correcte en terme de presentation mais lpas e nombre que je souhaite.
Il afut essayer de l'adapter avec notre code....