Create Outlook attachment

Hello:

How could I format the following code to change the attachment to values and formats only and not have it reference other sheets when attached? Could I edit the following somehow to only paste as values along with formats. The entire code is pasted below this set of code.

Thanks in advance for your help

Set Sourcewb = ActiveWorkbook
ActiveSheet.Copy
Set Destwb = ActiveWorkbook

Please Login or Register  to view this content.