Vídeo recomendado
https://youtu.be/diWPPPhW-9E

ComboBox encadeando

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Fabio Oliva
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Ter Nov 22, 2011 12:36 pm

ComboBox encadeando

Mensagem por Fabio Oliva »

Boa Tarde

Sou novo em VBA, estou fuçando e gostaria de encadear dois combobox, ou seja quando eu selecionar o no do cliente no primeiro combobox o segundo combo box só dá as opções dos usuarios daquele determinado cliente.
A minha planilha é assim na primeira coluna tem os clientes e na segunda o cnpj e da terceira a decima coluna vai os usuarios de cada cliente.

Se vc poder me ajudar eu agradeço.

exemplo das linhas

Private Sub cmbusu_Change()
Dim l, c, teste As Integer
l = 1
c = 1
teste = 0

Do While teste = 0

If cmbcli.Value = Sheets("BaseCliente").Cells(l, 1).Value Then
teste = 1
Else
l = l + 1
End If
Loop
cmbusu.RowSource = "BaseCliente!(cells(l,3).value):(cells(l,10).value)"

End Sub


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Sistema.CE
Colaborador
Colaborador
Mensagens: 21
Registrado em: Sáb Set 17, 2011 10:12 am

Re: ComboBox encadeando

Mensagem por Sistema.CE »

Veja este exemplo de combobox.

Acho que foi retirado deste forum não lembro quem foi o Autor.

Abraço.
Anexos
ComboBoxEncadeado.rar
(16.29 KiB) Baixado 359 vezes


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: ComboBox encadeando

Mensagem por webmaster »

Sistema.CE,

Foi daqui mesmo:

http://www.tomasvasquez.com.br/blog/mic ... encadeados

Abraços


Fabio Oliva
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Ter Nov 22, 2011 12:36 pm

Re: ComboBox encadeando

Mensagem por Fabio Oliva »

Eu já tinha visto esse exemplo, mas como sou novo em VBA não consegui adaptar esse exemplo na minha necessidade.
[img]C:\Documents%20and%20Settings\fbezerra\Meus%20documentos\fabio\exemplo.bmp[/img]

Exemplo:
Tenho 3 clientes e cada cliente tem 10 usuarios.
quando eu seleciono o cliente exemplo "JAL" na combobox1, ele irá caregar na combobox2 só os usuarios do cliente "JAL".
A minha planilha se encontra assim:
Na coluna "A" estão os Clientes, e nas colunas "C" ao "M" se encontram seu usuarios.

Se for possivel vcs me ajudarem baseado na forma que se encontra o posicionamento da minha planilha eu agradeceria.
Mas uma duvida qual o comando para que eu possa ir jogando novos itens no combobox de acordo com uma estrutura de repetição.

Obrigado, antes que esqueça, esse site é muito bom.

Fabio Oliva.

Se for possivel passar contato estou sempre logado no msn e skype.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Sistema.CE
Colaborador
Colaborador
Mensagens: 21
Registrado em: Sáb Set 17, 2011 10:12 am

Re: ComboBox encadeando

Mensagem por Sistema.CE »

Fabio Oliva.
O certo seria voce postar sua planilha, pois sem todos os dados fica dificil fazer.

Abraço.


Fabio Oliva
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Ter Nov 22, 2011 12:36 pm

Re: ComboBox encadeando

Mensagem por Fabio Oliva »

Como o solicitado estou mandando a planilha, não reparem as linhas de codigo, pois estou começando no VBA agora e fico fazendo tentativas para chegar onde eu quero.


Avatar do usuário
Sistema.CE
Colaborador
Colaborador
Mensagens: 21
Registrado em: Sáb Set 17, 2011 10:12 am

Re: ComboBox encadeando

Mensagem por Sistema.CE »

Como o solicitado estou mandando a planilha, não reparem as linhas de codigo, pois estou começando no VBA agora e fico fazendo tentativas para chegar onde eu quero.
Onde esta o exemplo? Lembrando que antes de postar o seu exmplo voce tem que zipar sua planilha.

[]s


Fabio Oliva
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Ter Nov 22, 2011 12:36 pm

Re: ComboBox encadeando

Mensagem por Fabio Oliva »

Bom dia

Desculpa não tinha prestado atenção que tem que se zipar o arquivo.

Segue a Planilha.

Obrigado

Fabio Oliva
Anexos
exemplo.rar
imagem
(11.72 KiB) Baixado 341 vezes
projeto software controle de atendimento.rar
Planilha
(27.33 KiB) Baixado 356 vezes


Avatar do usuário
Mauro Coutinho
Jedi
Jedi
Mensagens: 1561
Registrado em: Sáb Mar 13, 2010 8:10 pm
Localização: São José dos Pinhais - Pr

Re: ComboBox encadeando

Mensagem por Mauro Coutinho »

Fabio, pelo que vi em seu modelo, os combos carregam corretamente da forma que quer.

Não entendi oque quer dizer com :
Mas uma duvida qual o comando para que eu possa ir jogando novos itens no combobox de acordo com uma estrutura de repetição.

Poderia detalhar melhor, acho que não compreendi corretamente.

[]s


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder