Llamar un Sub del modulo a mi formulario Excel VBA

Estoy creando varios Sub en mi modulo1, pero me sale error al llamarlo a mi formulario a través de un botón.

Modulo1
Sub cargar_combobox()
With cboanio
    . AddItem "2020", 0
    . AddItem "2021", 1
    . AddItem "2022", 2
    . AddItem "2023", 3
    . AddItem "2024", 4
    . AddItem "2025", 5
    . AddItem "2026", 6
    . AddItem "2027", 7
    . AddItem "2028", 8
    . AddItem "2029", 9
    . AddItem "2030", 10
End With
With cbomes
    . AddItem "ENERO", 0
    . AddItem "FEBRERO", 1
    . AddItem "MARZO", 2
    . AddItem "ABRIL", 3
    . AddItem "MAYO", 4
    . AddItem "JUNIO", 5
    . AddItem "JULIO", 6
    . AddItem "AGOSTO", 7
    . AddItem "SETIEMBRE", 8
    . AddItem "OCTUBRE", 9
    . AddItem "NOVIEMBRE", 10
    . AddItem "DICIEMBRE", 11
End With
End Sub
'Error al abrir mi formulario cuando pongo este sub en el modulo
Private Sub btnform_Click()
frmprocesar.Show
End Sub

Añade tu respuesta

Haz clic para o