On Error Resume Next ?

[Nigel]

Hi All

What causes On Error Resume Next to be ignored ??

I have a piece of code that exploits the Collection limit of unique key
values only, however it still throws an error when trying to add a duplicate
key to the Collection - as if the On Error Resume Next is being ignored

Dim NoDupes As New Collection
Dim AllCells As Range, Cell As Range
Set AllCells = Range("A1:A100")

' The next statement ignores the error caused by attempting to add a
duplicate key to the collection.
On Error Resume Next
For Each Cell In AllCells
NoDupes.Add Cell.Value, CStr(Cell.Value)
Next Cell
' Resume normal error handling
On Error GoTo 0

 

[Norman Jones]

Hi Nigel,

See response to earlier thread.

 

[Nigel]

Hi Norman
For some reason I cannot see my original post, it is just is not here!!
Hence my repost. If you could attach a copy of your earlier reply - much
appreciated.

 

[Norman Jones]

Hi Nigel,

Here is a link to the thread,

http://tinyurl.com/bwtll

Note Dave Peterson's rejoinder

 

[Nigel]

Thamk you, Norman. The VBE editor was set to break on all errors, so
changing it fixed the problem )