Notifications
Clear all

Lista Suspensa com campos em branco

23 Posts
2 Usuários
0 Reactions
4,332 Visualizações
(@reinaldos)
Posts: 32
Eminent Member
Topic starter
 

Seguinte, eu criei duas planilhas. Uma onde eu tenho uma lista com 20 itens, e outra onde eu escolho estes itens à partir de uma Lista Suspensa.

O problema é, quando eu uso a Validação de Dados colocando apenas o número de campos que contém itens (A1:A20), os itens aparecem normalmente na Lista Suspensa. Porém, se eu coloco, por exemplo A1:A100 na Validação de Dados, a Lista Suspensa mostra todos os campos em branco (A21:A100), e por isso aparenta estar vazia. Aí eu tenho que rolar a Lista Suspensa até o início para poder escolher os itens.

O motivo para eu ter 20 itens e colocar a validação em 100 campos é porque que gostaria de deixar espaço para o caso de mais itens virem a ser cadastrados. Por isso eu gostaria de saber como não aparecer estes campos em branco na Lista Suspensa, dando a impressão de que ela está vazia, seja eliminando estes campos em branco da Lista Suspensa, ou tornando a Validação de Dados auto-ajustável, no caso de novos itens serem cadastrados. Isso é possível?

 
Postado : 03/12/2013 1:20 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia ReinaldoS,

Vê se ajuda.

Qualquer coisa da o grito.
Abraço

 
Postado : 04/12/2013 5:51 am
(@reinaldos)
Posts: 32
Eminent Member
Topic starter
 

Exatamente isso. E o uso do ThisWorkbook.Name fica bem melhor que o "NomedoArquivo".

Eu vi aqui que mesmo sem a função IsFileOpen, ele não dá erro, caso o Banco já esteja aberto, e você abra uma das Listas. É realmente necessário ter essa verificação do Banco estar previamente aberto com a isFileOpen?

 
Postado : 04/12/2013 6:19 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Na próxima indique sua postagem cruzada!!!
http://forum.clubedohardware.com.br/lis ... os/1163398

Att

 
Postado : 04/12/2013 6:23 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia ReinaldoS,

Onde você usa o "ThisWorkbook.Name" no lugar de "NomedoArquivo" ?

Realmente não dá erro, mas ele abre a planilha do banco de dados toda hora onde caso tenha alguma alteração na listagem, ele vai aparecer uma mensagem dizendo que está aberto e perguntar se quer continuar, caso continue ele abrirá novamente e não salva a alteração.

O IsFileOpen no banco de dados serve também para verificar a existência do arquivo e ver se tem algum aberto, caso não tenha aparece o formulário.

Qualquer coisa da o grito.
Abraço

 
Postado : 04/12/2013 6:25 am
(@reinaldos)
Posts: 32
Eminent Member
Topic starter
 

Onde você usa o "ThisWorkbook.Name" no lugar de "NomedoArquivo" ?

Onde você colocou:

Workbooks(ThisWorkbook.Name).Activate

Eu estava usando anteriormente:

Workbooks("Lista1").Activate

de modo que, se eu mudasse o nome do arquivo, tinha que mudar o nome no código. Da forma como você colocou, não tem esse problema.

caso tenha alguma alteração na listagem, ele vai aparecer uma mensagem dizendo que está aberto e perguntar se quer continuar, caso continue ele abrirá novamente e não salva a alteração.

Agora sim eu entendi como faz toda diferença verificar se está aberto ou não.

Mas ainda estou tendo problemas quando o Banco e a Lista estão em pastas diferentes. Dá um aviso de que o vínculo não pode ser atualizado.

 
Postado : 04/12/2013 7:26 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Mas essas pastas devem ter pelo menos uma lógica/padrão.

Como estão localizados as listas e os bancos?

 
Postado : 04/12/2013 7:28 am
(@reinaldos)
Posts: 32
Eminent Member
Topic starter
 

No momento está como no anexo. É que antes estava tudo na mesma pasta.

 
Postado : 04/12/2013 8:17 am
(@reinaldos)
Posts: 32
Eminent Member
Topic starter
 

Acho que consegui consertar tudo ,porque parou de dar o erro de vínculo.

Mas qual é a necessidade do comando ChDir? Parece funcionar sem ele também.

 
Postado : 04/12/2013 8:43 am
Página 2 / 2