I didn't change any of your code, but clicked on the CommandButton. Got the following error:
ClipboardData - Type Mismatch.JPG
I am on Windows 10 Enterprise, Excel 2016 Pro. Was my file working for you, as it contained both Win32 as well as Win64 API code?