Renommer l'onglet d'une feuille d'après la valeur d'une cellule

Chantaltreize Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
Je suis à la recherche d'une macro lorsque je mets une date en A1 celle ci me renomme la meme feuil avec cette date
par avance merci
Chritou



A voir également:

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

a mettre dans le module de la feuille active:

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  If Not Intersect(Target, Range("A1")) Is Nothing Then
 Sheets(ActiveWorkbook.ActiveSheet.Name).Name = Range("A1").Value
 End If
End Sub


se déclenche au double clic


@+ Le Pivert
0