Stéphanie82
XLDnaute Nouveau
Bonjour
J'ai une petite question en macro.
J'essaye de renomer une plage de cellule automatiquement dès lors que je ferme une feuille de calcul.
Je ne vois ou est le problème dans mon code.
Mes deux idées de code :
2eme code
J'ai une petite question en macro.
J'essaye de renomer une plage de cellule automatiquement dès lors que je ferme une feuille de calcul.
Je ne vois ou est le problème dans mon code.
Mes deux idées de code :
Code:
Private Sub UserForm_Terminate()
Dim O1Down
Set O1Down = Range("O1").End(xlDown)
O1Down.Name = "PLAGE"
Range("A1:PLAGE").Select
Selection.Name = "Contacts"
ActiveWorkbook.Names("PLAGE").Delete
End Sub
2eme code
Code:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Dim O1Down
Set O1Down = Range("O1").End(xlDown)
O1Down.Name = "PLAGE"
Range("A1:PLAGE").Select
Selection.Name = "Contacts"
ActiveWorkbook.Names("PLAGE").Delete
End Sub