Sub NouveauNomUsf()
' Pour changer le nom de l'USF
ThisWorkbook.VBProject.VBComponents("UserForm1").Name = "NouveauNom"
' Pour changer le titre de l'USF
NouveauNom.Caption = "Titre de l'usf"
End Sub
Sub NouveauNomUsf()
' Pour changer le nom de l'USF
ThisWorkbook.VBProject.VBComponents("UserForm1").Name = "NouveauNom"
' Pour changer le titre de l'USF
NouveauNom.Caption = "Titre de l'usf"
End Sub
superBonjour Esper, Oneida,
Essayez ce code pour changer le nom et le titre de l'usf :
VB:Sub NouveauNomUsf() ' Pour changer le nom de l'USF ThisWorkbook.VBProject.VBComponents("UserForm1").Name = "NouveauNom" ' Pour changer le titre de l'USF NouveauNom.Caption = "Titre de l'usf" End Sub