Un boton de opción puede ocultar otros grupos de botones

10/11/2006 - 11:33 por Anibal | Informe spam
Hola a todos, tengo un user form con ocho grupos de botones de opción,
el primer grupo contiene cuatro botones de opciones cuando se elige el
ultimo de los botones de este grupo ya no es necesario elegir en los
otros grupos hay alguna forma que al elegir este boton se oculten los
otros grupos?
Alguien tiene ejemplos con user form con grupos de botones de opciones?

Muchas gracias a todos.

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
10/11/2006 - 19:41 | Informe spam
hola, Anibal !

... tengo un user form con ocho grupos de botones de opcion, el primer grupo contiene cuatro botones de opciones
cuando se elige el ultimo de los botones de este grupo ya no es necesario elegir en los otros grupos
hay alguna forma que al elegir este boton se oculten los otros grupos?



a) si por 'grupos de botones' te refieres a que estan 'estrategicamente' colocados por el formulario...
podrias asignarles un 'nombre de grupo' para 'manipularlos en conjunto' usando dicha propiedad...
-> la propiedad 'GroupName' SOLO es aplicable a objetos OptionButton
b) para cualquier otro tipo de botones puedes 'agruparlos' ->dentro<- de un objeto 'Frame' [cuadro de grupo]
y administrar al objeto contenedor [el cuadro de grupo] para administrar [por herencia] a sus 'hijitos' ;)

si cualquier duda [o informacion adicional]... comentas?
saludos,
hector.
Respuesta Responder a este mensaje
#2 Anibal
11/11/2006 - 00:50 | Informe spam
Hola Héctor Miguel:

Te agradezco tu atención y ayuda.

Envie ese tema para saber si se podia mientras esperaba la respuesta
investigaba y lo logre.
Los botones estan agrupados en Frames son ocho frame y ya pude lograr
que se oculten los grupos de botones con:

Private Sub Option3_Click()
Frame2.Visible = False
Frame3.Visible = False
Frame4.Visible = False
Frame5.Visible = False
Frame6.Visible = False
Frame7.Visible = False
Frame8.Visible = True
End Sub

Ahora tengo un problemita, cuando ejecuto el UserForm al hacer click la
primera vez no responde despues si.
Me podrias decir si asi tiene que ser o hay algo mal?

Otro tema hay alguna forma que el UserForm se ejecute cuando me situe
en cualquier celda de un determinado bloque?
El UserForm lo quiero utilizar como ayuda para cargar esas celdas.

Te explico un poco de que se trata, tengo que llenar celdas con ocho
caracteres, hay ocho grupos de opciones cada grupo de opciones me
representa un caracter. A los botones de opciones le asigne en
ControlSource una celda a cada uno, con formulas obtengo el caracter de
cada grupo. Uniendo los caracteres de los ocho grupos obtengo lo que
necesito cargar en esa celda.
Eso es lo que tengo echo hasta ahora, no se si voy por buen camino. Yo
pretendo que cuando me ubique en las celdas cargadas el UserForm me
muestre cuales son las opciones que tiene cargada esa celda para poder
modificarla si es necesario.

Espero que sigas ayudando. Muchas gracias.
Respuesta Responder a este mensaje
#3 Héctor Miguel
11/11/2006 - 04:16 | Informe spam
hola, ruben ?

__ 1 __
... pude lograr que se oculten los grupos de botones con:
Private Sub Option3_Click()
Frame2.Visible = False
Frame3.Visible = False
Frame4.Visible = False
Frame5.Visible = False
Frame6.Visible = False
Frame7.Visible = False
Frame8.Visible = True
End Sub
Ahora tengo un problemita, cuando ejecuto el UserForm al hacer click la primera vez no responde despues si.
Me podrias decir si asi tiene que ser o hay algo mal?



1) en tu primer consulta comentabas que de ocho grupos de botones de opcion...
al seleccionar el ultimo de cuatro botones en el primer grupo se debian ocultar los demas grupos -?-
[sin embargo] el codigo que expones hace referencia -aparentemente- al boton de opcion # 3 [no al ultimo de 4] -???-

__ 2__
Otro tema hay alguna forma que el UserForm se ejecute cuando me situe en cualquier celda de un determinado bloque?
El UserForm lo quiero utilizar como ayuda para cargar esas celdas.



