Stephen Bullen's code modified for Excel 64 Bit (Win64 or VBA7)?

I use Excel 2016 Pro Plus 32 Bit on Windows 10 Pro 64 Bit.
I have developed an app of which the main feature is to load 7 main shapes filled with different colors on a UserForm controlled by two sliders. Horizontal slider changes the main shapes (1 to 7) whereas the vertical one changes their color over a range. I have produced the shapes in PowerPoint using basic Shape components and copied them to a Worksheet in the App Workbook. I have used Steven Bullen's code to load the BitMap images onto the Picture Control of the UserForm, which he wrote in 98 and the App works perfect this way in my computer.

However when I sent it to a friend of mine who has Win-Excel 64 Bit he couldn't run it. I have been trying to fix the declarations (variables: Long to LongPtr and functions: to PtrSafe Functions) to match the Excel 64Bit version as recommended by MicroSoft and many others but somehow I cannot seem to get it run yet. Errors throw at different places of PastePicture and CreatePicture functions of S. Bullen's code..
My priority is to get it run on Windows-Excel 64 version. If I can manage this the next target is to get it run on Mac-Excel 64 versions too..
I appreciate any hint / suggestion to fix the above issue or even a different approach then mine. Thanks..

Dear rorya,

Thank you so much for your prompt response and comments.. Keags' revision to Stephen Bullen's code has worked just fine in my Excel 2016 64 Bit version..

I must also thank Keags here for his valuable contribution...

I've checked that again and got your point but Keags' first version seemed to work for me.
However, I will use xlnitwit's revision to be on the safe side.. Thanks for reminding me.