Hi guys,
i'am trying to creat a new UserForm with code and i would like to give it a name, here's the code, every time i receive the error code "75" error with the path...
I have trid the two codes, and i have the same error for both of them:

Sub MakeUserformFC()
    Dim TempForm As Object ' VBComponent
       Application.ScreenUpdating = False
    
'   Create the UserForm
       Set TempForm = ActiveWorkbook.VBProject.VBComponents.Add(vbext_ct_MSForm)
    
    'Set Properties for TempForm
    With TempForm
        .Properties("Name") = "FonctionsContraintes"
        .Properties("Caption") = "Fonctions Contraintes"
        .Properties("Width") = 426.75
        .Properties("Height") = 318
    End With
End Sub
Sub MakeUserformFC()
    Dim TempForm As Object ' VBComponent
       Application.ScreenUpdating = False
    
'   Create the UserForm
       Set TempForm = ActiveWorkbook.VBProject.VBComponents.Add(vbext_ct_MSForm)
    
    'Set Properties for TempForm
    With TempForm
        .Name = "FonctionsContraintes"
        .Properties("Caption") = "Fonctions Contraintes"
        .Properties("Width") = 426.75
        .Properties("Height") = 318
    End With
End Sub
Does anyone see where is the error???

Thanks for your help.