KutoolsforOffice — Uma solução, cinco ferramentas poderosas.Fazer mais com menos esforço.

Como ativar o preenchimento automático ao digitar numa lista pendente do Excel?

AutorSiluvia Data de Modificação

Numa Lista suspensa de validação de dados com muitos itens, é necessário deslocar-se para cima e para baixo na lista para encontrar o item pretendido ou escrever corretamente a palavra completa na caixa da lista. Existe alguma forma de fazer com que a Lista suspensa se autocomplete ao escrever os caracteres correspondentes? Isto ajudaria os utilizadores a trabalhar de forma mais eficiente em folhas de cálculo com Lista suspensa nas células. Este tutorial apresenta dois métodos para o conseguir.

Uma captura de ecrã que demonstra a funcionalidade de preenchimento automático numa lista pendente do Excel

Tornar listas pendentes autocompletáveis com código VBA
Torne facilmente as Lista suspensa autocompletáveis em 2 segundos

Mais tutoriais sobre listas pendentes...


Tornar listas pendentes autocompletáveis com código VBA

Siga os passos abaixo para tornar uma lista pendente autocompletável assim que digitar as letras correspondentes na célula.

Em primeiro lugar, insira uma caixa combinada na folha de cálculo e ajuste as suas propriedades.

  1. Abra a folha de cálculo que contém as células com listas pendentes que deseja tornar autocompletáveis.
  2. Antes de inserir uma caixa combinada, é necessário adicionar o separador Programador ao Friso do Excel. Se o separador Programador já estiver visível no seu Friso,passe para o passo 3. Caso contrário, siga os passos seguintes para que o separador Programador apareça no Friso: clique em «Ficheiro» > «Opções» para abrir a janela «Opções do Excel». Nessa janela, clique em «Personalizar Friso» no painel esquerdo, marque a caixa «Programador» e, em seguida, clique no botão «OK». Veja a captura de ecrã:
    Uma captura de ecrã que mostra a janela Opções do Excel onde o separador Programador está ativado
  3. Clique em «Programador» > «Inserir» > «Caixa Combinada (Controlo ActiveX)».
    Uma captura de ecrã da seleção da Caixa de Combinação nas ferramentas do Programador no Excel
  4. Desenhe uma caixa combinada na planilha atual, clique com o botão direito do rato sobre ela e selecione «Propriedades» no menu de contexto.
    Uma captura de ecrã que ilustra como desenhar e selecionar propriedades para uma Caixa de Combinação no Excel
  5. Na caixa de diálogo «Propriedades», substitua o texto original no campo «(Nome)» por «TempCombo».
    Uma captura de ecrã da caixa de diálogo Propriedades de uma Caixa de Combinação no Excel, renomeando-a para TempCombo
  6. Desative o «Modo de Estrutura» ao clicar em «Programador» > «Modo de Estrutura».

De seguida, aplique o código VBA seguinte

  1. Clique com o botão direito do rato no separador da folha atual e selecione «Ver Código» no menu de contexto. Veja a captura de ecrã:
    Uma captura de ecrã que mostra o menu de contexto para aceder ao Ver Código na folha de cálculo atual no Excel
  2. Na janela «Microsoft Visual Basic para Aplicações» que se abre, copie e cole o código VBA seguinte na janela de código da folha de cálculo.
    Código VBA: Autocompletar ao escrever numa lista pendente
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    'Update by Extendoffice: 2020/01/16
        Dim xCombox As OLEObject
        Dim xStr As String
        Dim xWs As Worksheet
        Dim xArr
        
        Set xWs = Application.ActiveSheet
        On Error Resume Next
        Set xCombox = xWs.OLEObjects("TempCombo")
        With xCombox
            .ListFillRange = ""
            .LinkedCell = ""
            .Visible = False
        End With
        If Target.Validation.Type = 3 Then
            Target.Validation.InCellDropdown = False
            Cancel = True
            xStr = Target.Validation.Formula1
            xStr = Right(xStr, Len(xStr) - 1)
            If xStr = "" Then Exit Sub
            With xCombox
                .Visible = True
                .Left = Target.Left
                .Top = Target.Top
                .Width = Target.Width + 5
                .Height = Target.Height + 5
                .ListFillRange = xStr
                If .ListFillRange = "" Then
                    xArr = Split(xStr, ",")
                    Me.TempCombo.List = xArr
                End If
                .LinkedCell = Target.Address
            End With
            xCombox.Activate
            Me.TempCombo.DropDown
        End If
    End Sub
    Private Sub TempCombo_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
        Select Case KeyCode
            Case 9
                Application.ActiveCell.Offset(0, 1).Activate
            Case 13
                Application.ActiveCell.Offset(1, 0).Activate
        End Select
    End Sub
    Uma captura de ecrã que mostra o código VBA adicionado para ativar o preenchimento automático em listas pendentes do Excel
  3. Prima simultaneamente as teclas «Alt + Q» para fechar a janela do Microsoft Visual Basic para Aplicações.

A partir de agora, ao clicar numa célula com lista pendente, esta será exibida automaticamente. Basta começar a digitar a letra inicial para que o item correspondente seja preenchido automaticamente na célula selecionada. Veja a captura de ecrã:

Uma captura de ecrã que demonstra a funcionalidade de preenchimento automático numa lista pendente do Excel

Nota:Este código não funciona para Mesclado.

Torne facilmente as Lista suspensa autocompletáveis em 2 segundos

Para a maioria dos utilizadores do Excel, o método VBA anterior é difícil de dominar. No entanto, com a funcionalidade «Tornar lista suspensa pesquisável» do Kutools para Excel, pode ativar facilmente o autocompletar numa lista suspensa de validação de dados num intervalo limitado em apenas 2 segundos. Além disso, esta funcionalidade está disponível em todas as versões do Excel.

