XL 2019 copier coller TOUT une feuille de calcul dans un nouvel onglet evec nouveau nom

[Tarrain]

Bonjour

J'ai une feuiile calcul ou je vais mettre un bouton qui sera associé à une macro qui me permettra de copier Toute cette feuille de calcul (formule style macro...) sur un onglet à la suite de celui-là en incrémentant le nom de l'onglet - ma feuille actuelle a copier sera par exmeple 1 et la nouvelle 2 et ainsi de suite.

Pouvez vous m'aider pour cette macro

Merci à vous

 

[WTF]

Bonjour Tarrain,
Pas facile de t'aider sans fichier exemple.
Où veux tu coller tes données, comment renommer le nom de l'onglet, ...

 

[job75]

Bonjour Tarrain, WTF,

A placer dans un module standard et à affecter au bouton :

Sub Nouvel_onglet()
ActiveSheet.Copy After:=ActiveSheet
ActiveSheet.Name = Val(Sheets(ActiveSheet.Index - 1).Name) + 1
End Sub

A+

 

[Hasco]

bonjour,

Un moyen sans macro : cliquer sur l'onglet de la feuille (son nom en bas) + touche contrôle et déplacement de la feuille. Cela donne une copie numérotée de la feuille

Cordialement

 

[Tarrain]

Bonjour Tarrain, WTF,

A placer dans un module standard et à affecter au bouton :

Sub Nouvel_onglet()
ActiveSheet.Copy After:=ActiveSheet
ActiveSheet.Name = Val(Sheets(ActiveSheet.Index - 1).Name) + 1
End Sub

A+

 

[Tarrain]

Super MERCI BEAUCOUP nickel