Colar em uma planilha obedecendo a validação de dados Excel

Download de nota fiscal eletrônica XML nfe Excel capa
Download de XML de NFe Excel
4 de agosto de 2018
Gráfico comparativo de linhas capa
Gráfico comparativo de linhas – Exemplo Brasileirão 2018 1º turno
28 de agosto de 2018

Colar em uma planilha obedecendo a validação de dados Excel

Neste artigo é demonstrado como colar em uma planilha obedecendo a validação de dados no Excel.

Veja mais em: https://www.guiadoexcel.com.br/vba/

Se você tem uma planilha com validação de dados o usuário irá digitar os dados corretamente, mas se ele colar os dados você terá por padrão um problema no Excel, pois os dados não são validados neste momento, ignorando totalmente as configurações de bloqueio, e pior, matando toda essa configuração caso cole diretamente, sem colar valores.

Neste artigo demonstramos como solucionar o problema. para isso siga o artigo, o vídeo ou o arquivo para download.

Preparando a planilha

  1. A primeira parte para a preparação da planilha é selecionar a área aonde você tem a validação de dados e clicar com o botão direito desmarcando a opção Bloqueadas na guia Proteção.Bloquear colar dados incorretos em validação de dados 1
  2. Clique na guia Revisão e clique no botão Proteger Planilha. Deixe marcado apenas as duas opções “Selecionar células bloqueadas” e “Selecionar células desbloqueadas”Bloquear colar dados incorretos em validação de dados 2
  3. Estas opções são importantes para evitar que sejam excluídas as validações ao colar os dados.

Com esta correção nós reduzimos os problemas, mas ainda os dados incorretos podem ser colados. Siga a próxima etapa para bloquear que sejam colados dados incorretos.

Bloqueando colar dados incorretos na validação

Agora é necessário que seja incluso um código VBA na planilha, este código evitará que sejam colados dados incorretos na área com validação de dados.

  1. Clique na guia Desenvolvedor e no botão Visual Basic ou pressione ALT+F11
  2. Clique na planilha aonde há a validação de dados na árvore á esquerda.Bloquear colar dados incorretos em validação de dados 3
  3. Clique duas vezes na planilha e cole os valores no editor de código
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim cell As Range
    
    If Not Intersect(Target, Me.Range("C9:C1048576")) Is Nothing Then
        For Each cell In Target
            If Not cell.Validation.Value Then
                MsgBox "Há um problema de dado inválido: " & cell.Value
                
                Application.Undo
                Exit Sub
            End If
        Next
    End If
End Sub

4. Altere o endereço no Range em C9:C1048576 conforme o range que você deseja que tenha os dados protegidos.

Veja abaixo o resultado final.

Bloquear colar dados incorretos em validação de dados

Abraço

Marcos Rieper


Clique aqui e leia mais sobre Excel VBA. https://www.guiadoexcel.com.br/vba/ O Guia do Excel foi criado por Marcos Rieper e oferece artigos, dicas, tutoriais e modelos de planilhas prontas. Aqui você encontra tudo sobre Excel, seja de nível básico, intermediário,  avançado e VBA. O Guia do Excel oferece diversos materiais completamente gratuitos para download. Navegue em nosso site e confira! Conheça também a nossa Loja do Excel https://loja.guiadoexcel.com.br/
Cursos

Curso Excel Básico – 1 ano de acesso

R$99,00

COMPRAR
Cursos

Curso Excel Completo – Curso Excel Básico + Curso Excel Avançado – Acesso Vitalício

R$218,00 R$179,00

COMPRAR
Cursos

Curso Excel Master – Curso Excel Básico + Curso Excel Avançado + Curso VBA Excel + LP – Acesso Vitalício

R$357,00 R$249,00

COMPRAR
Cursos

Curso Excel PRO – Curso Excel Avançado + Curso VBA Excel + Lógica de programação – Acesso Vitalício

R$258,00 R$199,00

COMPRAR

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

This site uses Akismet to reduce spam. Learn how your comment data is processed.

Inscreva-se no nosso canal do Youtube!


Junte-se ao nosso canal do Youtube. Começamos em abril de 2016, mas já temos mais de 06:00 h de treinamentos gratuitos e este número irá aumentar. Vídeos novos todos os sábados.