Visual Basic para Aplicaciones - Agregar y controlar controles durante ejecuci

Life is soft - evento anual de software empresarial
   
Vista:

Agregar y controlar controles durante ejecuci

Publicado por Rubén (3 intervenciones) el 30/05/2008 06:07:45
Hola estimados:
Tengo un libro excel con macros que me automatizan la carga de datos mediante el ingreso de los mismos por formulario, uno de los botones de este formulario crea una hoja para permitir que se carguen datos en la misma.
Lo que pude hacer es que a la vez que cree ese hoja nueva, mediante (ej.)
' agregar 1 hoja
Sheets.Add after:=Sheets(1)

además de eso creo un botón con la siguiente instrucción:

Worksheets(1).OLEObjects.Add "Forms.CommandButton.1", _
Left:=10, Top:=10, Height:=20, Width:=100

Todo bien hasta ahí, que me crea la hoja y el botón, acto seguido me despliega un formulario para la carga de mis datos en la nueva hoja creada (independiente del botón incrustado en la hoja)

Mi pregunta es la siguiente, se puede al botón incrustado en la hoja, controlar alguno de sus eventos (por ejemplo el "click") ? Si es así, que instrucciones debería poner para programar el /los eventos para el control creado en tiempo de ejecución.

Espero que hayan entendido la idea, el código es muy largo, así que pensé no incluirlo.
Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Agregar y controlar controles durante ejecuci

Publicado por JuanC (243 intervenciones) el 30/05/2008 14:02:31
Algo así puede andar...

Dim sCode$
Dim HojaNueva As Worksheet
Set HojaNueva = Sheets.Add(after:=Sheets(1))
sCode = "Private Sub CommandButton1_Click()" & vbCrLf
sCode = sCode & "MsgBox ""Hello world!""" & vbCrLf
sCode = sCode & "End Sub"

With ActiveWorkbook.VBProject.VBComponents(HojaNueva.CodeName).CodeModule
.AddFromString sCode
End With

Set HojaNueva = Nothing

Saludos desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Agregar y controlar controles durante ejecuci

Publicado por Ruben (3 intervenciones) el 31/05/2008 06:47:42
JuanC. :
Voy a ponerlo en práctica, y después te aviso que tal me fue.
Otra consulta, donde encuentro más información sobre la programación del editor de visual basic (proyectos y componentes) para poder así utilizar en mis planillas.

Gracias por contestar tan rapidamente .-
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Agregar y controlar controles durante ejecuci

Publicado por JuanC (243 intervenciones) el 31/05/2008 16:29:49
te dejo algo aquí...

http://www.sendspace.com/file/pnptp3

Saludos desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Agregar y controlar controles durante ejecuci

Publicado por Rubén (3 intervenciones) el 02/06/2008 01:25:56
Gracias JuanC, saludos desde Corrientes, Argentina.-
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar