Este fórum está sendo desativado

Depois de 9 anos, este fórum será desativado. Mas calma.... estamos migrando para uma comunidade no DISCORD. Junte-se a nós.

ENTRAR PARA DISCORD

Tópicos relacionados a códigos VBA, gravação de macros, etc.
  • Avatar do usuário
#62797
Olá Pessoal, Bom Dia!

Depois de algum tempo, voltei para solicitar mais uma vez as consultas produtivas de voces, vamos lá.

Tenho esse sistema de Controle de Processo de Honorários Advocatícios que está em implantação. O que ocorre é que no Filtro de Pesquisa da ListBox não consigo listar nenhum registro por nome do cliente. A listbox esta funcionando perfeitamente a inconsistência só ocorre quando clico no campo de pesquisa. O Objetivo é filtrar os dados que já esyão sendo listados na ListBox com sucesso inclusive funcionando perfeitamente, porém o campo de pesquisa(filtrar) é de grande uso para o Advogado ao invés de só utilizar a barra de rolagem.

Quando não é utilizado o campo de pesquisa, utilizo a seleção direto pelos registros já listados na ListBox, e consigo efetuar todas as operações de: Inclusão, Alteração, e exclusão.

outro problema é que no momento de clicar no campo pesquisa, o cabeçalho não é listado, gostaria que mantivesse o mesmo cabeçalho, ou seja, deixando fixo. quando eu clicar no resultado no filtro seja o mesmo que está funcionando quando clico na ListBox.

Fico no aguardo!

Obs: Anexei os arquivos apenas do formulário do projeto VBA, caso seja necessário a planilha favor solicitar.
No arquivo compactado tem a senha do projeto VBA para abrir.

A rotina de pesquisa está neste Módulo: Private Sub caixa_Filtro_Change()
Fórum.rar
Você não está autorizado a ver ou baixar esse anexo.
#62929
servercold escreveu: 12 Mar 2021 às 10:42 Obs: Anexei os arquivos apenas do formulário do projeto VBA, caso seja necessário a planilha favor solicitar.
Sugestão: disponibilize diretamente aqui no fórum uma amostra do seu arquivo Excel com alguns dados, descreva na própria planilha, com exemplos, qual o resultado que está sendo gerado atualmente após o usuário efetuar determinada ação e qual seria o resultado desejado.
Não disponibilize arquivos/planilhas protegidos por senha.
JCabral agradeceu por isso
#62961
Boa Tarde!,
Obrigado pela atenção.

Conforme solicitado, segue agora uma cópia da Planilha Demo. Dentro do arquivo compactado existe um arquivo com as senhas de acesso a planilha.

Obs: Para simular o problema, acesse o Menu Principal e clique na opção Botão [Honorários], na TabDados clique no Botão [Formulário], será aberta a Tela de Registro de Honorários, já existe 5 registros de demonstração.

1) Nesta primeira tela do ListBox tudo está em plano funcionamento, se observar e clicar em qualquer registro os mesmos são exibidos no Form corretamente e todas as operações de Inclusão, Alteração e Excluir estão funcionando;

2) O PROBLEMA:

2.1) A inconsistência ocorre quando iremos utilizar a funcionalidade do campo Pesquisa, quando digitado o primeiro Caractere sistema já esta fazendo a busca corretamente, porém ao clicar no resultado da busca os campos acima na 10 Colunas não consigo mais exibir no formulário com isso ocorre o erro, e o cabeçalho da ListBox fica em branco;

2.2) Comentei a linha abaixo justamente para tentar debbugar, pois o erro começa nela.

'.List(linhalistbox, 10) = Sheets("TabDados").Cells(Linha, 11) -- erro começa aqui


Obrigado pela atenção
Você não está autorizado a ver ou baixar esse anexo.
#62962
Conforme solicitado, segue agora uma cópia da Planilha Demo. Dentro do arquivo compactado existe um arquivo com as senhas de acesso a planilha.

Obs: Para simular o problema, acesse o Menu Principal e clique na opção Botão [Honorários], na TabDados clique no Botão [Formulário], será aberta a Tela de Registro de Honorários, já existe 5 registros de demonstração.

