Renommer des onglets

[tutur]

Bonjour,

Je souhaiterai pouvoir à l'aide d'une macro, modifier le nom de mes onglets en fonction de la cellule c1 de chaque onglet (nom onglet 1 = C1 onglet 1; nomonglet 2 =C1 onglet 2; etc...)
Est ce que c'est possible?

Merci par avance🙂

 

[Pierrot93]

Re : Renommer des onglets

Bonjour,

essaye ceci :

Sub test()
Dim ws As Worksheet
On Error Resume Next
For Each ws In worwsheets
    With ws
        .Name = .Range("C1")
    End With
Next ws
End Sub

bon après midi
@+