Doug

It helps a little.

But I really think you need to have a bit of a rethink.

Here's a couple of more points:

1 In your code the array doesn't really exist in the first place, so how can you erase something that doesn't exist.

2 Why erase? That empties the array, ie it removes all the items from it. So how can you go on and use the values that were in the array previously, they aren't there anymore.

3 I would suggest using For LBound(arrVals) To UBound(arrVals) rather than For Each.