¿COMO MOSTRAR/OCULTAR UN CommandButton CON CONDICION IF Y OR?

CamiAlar · el 19 de julio

HOLA!
en mi hoja "INICIO" tengo la celda B8 con validacion de datos cuyas opciones son tres: celda en blanco, "SI" Y "NO". Quisiera poner un boton que apareciera una vez seleccionada la opcion "SI" o "NO" y que me dirija a la hoja "CALCULOS". SOLO TENGO LO SIGUIENTE:
Private Sub CommandButton1_Click()
Sheets("CALCULOS").Visible = True
Sheets("CALCULOS").Select Range("c2").Select
Sheets("INICIO").Visible = False
End Sub

EL RESTO NO SÉ COMO HACERLO. ¿¿ME PUEDE AYUDAR, POR FAVOR??

(( Cabe mencionar, que en la misma hoja INICIO puse otro boton (IRALINEALIQUIDA) con un macro que me dieron y me resultó perfecto para lo que necesitaba
que es el siguiente:

Private Sub iralinealiquida_Click()
Sheets("LINEA LIQUIDA").Visible = True
Sheets("LINEA LIQUIDA").Select Range("c2").Select
Sheets("INICIO").Visible = False

End Sub
Private Sub Worksheet_Activate1()
If Range("B10") = "SI" Then
iralinealiquida.Visible = True
Else
iralinealiquida.Visible = False
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B10")) Is Nothing Then
If Range("B10") = "SI" Then
iralinealiquida.Visible = True
Else
iralinealiquida.Visible = False
End If
End If

End Sub ))

QUEDO ATENTA A SUS COMENTARIOS
GRACIAS!!!

Visor · el 19 de julio

seria mejor si subes un archivo, pero solo como guía, tengo entendido que haces lo mismo con los botones lo que has hecho con las hojas, míralo:

if  Sheets("INICIO").Range("C8") = "Si" then
CommandButton1.Visible = true
else 
CommandButton1.Visible = false
End if

Dr Hyde · el 19 de julio

si vas a programar la instruccion en el modulo VBA de la hoja inicio la instruccion es:

if range("c8")="SI" then commandbutton1.visible=true

if range("c8")="NO" then commandbutton1.visible=false

si la programacion es en el formulario la instruccion es:

if ucase(worksheets("inicio").range("c8"))="SI" then commandbutton1.visible=true

if ucase(worksheets("inicio").range("c8"))="NO" then commandbutton1.visible=true

Si el boton esta incrustado en la hoja la instruccion y vas a programar en un modulo diferente al modulo VBA de la hoja inicio entonces la instruccion es:

if ucase(worksheets("inicio").range("c8"))="SI" then

worksheets("inicio").commandbutton1.visible=true

else

if ucase(worksheets("inicio").range("c8"))="SI" then

worksheets("inicio").commandbutton1.visible=false

endif

CamiAlar · el 19 de julio

HOLA!! GRACIAS. CREO QUE NO ME FUNCIONA :/

ADJUNTO EL ARCHIVO, TENGO INSERTADO EL "CommandButton" QUE QUISIERA QUE APARECIERA SOLO SI LA CELDA "C8" DE LA PAGINA "INICIO" ES "SI" Ó "NO" DE LO CONTRARIO, QUE PERMANEZCA OCULTO. EL BOTON AL APRETAR DEBE LLEVARME A LA PAGINA "CALCULOS".

EXCEL PRUEBA.xlsx