Hello Jeffrey,

I really appreciate your quick reply.

For some reason it is not working, but it is definitely heading in the right direction.
I now have an InputBox to select the cell for the output but there is no output being pasted.

Just out of curiosity why have you used Dim iCell as Range when it is not used within the rest of the code?

Regards,
David