Como insertar un boton en una planilla excel desde VB 6

[surferboy]

Hola Amigos,

Estoy con el siguiente problemita, acabo de programar una pequeña aplicación que me permite dibujar unas tablas en una planilla excel, pero no puedo encontrar como insertar tambien en el excel un boton con un evento y macro, alguien sabe como puedo hacerlo?

este es el codigo que programe:

Private Sub command1_click()
Dim apexcel As Variant
Set apexcel = CreateObject("excel.application")
' hace que excel se vea
apexcel.Visible = True
'agrega un nuevo libro
apexcel.workbooks.Add
'poner titulos
apexcel.cells(1, 1).formula = "titulo de la aplicacion"
apexcel.cells(1, 1).Font.Size = 18
apexcel.cells(2, 2).formula = "debe"
apexcel.cells(2, 3).formula = "haber"
apexcel.cells(2, 4).formula = "saldo"
apexcel.cells(3, 2).formula = 200
apexcel.cells(3, 3).formula = 100
' aplica formula
apexcel.cells(3, 4).formula = "=b3-c3"
' hace una seleccion de celdas y pone bordes de color
apexcel.range("b3:d3").borders.Color = RGB(255, 0, 0)
Set apexcel = Nothing
End Sub



saludos,