[Resolvido]String para botões

Bom Dia

Preciso de uma ajuda.

Tenho um formulario com varios botões e gostaria de criar uma string para deixar invisível ao fim do comando.

No meu teste coloco assim:


Private Sub Insucesso_Aldeia_Click()

Dim Botao As String

Botao = "Insucesso_Aldeia"

Botao.Visible = False
End Sub


Obs: Entre esse codigo existem ações que não sáo necessarias colocar.

O erro diz: Erro de compilação
Qualificador inválido

Alguem sabe qual motivo do erro?

Você quer escolher um controle para ocultar ou será sempre o mesmo controle? Se for o mesmo controle, coloque o nome dele diretamente:

Me.NomeDoControle.Visible = False

Agora, ser for escolher o nome dele em uma combo, seria assim:

Me("" & NomeDaCombo.Value).Visible = False

Lembrando que para o controle se tornar invisível, ele não pode estar com o foco. Se, por exemplo, quiser ocultar um botão assim que clicar nele, tem que mandar o foco para outro controle antes.

Criquio, muito obrigado ficou perfeito

Só não sei como colocar o topico como resolvido.

OBRIGADO!!

Grato pelo retorno. O fórum agradece.