Renommer une feuille en fonction d'une cellule

Bonjour. Dans le fichier en pièce jointe j'ai plusieurs feuilles et je voudrais que les feuilles soit renommées en fonction du numéro de facture qui est écrit dans la cellule B13 de chaque feuilles, j'ai rechercher sur internet et trouver des macros mais je n'ai pas reussis. Est ce que quelqu'un pourrait m'aider. Merci

En pièce jointe le fichier concerné.

1'485fac-sapcb.zip (24.47 Ko)

Bonjour,

Suis ces indications :

  • Clique droite sur l'onglet concerné
  • Choisir l'option "visualiser le code"
  • Coller le code ci-dessous
Private Sub Worksheet_Change(ByVal Target As Range)
'MAcro Dan le 08/12/2010
If Not Intersect(Target, Range("B13")) Is Nothing Then
ActiveSheet.Name = Target
End If
End Sub

si ok, merci de ne pas oublier de cliquer sur le V vert pour cloturer le fil

Amicalement

Bonjour. Merci beaucoup c'est bien ça

Rechercher des sujets similaires à "renommer feuille fonction"