Notifications
Clear all

Erro de tipos Incompatíveis, cabeçalho listbox

4 Posts
2 Usuários
0 Reactions
1,102 Visualizações
(@eufrasio)
Posts: 0
New Member
Topic starter
 

Olá amigos do Planilhando !

Pessoal no anexo há dentre outros o formulário pesquisa por data (frmpesquisa), funciona assim: seleciona-se a data inicial e a data final depois clica-se em pesquisar então deve aparecer as ordens de serviços correspondentes as datas; mas ao clicar em pesquisar da o Erro de tipos incompatíveis, já tentei alterar a variável correspondente mas não tive êxito, peço um auxílio dos amigos. gostaria que se possível me descem uma ajuda também quanto ao cabeçalho ou seja gostaria que quando o formulário iniciasse aparecesse o titulo da coluna. na listbox. Desde já agradeço atenção.

Abraço!!!

 
Postado : 09/12/2017 4:53 pm
(@mprudencio)
Posts: 0
New Member
 

Troque isso.

valor_celula_data = .Cells(linha, coluna_data).Value

Por isso.

valor_celula_data = Cells(linha, coluna_data).Value

 
Postado : 09/12/2017 6:50 pm
(@eufrasio)
Posts: 0
New Member
Topic starter
 

Boa noite amigo!

Obrigado pela dica!

A alteração funcionou porém, o programa parece funcionar somente nas duas primeiras datas selecionadas, se colocar mais datas na panilha a pesquisa não reconhece novos dados você teria mais alguma idéia?

Att.

 
Postado : 09/12/2017 9:52 pm
(@eufrasio)
Posts: 0
New Member
Topic starter
 

Ola amigo!

Estava fazendo uns teses aqui e troquei:

.Cells(linha, coluna).Value <> Empty

por

Cells(linha, coluna).Value <> Empty

Funcionou perfeito muito obrigado por seu apoio!!!

 
Postado : 09/12/2017 10:06 pm