Boton de Opción + Ejecutar

09/11/2005 - 06:08 por pasarin | Informe spam
Hola amigos, tengo unos botones de opción que me ejecutan unas macros cada
uno al seleccionarlos. Quisiera que el funcionamiento fuese que al
seleccionarlos no pasase nada y que al hacer click en un boton de comando
llamado "ejecutar", se ejecutase la macro del boton de opción seleccionado.
¿que pieza de código VB necesito? Gracias.

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
09/11/2005 - 23:56 | Informe spam
hola, pasarin !

Mostrar la cita
suponiendo que 'estamos hablando' de controles en un formulario de usuario...
1) quita la llamada a cada macro en los eventos '_click' de cada boton de opcion
2) en el evento '_click' de ese boton de comando... pon algo +/- como lo siguiente...
en el modulo de codigo de formulario ==Private Sub CommandButton1_Click()
If OptionButton1 Then MsgBox "Ejecutando macro 1..."
If OptionButton2 Then MsgBox "Ejecutando macro 2..."
End Sub

sustituye los msgboxes por los nombres de cada macro :))

saludos,
hector.
#2 pasarin
10/11/2005 - 02:05 | Informe spam
Gracias mil de nuevo.

"Héctor Miguel" escribió en el mensaje
news:
Mostrar la cita
#3 pasarin
10/11/2005 - 02:57 | Informe spam
Hola de nuevo, he estado mirando y más o menos se como crear un userform,
pero ¿como se hace que aparezca en la hoja excel? Saludos.
"Héctor Miguel" escribió en el mensaje
news:
Mostrar la cita
#4 Héctor Miguel
10/11/2005 - 03:07 | Informe spam
hola, pasarin !

Mostrar la cita
usando en alguna macro una instruccion que 'llame' al formulario por su nombre [p.e.]
UserForm1.Show
o... si deseas que el usuario pueda interactuar entre el formulario y la hoja de calculo...
UserForm1.Show vbModeLess [requieres excel 2000 en adelante]
y en el codigo de algun boton que designes en el formulario para 'terminar'... [p.e.]
en el modulo de codigo del formulario ==Private Sub CommandButton1_Click()
Unload Me
End Sub

saludos,
hector.
Ads by Google
Search Busqueda sugerida