VBA macro to send emails to list of recipients.

Hello,
I am new in excel macros and will appreciate any help will be provided. I have created excel spreadsheet that sends emails to the list of recipients. It works perfectly fine and captures all the cells needed, but for some reason removes graphs and pictures. I do need graphs and gadgets to go with the email as well. I have attached the spreadsheet for the review. In advance thank you for your help.