Quote Originally Posted by MarvinP View Post
In your code try:

InvoerBlad.Range("B1:B" & ActiveSheet.UsedRange.Rows.count)
'instead of
With InvoerBlad.Range("B1:B1000")
Marvin,

What's the difference?