ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Validation fails on copying (https://www.excelbanter.com/excel-discussion-misc-queries/141921-validation-fails-copying.html)

x6v87qe

Validation fails on copying
 
Hi, forum
I've got a problem on the validation. Actually, The validation works fine
when I type in any info.
However, when I auto fill the list using dropdown function or I copy any
info from some where else, the validation totally dfailed ! Can anybody
tells me how could this happen ? What should I do to keep the validation
rules when copying ?

thanks in advance ~!

niou

Max

Validation fails on copying
 
It's a known fact that copy-paste or dragging down will defeat data
validation (DV).

If you're trying to prevent duplicate entries using DV, then you could try
Vasant's code below, which will prevent duplicate entries -- including
preventing copy-paste or dragging which would defeat data validation -- for
col A in a sheet. Entries are assumed made progressively from row1 down.

To install the code, right-click on the worksheet tab, select View Code,
then copy and paste the code below into the white space on the right. Press
Alt+Q to return to Excel. Test it out ..

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
' Vasant Nanavati 2002
On Error GoTo ErrorHandler
If Not Intersect(Target, Columns(1)) Is Nothing Then
If Not Range(Cells(1, 1), Cells(Intersect _
(Target, Columns(1)).Row - 1, 1)).Find _
(Target.Value, LookIn:=xlValues, LookAt:= _
xlWhole) Is Nothing Then
MsgBox "Part no. already exists!"
Application.EnableEvents = False
With Intersect(Target, Columns(1))
.ClearContents
.Select
End With
End If
End If
ErrorHandler:
Application.EnableEvents = True
End Sub
--
Max
Singapore
http://savefile.com/projects/236895
xdemechanik
---
"x6v87qe" wrote:
Hi, forum
I've got a problem on the validation. Actually, The validation works fine
when I type in any info.
However, when I auto fill the list using dropdown function or I copy any
info from some where else, the validation totally dfailed ! Can anybody
tells me how could this happen ? What should I do to keep the validation
rules when copying ?

thanks in advance ~!

niou


x6v87qe

Validation fails on copying
 
Thanks max for you quick response. That code works fine for preventing dups.
The entries I have does have some dups. It seems I have to accept the fact :(

"Max" wrote:

It's a known fact that copy-paste or dragging down will defeat data
validation (DV).

If you're trying to prevent duplicate entries using DV, then you could try
Vasant's code below, which will prevent duplicate entries -- including
preventing copy-paste or dragging which would defeat data validation -- for
col A in a sheet. Entries are assumed made progressively from row1 down.

To install the code, right-click on the worksheet tab, select View Code,
then copy and paste the code below into the white space on the right. Press
Alt+Q to return to Excel. Test it out ..

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
' Vasant Nanavati 2002
On Error GoTo ErrorHandler
If Not Intersect(Target, Columns(1)) Is Nothing Then
If Not Range(Cells(1, 1), Cells(Intersect _
(Target, Columns(1)).Row - 1, 1)).Find _
(Target.Value, LookIn:=xlValues, LookAt:= _
xlWhole) Is Nothing Then
MsgBox "Part no. already exists!"
Application.EnableEvents = False
With Intersect(Target, Columns(1))
.ClearContents
.Select
End With
End If
End If
ErrorHandler:
Application.EnableEvents = True
End Sub
--
Max
Singapore
http://savefile.com/projects/236895
xdemechanik
---
"x6v87qe" wrote:
Hi, forum
I've got a problem on the validation. Actually, The validation works fine
when I type in any info.
However, when I auto fill the list using dropdown function or I copy any
info from some where else, the validation totally dfailed ! Can anybody
tells me how could this happen ? What should I do to keep the validation
rules when copying ?

thanks in advance ~!

niou


Max

Validation fails on copying
 
welcome, niou.
--
Max
Singapore
http://savefile.com/projects/236895
xdemechanik
---
"x6v87qe" wrote in message
...
Thanks max for you quick response. That code works fine for preventing
dups.
The entries I have does have some dups. It seems I have to accept the fact
:(





All times are GMT +1. The time now is 02:34 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com