Boa noite galera!
Tentando otimizar uma certa planilha, encontrei uma certa dificuldade e não estou tendo ideia para contornar. Como tendo varias Combobox para filtro, e tendo repetido pelo menos umas 8 vezes o mesmo código. Resolvi transformar a rotina em uma função, o problema é que um certo objeto estou errando ao seta-lo nos critérios da função.
Tentando criar a seguinte função:
Public Function FiltroCriterio(sCriterio As String, sItem As Integer, sLv As ListView)
E para chama-la na rotina do Combobox, usando a seguinte:
call FiltroCriterio(ComboPesquisa, 1, ListView1.name)
Tentei de outras formas, mas não estou acertando.
Obs.: São 5 ListViews, por isso a nescessidade de inclui-lo na função.
"A mente que se abre a uma nova ideia jamais voltará ao seu tamanho original."
Albert Einstein
Postado : 04/01/2015 3:40 pm