Bjorn,

Your original code looks OK except you have one Do and two Loops, one With and no End With.

Replace the last 'Loop' with 'End With'.

Are you sure it compiles?

P.