Copier une feuille et lui attribuer un nom : possible en 1 seule instruction ?

Paritec

XLDnaute Barbatruc

• 26 Septembre 2014

• #2

Re : Copier une feuille et lui attribuer un nom : possible en 1 seule instruction ?

Bonjour Sebast le forum
ton fichier en retour
a+
Papou😱

 

Pièces jointes

• Sebast V1.xlsm

  31.9 KB · Affichages: 24

Vote positif 0 Vote négatif

S

Sebast

XLDnaute Impliqué

• 26 Septembre 2014

• #3

Re : Copier une feuille et lui attribuer un nom : possible en 1 seule instruction ?

Bonjour Paritec,

merci beaucoup pour ta solution qui fonctionne parfaitement.
Cependant, comme je ne connais pas nécessairement la position de la feuille "Base", je préfère ne pas utiliser le numéro (ici Feuil1.Copy ...).

Je me suis inspiré de ton code : ma syntaxe était foireuse ...
La bonne instruction est donc :

Code:

Worksheets("Base").Copy after:=Sheets(Sheets.Count): ActiveSheet.Name = "Copie Base"

Encore merci de m'avoir ouvert les yeux sur mon erreur

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 26 Septembre 2014

• #4

Re : Copier une feuille et lui attribuer un nom : possible en 1 seule instruction ?

Bonjour ,
Juste pour chipoter ,
si je compte bien , y'a 2 instructions , même s'il n'y a qu'une ligne

 

Vote positif 0 Vote négatif

S

Sebast

XLDnaute Impliqué

• 26 Septembre 2014

• #5

Re : Copier une feuille et lui attribuer un nom : possible en 1 seule instruction ?

Bonjour,

tu as effectivement raison, je m'étais mal exprimé.
En fait c'était implicite (peut-être que dans mon esprit !) : je voulais surtout éviter d'utiliser un activate avant de renommer.

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 26 Septembre 2014

• #6

Re : Copier une feuille et lui attribuer un nom : possible en 1 seule instruction ?

Re Bonjour Sebast Nono😱
effectivement là tu chipotes, mais tu as vu j'ai répondu sur une ligne !!!!
a+
Papou😱

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 26 Septembre 2014

• #7

Re : Copier une feuille et lui attribuer un nom : possible en 1 seule instruction ?

Allez ,

juste pour la forme ,

une solution :

Sheets.Add.Name = "Feuille_du_Jour"

Oups , me suis emballé un peu , l à c'était pas la question , Dsl

 

Dernière édition: 26 Septembre 2014

Vote positif 0 Vote négatif