Asignar código a un botón creado dinámicamente

Estoy intentando obtener un botón que he creado dinámicamente en una forma de usuario de Excel para ejecutar una macro llamadatransfer que he escrito enModule 1 de la sección "Módulos" de mi proyecto.

A continuación, he pegado el código que he escrito hasta ahora en el formulario de usuario que realmente logra crear elTransfer to Sheet botón en el marco (que también he creado dinámicamente) pero por alguna razón, cuando ejecuto VBA me sale un438 error mensaje diciendo queObject doesn't support this property or method.

¿Alguien puede decirme cómo puedo resolver esto?

Aquí está el código:

<code>Dim framecontrol1 As Control

Set workitemframe = Controls.Add("Forms.Frame.1")
With workitemframe
    .Width = 400
    .Height = 400
    .Top = 160
    .Left = 2
    .ZOrder (1)
    .Visible = True
End With

workitemframe.Caption = "Test"
Set framecontrol1 = workitemframe.Controls.Add("Forms.commandbutton.1")

With framecontrol1
    .Width = 100
    .Top = 70
    .Left = 10
    .ZOrder (1)
    .Visible = True
    .Caption = "Transfer to Sheet"
End With
framecontrol1.OnAction = "transfer"
</code>

Respuestas a la pregunta(2)

Su respuesta a la pregunta