VBA Excel: Renommer une feuille d'une valeur de cellule - split

Résolu/Fermé

Feuille

Audrey - 9 mars 2015 à 15:44
Audrey - 9 mars 2015 à 16:19

Bonjour,

Mon classeur a plusieurs feuilles organisées de manière identique, sauf la première. Je voudrais simplement pouvoir renommer automatiquement les feuilles (sauf la 1ère) de la partie de la valeur contenue dans chaque feuille en cellule "A2" et située avant l'espace.
Exemple: si en A2 on a "0012 Bleu", j'aimerais que la feuille en question soit renommée "0012".
Sauriez-vous faire??
Je vous en remercie par avance!

A voir également:

Vba renommer feuille avec valeur cellule
Cette valeur ne correspond pas aux restrictions de validation des données pour cette cellule ✓ - Forum Excel
Renommer plusieurs fichiers en même temps - Guide
Verrouiller cellule excel sans verrouiller la feuille - Guide
Excel compter cellule couleur sans vba - Guide
Comment renommer quelqu'un sur instagram - Forum Instagram

1 réponse

Réponse 1 / 1

Audrey
9 mars 2015 à 16:19

Bon, je viens de trouver moi-même la réponse, que je vous fais partager:

Sub Renommer()
Dim i As Integer
For i = 2 To Sheets.Count
    Sheets(i).Activate
    Sheets(i).name = Split(Range("A2").Value, " ")(0)
Next i
End Sub

Discussions similaires

Afficher tous les onglets

imprimer sur papier cartonné

Oter la protection de plusieurs feuilles à la fois excel 2013

VBA Excel: Importer des feuilles vers un classeur

Publipostage word : créer plusieurs documents distincts

comparer 2 feuilles excel [VBA]