Notifications
Clear all

Ocultar apenas um botão de controle de formulário

3 Posts
2 Usuários
0 Reactions
1,203 Visualizações
(@alanisfcsm)
Posts: 0
Trusted Member
Topic starter
 

Ola!

Como faço para ocultar apenas um botão de controle de formulário.

tentei alguns comandos aqui e... nada :oops:

tentei:

Sub DisableFormsControl()
    'Desabilita botão de Controle
    Plan1.CommandButton1.Visible = False
End Sub

Não funcionou. :?:

 
Postado : 10/10/2016 9:04 am
Trindade
(@trindade)
Posts: 278
Reputable Member
 

Boa tarde,

Seria algo assim...

Sub Botão1_Clique()

    With Plan1
        ActiveSheet.Shapes.Range(Array("Button 2")).Visible = False
        ActiveSheet.Shapes.Range(Array("Button 3")).Visible = True
    End With

End Sub

Sub Botão2_Clique()

    With Plan1
        ActiveSheet.Shapes.Range(Array("Button 1")).Visible = True
        ActiveSheet.Shapes.Range(Array("Button 3")).Visible = False
    End With

End Sub

Sub Botão3_Clique()

    With Plan1
        ActiveSheet.Shapes.Range(Array("Button 1")).Visible = False
        ActiveSheet.Shapes.Range(Array("Button 2")).Visible = True
    End With

End Sub

Anexo

Se a resposta foi útil! Clique na mãozinha ao lado do botão Citar.
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde.

 
Postado : 10/10/2016 9:57 am
(@alanisfcsm)
Posts: 0
Trusted Member
Topic starter
 

:mrgreen: Perfeito!

Muito Obrigado pela atenção e paciência.

 
Postado : 10/10/2016 10:03 am