Erreur d'utilisation de la propriété. Qu'est-ce que je rate?

Question

J'ai un UserForm avec deux options Budget ou Actual. Si je sélectionne Actual le code fonctionne et Appelle le sous-programme Réel mais si je sélectionne Budget je reçois l'erreur Invalid Use Of Property à la ligne Budget de l'appel.

Option Explicit 

Private Sub Budget_Click() 
    Call Budget 
End Sub 

Private Sub OptionButtonActual_Click() 
    Call Actual 
End Sub 

Le budget sous Routine

Sous Budget()

Dim sys As Object 

'Check to see if session is open 
Set sys = CreateObject("BZWhll.WhllObj") 
ResultCode = sys.Connect("B") 
If (ResultCode) Then 
MsgBox "UNABLE TO CONNECT TO SESSION!" 
MsgBox "MACRO STOPPED!" 
GoTo endM 
End If 
    sys.Disconnect 


    X203BudgetExtract 

    endM: 

End Sub 

Answer 1

J'ai changé le nom du bouton d'option pour: -

OptionButtonBudget et maintenant mon code fonctionne!