renommer le classeur avec le contenu de a1

[pascal21]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Name = Range("a1").Value
End Sub

avec ce code ,je peux renommer un onglet avec la cellule a1
mais est-ce possible de faire la même chose avec le nom du classeur
c'est à die que la classeur soit nommé avec le contenu de la cellule a1
merci

 

[Moa]

Re : renommer le classeur avec le contenu de a1

ThisWorkbook.SavesAs Range("A1").Value