Dica: outros idiomas são traduzidos pelo Google. Você pode visitar o English versão deste link.
Entrar
x
or
x
x
Registre-se
x

or

Como definir um valor padrão na lista suspensa de validação de dados no Excel?

Definir um valor padrão na lista suspensa de validação de dados ajuda os outros a identificar as células da lista suspensa facilmente em um relance em uma planilha. Este artigo fornece um método VBA para definir um valor padrão na lista suspensa de validação de dados em detalhes.

Defina um valor padrão na lista suspensa de validação de dados com o código VBA


Você pode interessar:

Combine várias planilhas / pastas de trabalho em uma planilha / pasta de trabalho:

Combine várias planilhas ou livros de trabalho em uma única planilha ou pasta de trabalho pode ser uma tarefa enorme no seu trabalho diário. Mas, se você tiver Kutools for Excel, é poderosa utilidade - Combinar pode ajudá-lo a combinar várias planilhas, pastas de trabalho em uma planilha ou pasta de trabalho.

Kutools for Excel inclui mais do que 300 ferramentas úteis do Excel. Gratuito para tentar sem limitação nos dias 60. Consulte mais informações Baixe o teste gratuito agora

Guia do Office Habilitar Edição e Navegação por Guias no Office e Facilitar seu Trabalho ...
Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%
  • Reutilizar qualquer coisa: Adicione as fórmulas, gráficos e outras coisas mais usadas ou complexas aos seus favoritos e reutilize-os rapidamente no futuro.
  • Mais do que recursos de texto 20: Extrair Número da Cadeia de Texto; Extrair ou remover parte dos textos; Converta números e moedas em palavras inglesas ...
  • Mesclar Ferramentas: Várias pastas de trabalho e folhas em um; Mesclar várias células / linhas / colunas sem perder dados; Mesclar linhas duplicadas e soma ...
  • Ferramentas de divisão: Dados divididos em várias folhas com base no valor; Uma pasta de trabalho para vários arquivos Excel, PDF ou CSV; Uma coluna para várias colunas ...
  • Colar pulando Linhas ocultas / filtradas; Contagem e Soma pela cor de fundo; Criar lista de discussão e Envie e-mails pelo valor da célula...
  • Super Filtro: Crie esquemas de filtro avançados e aplique a qualquer folha; tipo por semana, dia, frequência e mais; filtros por negrito, fórmulas, comentário ...
  • Mais de recursos poderosos do 300; Funciona com o Office 2007-2019 e 365; Suporta todos os idiomas; Fácil implantação em sua empresa ou organização.

Defina um valor padrão na lista suspensa de validação de dados com o código VBA


Como abaixo a captura de tela, supondo que todas as células no intervalo B2: C7 contém lista suspensa e você deseja definir um valor padrão (diz - Escolha da lista -) nessa lista suspensa antes de escolher valores a partir deles. Você pode tentar o seguinte código VBA.

1. Clique com o botão direito na guia da folha com as listas suspensas que você precisa para definir um valor padrão e clique em Ver código a partir do menu.

2. No Microsoft Visual Basic para Aplicações janela, copie e cole o seguinte código VBA na janela Código.

Código VBA: defina um valor padrão na lista suspensa de validação de dados

Sub DropDownListToDefault()
    Dim xCell As Range
    Dim xRg As Range
    Dim xAcCell As Range
    Dim xScreen As Boolean
    On Error Resume Next
    Set xAcCell = Application.ActiveCell
    Set xRg = ActiveSheet.UsedRange.SpecialCells(xlCellTypeAllValidation)
    If xRg Is Nothing Then
        MsgBox "No data validation drop-down lists in current worksheet", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For Each xCell In xRg
        If xCell.Validation.Type = 3 Then
            If xCell.Value = "" Then xCell.Value = "'- Choose from the list -"
        End If
    Next
    xAcCell.Select
    Application.ScreenUpdating = xScreen
End Sub

notas: você pode alterar o valor padrão no código VBA para aquele que você precisa.

6. aperte o F5 chave para executar o código. Você pode ver os valores padrão serem adicionados a todas as células da lista suspensa, conforme mostrado abaixo na tela.

Notas:

1. O valor padrão desaparecerá depois de selecionar o valor na lista suspensa.

2. Se não houver listas suspensas de validação de dados na planilha atual, você receberá a caixa de prompt abaixo.


Artigos relacionados:


Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Inserir rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de endereços e enviar e-mails ...
  • Bar Super Fórmula (facilmente editar várias linhas de texto e fórmula); Layout de leitura (leia e edite facilmente grandes números de células); Colar para intervalo filtrado...
  • Mesclar células / linhas / colunas sem perder dados; Conteúdo de células divididas; Combinar linhas / colunas duplicadas... Prevenir Células Duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Exclusivo Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros de trabalho; Seleção aleatória ...
  • Cópia exata Múltiplas Células sem alterar a referência da fórmula; Criar automaticamente referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair texto, Adicionar texto, remover por posição, Remover espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salve e aplique esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro especial por negrito, itálico ...
  • Combinar pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Dividir dados em várias planilhas; Lote Converter xls, xlsx e PDF...
  • Mais de recursos poderosos do 300. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos Avaliação gratuita de um dia de 30.
kte tab 201905

A guia Office traz a interface com guias para o Office e torna seu trabalho muito mais fácil

  • Ativar edição e leitura com guias no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
fundo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Martin Goodwin · 10 months ago
    Love the code about 'VBA code: set a default value in data validation drop-down list', how do I use the same code for just one column with one dropdown?