Print embedded Word docs from Excel
 

I have a worksheet with several embedded Word documents, displayed as icons.
I'd like a macro that checks each embedded object on the sheet, and if it is
a Word doc prints it to the default printer. Any help will be appreciated.