renommer onglet

O

Orodreth

XLDnaute Impliqué

• 13 Février 2008

• #2

Re : renommer onglet

bonjour

Vois si cela te convient:

Code:

Sub copie_onglet()

' copie_onglet Macro

Sheets("matrice").Select

ActiveSheet.Buttons.Add(399.75, 14.25, 83.25, 64.5).Select

Sheets("matrice").Copy Before:=Sheets(2)

Sheets("matrice (2)").Select

Dim NomOnglet as string
NomOnglet = inputbox ("entrez un numéro svp")

Sheets("matrice (2)").Name = NomOnglet

Range("A1").Select
End Sub

Cordialement,
thomas

 

Vote positif 0 Vote négatif

A

al1000

XLDnaute Impliqué

• 13 Février 2008

• #3

Re : renommer onglet

bonjour,


merci


genial


a+

 

Vote positif 0 Vote négatif

O

Orodreth

XLDnaute Impliqué

• 13 Février 2008

• #4

Re : renommer onglet

de rien, un plaisir

 

Vote positif 0 Vote négatif

A

al1000

XLDnaute Impliqué

• 14 Février 2008

• #5

Re : renommer onglet

Bonjour,

Un petit conseil:

comment modifier la macro pour copier l'onglet en dernier

j ai essayé after

a+

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 14 Février 2008

• #6

Re : renommer onglet

bonjour,

sheets.count te renvoie le nombre de feuilles du classeur,
donc:
Sheets("matrice").Copy after:=Sheets(sheets.count))
à tester ...

 

Vote positif 0 Vote négatif

A

al1000

XLDnaute Impliqué

• 14 Février 2008

• #7

Re : renommer onglet

Bonjour,

merci

 

Vote positif 0 Vote négatif