Macro para enviar imágenes desde Excel a Whatsapp

Tengo una macro en Excel para enviar mensajes por whatsapp

Pero necesito enviar una imagen de este tipo

ActiveSheet. Shapes. Range(Array("Group 36"))

Por favor, ayuda con la macro para envío de esta imagen