Deseo usar una macro para que mi formulario me lleve al archivo adecuado según la combinación de botones
Mi problema es que tengo un formulario con 10 botones.
Los primeros 08 son de color blanco y están en dos líneas numerados del 1 al 8 y con la siguiente macro individual uno a uno
Private Sub CommandButton1_Click()
ActiveSheet.CommandButton1.BackColor = vbBlack
End Sub
Los otros dos son el botón ir
Y el botón limpiar
Lo que requiero es que al darle click algunos de los 8 botones y presionar el botón ir me envíe al archivo que corresponda según la combinación resultante de los 8
Ejemplo:
1blanco 2negro 3blanco 4, 5, 6, 7 y 8negros archivo 115
Todos blancos archivo 01
Todos negros archivo 200
En total son 256 combinaciones.
Como puedo hacer
1 respuesta
Private Sub CommandButton1_Click() ActiveSheet.CommandButton1.BackColor = vbBlack End Sub
Y cómo lo regresas a blanco?
Sería mejor si tienes ToggleButton.
Algo como esto:
Para eso son. Puedes apagar y prender.
Entonces las combinaciones serían:
apagado, apagado, apagado, apagado, apagado, apagado, apagado, apagado = 1
apagado, apagado, apagado, apagado, apagado, apagado, apagado, prendido = 2
apagado, apagado, apagado, apagado, apagado, apagado, prendido apagado = 3
O bien:
0, 0, 0, 0, 0, 0, 0, 0 = 1
0, 0, 0, 0, 0, 0, 0, 1 = 2
0, 0, 0, 0, 0, 0, 1 0 = 3
Pero para ayudar con el código, necesitas decirme cómo tienes la información en tu hoja.
Pon una imagen.
