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

Auto executar e filtro por aba

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Diego_moreira
Colaborador
Colaborador
Mensagens: 23
Registrado em: Seg Mai 21, 2012 10:15 am

Re: Auto executar e filtro por aba

Mensagem por Diego_moreira »

Fiz uma pequena modificação para que possam entender melhor o que estou precisando: :roll:
Anexos
Lista Mestra de documentos.zip
(81.64 KiB) Baixado 262 vezes


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
Melo
Colaborador
Colaborador
Mensagens: 70
Registrado em: Ter Jan 12, 2010 4:26 pm

Re: Auto executar e filtro por aba

Mensagem por Melo »

Hummmm,

agora sim podemos trabalhar no seu problema,

Ok,

Vou analisar e posto o resultado.


Avatar do usuário
Melo
Colaborador
Colaborador
Mensagens: 70
Registrado em: Ter Jan 12, 2010 4:26 pm

Re: Auto executar e filtro por aba

Mensagem por Melo »

Boa tarde,

Diego,

Titio Melo, não adaptou, mais "este MAIS me persegue" pelo que pude observar, vai funcionar com os comandos que vou postar.

Vamos lá estudar,

Bem, se observares o código existem o critério:

Código: Selecionar todos

Call ProcuraPersonalizada(sCriterioDaBusca, ComboBox1.Text)


Então a partir deste código podemos criar o mesmo, veja:

Código: Selecionar todos

Call ProcuraPersonalizada(sCriterioDaBusca, ComboBox2.Text)
Usei a ComboBox2 para mostrar o código, então a onde tiver o código da ComboBox1 é só acrescentar o da ComboBox2 como acima, logo ficaria assim, veja:

Código: Selecionar todos

Call ProcuraPersonalizada(sCriterioDaBusca, ComboBox1.Text)
Call ProcuraPersonalizada(sCriterioDaBusca, ComboBox2.Text)
Fácil ou muito fácil, melzinho na chupeta em filhão

Há, mais "esse MAIS é perseguidor", titio e como carregar o ComboBox2 com os nomes das Planilhas?

simples, igual como da Combo_OndeSalvar

Mais titio, você pode mostrar como ficaria? Filhão muita calma nesta hora,

Pois bem, vamos lá, veja a estrutura do Combo_Ondesalvar:

Código: Selecionar todos

With Combo_OndeSalvar
        'Recupera as Planilhas que são base de dados
        arrPesquisarNasPlanilhas = ConfigPlanilhasBase
        .Style = fmStyleDropDownList
        For i = 0 To UBound(arrPesquisarNasPlanilhas)
            .AddItem arrPesquisarNasPlanilhas(i)
        Next i
        .ListIndex = 0
    End With

Então fica igualzinho o da ComboBox2, veja:

Código: Selecionar todos

With ComboBox2
        'Recupera as Planilhas que são base de dados
        arrPesquisarNasPlanilhas = ConfigPlanilhasBase
        .Style = fmStyleDropDownList
        For i = 0 To UBound(arrPesquisarNasPlanilhas)
            .AddItem arrPesquisarNasPlanilhas(i)
        Next i
        .ListIndex = 0
    End With
prontinho, foi ou não foi melzinho na chupeta.

Filhão, dúvidas


Diego_moreira
Colaborador
Colaborador
Mensagens: 23
Registrado em: Seg Mai 21, 2012 10:15 am

Re: Auto executar e filtro por aba

Mensagem por Diego_moreira »

Melo escreveu:Boa tarde,

Diego,

Titio Melo, não adaptou, mais "este MAIS me persegue" pelo que pude observar, vai funcionar com os comandos que vou postar.
Não deu certo não Titio Melo :(
Anexei o arquivo pra vc ver o resultado.
Anexos
Lista Mestra de documentos2.zip
(80.14 KiB) Baixado 272 vezes


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.


Diego_moreira
Colaborador
Colaborador
Mensagens: 23
Registrado em: Seg Mai 21, 2012 10:15 am

Re: Auto executar e filtro por aba

Mensagem por Diego_moreira »

Pessoal, se tiver como me ajudar, eu tenho que deixa a planilha pronta até terça feira. Só falta um detalhezinho para terminá-la.


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