As instruções passo a passo pra quem ainda não sabe usar a ComBox do excel.
To explicando como fazer no UserForm (porque eu particularmente acho melhor) mas o mesmo código pode ser usado na combo da barra de ferramentas da caixa de controle.
Vamos lá!
1º...Criando:
- Abra o excel, digite numa Plan alguns dados nas células. Neste exemplo vou colocar da A1 até A5;
- Abra o Visual Basic for Applications (Alt+F11)
- Inserir - User Form
- Exibir - Caixa de Ferramentas
- Clique na caixa de combinação e desenhe-a no formulário
2º ...Programando:
Dê dois cliques na área do formulário. Como padrão, o evento do código é "Click"(acima). O evento "Click" não será utilizado, porque não queremos fazer nada quando clicarmos na área vazia. Então, escolha o "Initialize' na lista de opções, que faraá com que o form seja atualizado ao Inicializar (Bem óbvio, né?):
Aparecerá na área de código:
Private Sub UserForm_Initialize()
End Sub
Agora é só digitar as linhas de código abaixo:
Private Sub UserForm_Initialize()
Dim I As Integer
For I = 1 To 5
ComboBox1.AddItem Cells(I, 1)
Next
End Sub
3º ...Entendendo...
...Cells(I,
A combo recebe os valores das Células do Contador (1 to 5 -->> A1 até A5) ...
...,1
...da primeira coluna.
Agora é só dar F5 para executar... se der alguma mensagem de erro reveja o código que você digitou porque este aqui tá certin!!!!
Qualquer dúvida é só falar! E Postem aí dicas de VBA pois quase não tem no forum Office...
Pergunta
Dequinha®
As instruções passo a passo pra quem ainda não sabe usar a ComBox do excel.
To explicando como fazer no UserForm (porque eu particularmente acho melhor) mas o mesmo código pode ser usado na combo da barra de ferramentas da caixa de controle.
Vamos lá!
1º...Criando:
- Abra o excel, digite numa Plan alguns dados nas células. Neste exemplo vou colocar da A1 até A5;
- Abra o Visual Basic for Applications (Alt+F11)
- Inserir - User Form
- Exibir - Caixa de Ferramentas
- Clique na caixa de combinação e desenhe-a no formulário
2º ...Programando:
Dê dois cliques na área do formulário. Como padrão, o evento do código é "Click"(acima). O evento "Click" não será utilizado, porque não queremos fazer nada quando clicarmos na área vazia. Então, escolha o "Initialize' na lista de opções, que faraá com que o form seja atualizado ao Inicializar (Bem óbvio, né?):
Aparecerá na área de código:
Private Sub UserForm_Initialize()
End Sub
Agora é só digitar as linhas de código abaixo:
Private Sub UserForm_Initialize()
Dim I As Integer
For I = 1 To 5
ComboBox1.AddItem Cells(I, 1)
Next
End Sub
3º ...Entendendo...
...Cells(I,
A combo recebe os valores das Células do Contador (1 to 5 -->> A1 até A5) ...
...,1
...da primeira coluna.
Agora é só dar F5 para executar... se der alguma mensagem de erro reveja o código que você digitou porque este aqui tá certin!!!!
Qualquer dúvida é só falar! E Postem aí dicas de VBA pois quase não tem no forum Office...
BEIJOOOOCAS!
Link para o comentário
Compartilhar em outros sites
6 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.