Página 1 de 1

Criando controles em tempo de execução.

Enviado: 18 Jul 2016 às 19:47
por Marcioaraujo
Olá pessoal. Espero que tudo esteja bem com todos.
Estou fazendo uma aplicação em Excel usando o VBA. Nesta aplicação tem um Form que retorna os valores armazenados nas planilhas. A minha dúvida é, tem como inserir novos controles, como texboxs, labels, etc, em tempo de execução, via VBA? Eu pesquisei e consegui inserir um textbox, porém o mesmo não aceita que seja digitado os dados neles, em suma não atendeu em nada.
Desde já agradeço qualquer ajuda.
Muita paz para todos.
Márcio Araújo.

Criando controles em tempo de execução.

Enviado: 18 Jul 2016 às 20:01
por xoxe
Poste sua planilha para analisar melhor o que está acontecendo de errado

Criando controles em tempo de execução.

Enviado: 19 Jul 2016 às 08:54
por Marcioaraujo
Xoxe, bom dia. Não está acontecendo nada de errado com a planilha. Eu estou querendo saber se tem um código VBA que insira um textbox e um label no formulário em tempo de execução. Como disse anteriormente, achei um código que inseri o textbox, porém não consegui fazer com que o mesmo mostrasse algum conteúdo de alguma célula. Não sei se consegui explicar o que quero. Desde já agradeço. Um abraço.

Re: Criando controles em tempo de execução.

Enviado: 19 Jul 2016 às 10:14
por alexandrevba
Bom dia!
Crie um Userform, dentro dele use esse código como exeplo.
Código: Selecionar todos
Private Sub UserForm_Initialize()
    Dim cCntrl As Control
    Set cCntrl = Me.Controls.Add("Forms.TextBox.1", "SuaCaixaDeTexto", True)
    With cCntrl
        .Width = 150
        .Height = 25
        .Top = 10
        .Left = 10
        .ZOrder (0)
    End With
End Sub

Att

Re: Criando controles em tempo de execução.

Enviado: 19 Jul 2016 às 11:37
por Marcioaraujo
Alexandre, muito obrigado. Já tinha usado este código antes, mas não funcionou. Agora está do jeito que eu imaginava.
Valeu mesmo.
Márcio.