ge, você postou no Forum "Formulários" e depois diz que os Botões estão na Planilha ?
Se estiver se referindo aos CommandButtons (ActiveX) adicionados pela opção da Guia Desenvolvedor Excel 2007 , utilize a rotina abaixo, é só fazer as adaptações conforme os Nomes que der aos Botões :
Private Sub CommandButton1_Click()
Sheets("Plan1").Shapes("CommandButton2").ControlFormat.Enabled = False 'False - Desabilita e True - Habilita
End Sub
Para saber quais os respectivos Botões, na Guia Desenvolvedor clique no icone "Modo de Design" e depois clique no Botão e terá o nome na caixa de seleção acima a esquerda.
Se for Botão utizando a opção "Controles de Formulário", este não tem propriedade Enabled e sim Visible e arotina seria :
Sub MacroBotao()
Sheets("Plan1").Shapes("Botão 1").Visible = True
End Sub
[]s
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 02/01/2013 8:51 pm