Crear Control al Ejecutar Macro

[Carlojas]

Buenas tardes compañeros les comento, al fin pude realizar lo que necesitaba de esta forma:

Código vb:

Sub Crear_Combos()
Dim cb As OLEObject, MySht As Worksheet
Application.ScreenUpdating = False
With ActiveSheet
    Set cb = .OLEObjects.Add(ClassType:="Forms.Combobox.1", _
        Left:=.[$N$11].Left, Top:=.[$N$11].Top, Width:=.[$N$11:$O$11].Width, _
        Height:=.[$N$11].Height)
End With
With cb
        .Object
        .BackColor = &H80000005
        .BackStyle = fmBackStyleTransparent
        .Style = 2
End With
Application.ScreenUpdating = True
End Sub
 

Saludos.