Auto executar e filtro por aba

[Diego_moreira]

Fiz uma pequena modificação para que possam entender melhor o que estou precisando:

[Melo]

Hummmm,

agora sim podemos trabalhar no seu problema,

Ok,

Vou analisar e posto o resultado.

[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]

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.

[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.

Anúncios