Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

renommer une feuille

2 réponses
Avatar
Patbou
Est-il possible de renommer l'onglet d'une feuille, par le contenu d'une
cellule de cette feuille
--
Merci d''''''''avance pour les solutions proposées.
Cordialement,

Patbou

2 réponses

Avatar
FFO
Salut Patbou
Solution Macro :
'Avec la cellule "A1"
Sheets("nom onglet").Select
ActiveSheet.Name = Range("A1")

a défaut d'une autre solution


Est-il possible de renommer l'onglet d'une feuille, par le contenu d'une
cellule de cette feuille
--
Merci d''''''''avance pour les solutions proposées.
Cordialement,

Patbou



Avatar
LSteph
Bonjour,

Si le texte devait être absent ou dépasser
et en évitant les .select (la plupart du temps inutiles )


If Len([a1]) > 0 Then ActiveSheet.Name = Left([a1], 31)


ou bien

With Feuil1
If Len(.[a1]) > 0 Then .Name = Left(.[a1], 31)
End With

ou encore

On Error GoTo fin
With Worksheets("Feuil3")
If Len(.[a1]) > 0 Then .Name = Left(.[a1], 31)
End With
Exit Sub
fin:
MsgBox "nom de feuille invalide"


Cordialement.

lSteph

Est-il possible de renommer l'onglet d'une feuille, par le contenu d'une
cellule de cette feuille