1) Nesta primeira tela do ListBox tudo está em plano funcionamento, se observar e clicar em qualquer registro os mesmos são exibidos no Form corretamente e todas as operações de Inclusão, Alteração e Excluir estão funcionando;

2) O PROBLEMA:

2.1) A inconsistência ocorre quando iremos utilizar a funcionalidade do campo Pesquisa, quando digitado o primeiro Caractere o sistema já esta fazendo a busca corretamente, porém ao clicar no resultado da busca os campos acima na 10 Colunas não consigo mais exibir no formulário com isso ocorre o erro, e o cabeçalho da ListBox fica em branco;

2.2) Comentei a linha abaixo justamente para tentar debbugar, pois o erro começa nela.

'.List(linhalistbox, 10) = Sheets("TabDados").Cells(Linha, 11) -- erro começa aqui


Obrigado pela atenção
osvaldomp escreveu: 17 Mar 2021 às 08:35
servercold escreveu: 12 Mar 2021 às 10:42 Obs: Anexei os arquivos apenas do formulário do projeto VBA, caso seja necessário a planilha favor solicitar.
Sugestão: disponibilize diretamente aqui no fórum uma amostra do seu arquivo Excel com alguns dados, descreva na própria planilha, com exemplos, qual o resultado que está sendo gerado atualmente após o usuário efetuar determinada ação e qual seria o resultado desejado.
Não disponibilize arquivos/planilhas protegidos por senha.
#62975
Bom Dia @osvaldomp ,

Obrigado pela atenção, material disponibilizado.
osvaldomp escreveu: 17 Mar 2021 às 08:35
servercold escreveu: 12 Mar 2021 às 10:42 Obs: Anexei os arquivos apenas do formulário do projeto VBA, caso seja necessário a planilha favor solicitar.
Sugestão: disponibilize diretamente aqui no fórum uma amostra do seu arquivo Excel com alguns dados, descreva na própria planilha, com exemplos, qual o resultado que está sendo gerado atualmente após o usuário efetuar determinada ação e qual seria o resultado desejado.
Não disponibilize arquivos/planilhas protegidos por senha.
Você não está autorizado a ver ou baixar esse anexo.
#62983
osvaldomp escreveu: 17 Mar 2021 às 08:35 Não disponibilize arquivos/planilhas protegidos por senha.
Na sua última postagem não encontrei qualquer arquivo Excel e na sua postagem anterior há um Excel protegido por senha ;)
#62998
@osvaldomp Boa Tarde!

Peço desculpas, Removi a senha de Proteção na abertura do Arquivo, Removi a senha do Projeto VBA, apenas a senha Login no Sistema que deixei, é só colocar a senha padrão abaixo e mais nada.

Obrigado pela atenção

Usuário: Adm
Senha: 123
Você não está autorizado a ver ou baixar esse anexo.
#63003
#
Olá. Olhei o seu arquivo e infelizmente eu não consigo lhe ajudar devido ao tamanho e à complexidade do projeto VBA.

Eu sugiro que você consulte a pessoa ou a empresa que elaborou o projeto, ou aguarde ajuda de algum colega aqui do fórum. Sorry.
servercold agradeceu por isso
#63206
Boa noite.

Adaptando alguns exemplos de códigos obtidos na internet acho que encontrei uma solução.
Valeu pelo aprendizado.
Anexo planilha.
Verifique se atende

É isso
Você não está autorizado a ver ou baixar esse anexo.
long long title how many chars? lets see 123 ok more? yes 60

We have created lots of YouTube videos just so you can achieve [...]

Another post test yes yes yes or no, maybe ni? :-/

The best flat phpBB theme around. Period. Fine craftmanship and [...]

Do you need a super MOD? Well here it is. chew on this

All you need is right here. Content tag, SEO, listing, Pizza and spaghetti [...]

Lasagna on me this time ok? I got plenty of cash

this should be fantastic. but what about links,images, bbcodes etc etc? [...]

Estamos migrando para uma comunidade no Discord