Página 1 de 1

Validação de dados sobrescrita com copiar e colar

Enviado: 19 Out 2020 às 20:56
por Bemarand
Olá, pessoal!

Tenho uma planilha com algumas colunas que serão preenchidas pelos usuários com opções de campos de seleção, por lista de Validação de Dados. O problema é que a mensagem de erro só aparece quando a pessoa tenta digitar errado. Quando ela copia e cola uma informação de qualquer outro campo no lugar destes campos da lista de seleção, esta informação "sobrescreve" a lista e substitui a validação de dados, perdendo a regra. :shock:
Pesquisei em vários lugares mas só encontrei formas de bloqueio no VBA para os caso de limitação por range de valores, e não por lista (no caso de nomes). Poderiam me orientar, por favor?

Obrigada!

Re: Validação de dados sobrescrita com copiar e colar

Enviado: 20 Out 2020 às 08:49
por osvaldomp
Segue uma ideia.
O código abaixo, instalado no módulo da planilha, irá limpar a Área de Transferência se for selecionada alguma célula das colunas A:D e assim irá impedir a operação de Colar naquelas colunas. Para acessar o módulo clique com o direito na guia da planilha de interesse e escolha Exibir Código.
Código: Selecionar todos
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 If Not Intersect(Columns("A:D"), Target) Is Nothing Then Application.CutCopyMode = False
End Sub