Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Nom d'onglets

Nom d'onglets

2 réponses
Avatar
eis
Bonjour à tous
Comment renommer automatiquement tous les onglets de mon fichier en prenant
reprenant la valeur de leur cellule A1?
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Ellimac
Bonjour,

Sub Toto()
For Each f In ActiveWorkbook.Sheets
f.Activate
f.Name = f.Range("a1")
Next
End Sub

Camille

-----Message d'origine-----
Bonjour à tous
Comment renommer automatiquement tous les onglets de mon
fichier en prenant

reprenant la valeur de leur cellule A1?


.



Avatar
eis
Merci Camille
"Ellimac" a écrit dans le
message de news: 0d9c01c38e78$4bb775c0$
Bonjour,

Sub Toto()
For Each f In ActiveWorkbook.Sheets
f.Activate
f.Name = f.Range("a1")
Next
End Sub

Camille

-----Message d'origine-----
Bonjour à tous
Comment renommer automatiquement tous les onglets de mon
fichier en prenant

reprenant la valeur de leur cellule A1?


.