Kutools para Exceloferece mais de 300 funcionalidades avançadas para simplificar tarefas complexas, potenciando a criatividade e a eficiência.Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados descomplicada.Informações detalhadas de Kutools para Excel...         Teste gratuito...
  1. Para ativar o autocompletar nas suas listas pendentes, selecione primeiro o intervalo que contém as listas. Depois, aceda ao separador «Kutools», escolha «Lista suspensa» > «Tornar Lista suspensa Pesquisável, Auto-apresentação».
  2. Na caixa de diálogo «Tornar a Lista Suspensa Pesquisável», clique no botão «OK» para guardar a definição.
  3. Uma captura de ecrã das definições do Kutools para ativar listas pendentes pesquisáveis no Excel

Resultado

Após concluir a configuração, ao clicar numa célula com lista suspensa dentro do intervalo limitado, é apresentada uma caixa de lista. Ao introduzir caracteres, desde que exista um item correspondente exato, a palavra inteira é imediatamente destacada na caixa de lista e pode ser inserida na célula com lista suspensa bastando premir a tecla Enter.

Uma demonstração da funcionalidade de preenchimento automático em listas pendentes do Excel utilizando o Kutools

Nota: Para utilizar esta funcionalidade, por favor transfira e instale o Kutools para Excel. Ou pode clicar para saber mais sobre esta funcionalidade.

Artigos relacionados:

Como criar uma lista pendente com várias caixas de verificação no Excel?
Muitos utilizadores do Excel desejam criar listas pendentes com várias caixas de verificação, de modo a poderem selecionar múltiplos itens de uma só vez. Na verdade, não é possível criar esse tipo de lista diretamente com a Validação de Dados. Neste tutorial, mostramos-lhe dois métodos eficazes para criar uma lista pendente com várias caixas de verificação no Excel — a solução perfeita para este desafio comum.

Criar uma lista pendente a partir de outro livro no Excel
É bastante simples criar uma lista pendente de validação de dados entre folhas dentro do mesmo livro. Mas e se os dados necessários para a validação estiverem noutro livro? Neste tutorial, vai aprender em detalhe como criar uma lista pendente a partir de outro livro no Excel.

Criar uma lista pendente pesquisável no Excel
Numa lista pendente com muitos valores, encontrar o pretendido não é tarefa fácil. Já lhe mostrámos um método que permite autocompletar automaticamente a lista ao digitar a primeira letra na caixa pendente. Além dessa funcionalidade, pode ainda tornar a lista pendente totalmente pesquisável — e assim acelerar a localização dos valores que procura. Experimente já o método descrito neste tutorial!

Preencher automaticamente outras células ao selecionar valores numa lista pendente do Excel
Imagine que criou uma lista pendente com base nos valores no intervalo de células B8:B14. Ao selecionar qualquer valor nessa lista, pretende que os valores correspondentes no intervalo C8:C14 sejam preenchidos automaticamente na célula escolhida. Para resolver este desafio, os métodos apresentados neste tutorial serão extremamente úteis.

Mais tutoriais sobre listas pendentes...

As Melhores Ferramentas de Produtividade para o Office

🤖KUTOOLS AI Assistente: Revolucione o Análise de Dados com base em:Execução Inteligente   |  Gerar Código|  Criar fórmulas personalizadas  |  Analisar Dados e Gerar Gráficos|  Invocar Funções Aprimoradas
Funcionalidades Populares:Localizar, Destacar ou Marcar Duplicatas   |  Excluir linhas em branco   |  Combinar Colunas ou Células sem Perder Dados   |   Arredondamento sem usar fórmula...
Super PROC:VLookup com Múltiplos Critérios  |  VLookup com Múltiplos Valores  |   VLookup em Múltiplas Folhas   |   Correspondência Fuzzy....
Lista Suspensa Avançada:Criar Rapidamente Lista de Seleção   |  Lista de Seleção Dependente   |  Lista de Seleção com Múltipla Escolha....
Gestor de Colunas:Adicionar um Número Específico de Colunas|Mover Colunas|Alternar Estado de Visibilidade de Colunas Ocultas|Comparar Intervalos e Colunas...
Funcionalidades em Destaque:Grade de foco   |  Visualização de Design   |Barra de fórmulas aprimorada   | Gestor de Pastas de Trabalho e Folhas   |  Biblioteca de Recursos(Texto Automático)|  Seleção de Data   |  Consolidar Planilhas  |  Encriptar/Descriptografar Células   | Enviar Emails por Lista   |  Super Filtro   |   Filtro Especial(Filtrar Células com Fonte em Negrito/itálico/rasurado...) ...
Principais Conjuntos de Ferramentas 15:12 Ferramentasde Texto(Adicionar Texto,Excluir Caracteres Específicos, ...)|   50+Tiposde Gráfico(Gráfico de Gantt, ...)|   40+ Fórmulas Práticas(Calcular a idade com base na data de nascimento, ...)|   19 Ferramentasde Inserção(Inserir QR Code,Inserir Imagem a Partir do Caminho, ...)|   12 Ferramentasde Conversão(Converter em Palavras,Conversão de moeda, ...)|   7 Ferramentasde Mesclar e Dividir(Mesclar Linhas Avançado,Dividir Células, ...)|... e muito mais
Utilize o Kutools na sua língua preferida – suporta inglês, espanhol, alemão, francês, chinês e mais 40+ idiomas!

Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...


Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil

  • Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
  • Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!

Todos os suplementos Kutools — num único instalador.

Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.

ExcelWordOutlookTabsPowerPoint
  • Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Um instalador, uma licença— configuração em minutos (pronto para MSI)
  • Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
  • Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
  • Melhor relação qualidade-preço— poupe face à compra individual dos suplementos