Paul, this works flawlessly on our Windows 10 laptops but we still have some users on Win 7. The macro needed some slight tweaking to get it to run without syntax errors on theirs, but I managed to do that. However, the ConvertToShape line seems to destroy the image quality on the Windows 7 machines. It keeps it high quality on Win 10 though! Any idea how your macro could be modified to work on both Win 10 and Win 7 and keep good image quality on both?