Thank you for the code.
But when I execute it, I get the following error: Compile error: Variable not defined

When I close the message the first line is marked yellow: Sub henk400()

How do I need to solve this issue ?