Lancer une Sub via un formulaire

Hello dans ma macro j'ai 3 modules qui contiennent chacun 1 sub.
1. Methode_choice qui lance le formulaire
2. One_invoice qui contient 1 sub appelé one_invoice aussi
3. two_invoices qui contient 1 sub appelé one_invoice aussi

Le formulaire contient 2 OptionButton ainsi qu'un CommandButton qui sert de "Ok" pour continuer.

voici le code lié à ce commandbutton :

Private Sub CommandButton1_Click()
UserForm4.Hide
If OptionButton1 = True Then Two_invoice.Two_invoice
If OptionButton2 = True Then One_invoice.One_invoice
End Sub

mais j'ai un message d'erreur :
Compile Error Expected function or variable avec OptionButton1 en surbrillance, mais cette objet existe bien dans mon formulaire. et le nom est bien identique.

Help. !