2) para ello puedes utilizar codigo en el modulo de 'esa' hoja, concretamente el evento '_selectionchange'
[probablemente] habria que 'monitorear' si el cambio de seleccion incuye dos o mas celdas -?-
[pudiera ser que se termine 'afectando' a una celda 'equivocada'] -?-

__ 3 __
... tengo que llenar celdas con ocho caracteres, hay ocho grupos de opciones cada grupo de opciones me representa un caracter.
A los botones de opciones le asigne en ControlSource una celda a cada uno, con formulas obtengo el caracter de cada grupo.
Uniendo los caracteres de los ocho grupos obtengo lo que necesito cargar en esa celda... no se si voy por buen camino.
Yo pretendo que cuando me ubique en las celdas cargadas
el UserFormme muestre cuales son las opciones que tiene cargada esa celda para poder modificarla si es necesario.



3) con los datos 'conocidos' [hasta ahora]... no me atreveria a proponer -todavia- ninguna 'sugerencia' :(( [p.e.]
a reserva de que comentes [+/- exactamente] 'como' es que tienes que 'controlar' el llenado de 'cuales ?' celdas...
a) por que un formulario ? no seria mas sencillo usar reglas de validacion por lista ?
b) cuantos botones de opcion hay en cada uno de los 'otros' cuadros de grupo ? [y que hace cada uno de ellos] ?
c) [probablemente] sera necesario que expongas mas [y quizas no pocos] detalles relacionados con la situacion que pretendes resolver -?-

[solo] 'imaginate' que 'de este lado' [del mensaje] no se tiene a la vista ni el arreglo ni el formulario, ni el codigo, ni... ?

saludos,
hector.

p.d. es probable que 'debieras' iniciar una nueva consulta con un 'asunto' mas de acuerdo con el tema a tratar ;)
Respuesta Responder a este mensaje
#4 Anibal
13/11/2006 - 10:50 | Informe spam
Hola Héctor Miguel:

- 1) en tu primer consulta comentabas que de ocho grupos de botones de
opcion...
al seleccionar el ultimo de cuatro botones en el primer grupo se
debian ocultar los demas grupos -?-
[sin embargo] el codigo que expones hace referencia -aparentemente-
al boton de opcion # 3 [no al ultimo de 4] -???-

Tienes razon en lo que me comentas, con el boton 3 nesecito que se
oculten los cuadros 2 al 7 y con el boton 4 que se oculten desde el
cuadro 2 al 8, solo puse el codigo del boton 3 como ejemplo de como
pude ocultar los cuadros.

Con respecto a las otras consultas voy a comenzar un tema nuevo con un
ejemplo concreto.

Quisiera saber si los temas que se tratan, en los que tu intervienes te
avisan de las respuestas o tienes que seguirlas buscando entre todos
los temas.

Por todo muchas gracias.
Respuesta Responder a este mensaje
#5 Héctor Miguel
14/11/2006 - 04:43 | Informe spam
hola, Anibal !

- 1) en tu primer consulta comentabas que de ocho grupos de botones de opcion...
al seleccionar el ultimo de cuatro botones en el primer grupo se debian ocultar los demas grupos -?-
[sin embargo] el codigo que expones hace referencia -aparentemente- al boton de opcion # 3 [no al ultimo de 4] -???-



... con el boton 3 nesecito que se oculten los cuadros 2 al 7 y con el boton 4 que se oculten desde el cuadro 2 al 8 [...]



-> prueba con algo +/- como lo siguiente [en el modulo de codigo de 'ese' formuario]:

Dim Sig As Byte
Private Sub Option3_Click()
For Sig = 2 To 7
Me.Controls("frame" & Sig).Visible = False
Next
Me.Frame8.Visible = True
End Sub
Private Sub Option4_Click()
For Sig = 2 To 8
Me.Controls("frame" & Sig).Visible = False
Next
End Sub

... los temas... en los que tu intervienes te avisan de las respuestas o tienes que seguirlas buscando [...]



[generalmente]... me gusta 'ejercitar' la memoria :))
[supongo que mas de alguna vez habre dejado a alguien 'colgado de la brocha' -por lo cual me disculpo-] :D

saludos,
hector.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida