Lista Suspensa com campos em branco

[Mahasiah Lianon]

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?

[Patropi]

Boa tarde

Dá para fazer usando intervalo dinâmico com a função DESLOC.

Acesse um tutorial neste link:

http://guiadoexcel.com.br/lista-de-dados-com-tamanho-dinamico-excel

Dê retorno.

At.te

[Mahasiah Lianon]

Tutorial nota 10.

Agora eu só precisava saber se teria como, toda vez que eu abrisse a Pasta de trabalho 1, onde se encontra a lista suspensa, o excel abrisse automaticamente a Pasta de Trabalho 2, que é onde vai estar o meu banco de dados de onde a validação vai pegar os valores.

[Basole]

insira este comando no evento open do Workbook

ActiveWorkbook.Sheets(2).Activate

[Mahasiah Lianon]

Obrigado pela resposta, mas este comando abre uma outra planilha dentro da mesma pasta de trabalho, certo?

Como seria o comando para abrir uma outra pasta de trabalho?

Achei o comando que eu precisava:

Private Sub Workbook_Open()

Workbooks.Open ("C:\Users\Usuário\Desktop\Dados.xlsm")

End Sub

Porém eu precisava que o arquivo que é aberto por último, fosse aberto em segundo plano.

[zinhovba]

Boa noite!!

já tentou esse comando..

Workbooks("ArquivoNome.xls").Activate

??

Private Sub Workbook_Open()
Workbooks.Open ("C:\Users\Usuário\Desktop\Dados.xlsm")
Workbooks("ArquivoNome.xls").Activate
End Sub

Att

[Mahasiah Lianon]

Perfeito, zinho. Assim a Pasta1 abre a Pasta2, e em seguida se coloca em 1o plano.

[zinhovba]

Bom dia!!

Na próxima indique sua postagem cruzada!!!

http://www.planilhando.com.br/forum/viewtopic.php?f=20&t=9822&p=51456#p51456

Att

[Patropi]

Caso o autor necessite, o mesmo será reaberto, para isso deverá entrar em contato com a moderação solicitando o desbloqueio.