VBA Code to eliminate embedded files when open excel workbook.

[ray.kanata]

Hello Folks,
I created a project form and I need to embed docs to support data entered in the form. Currently I can fill the form and embed files and when click "Save & Clear" Button, It clears the form and save all other data along with embedded files but it doesn't clear (or eliminate embedded files).

It will be great if someone help me and write a code to eliminate embedded files whenever I open my excel workbook.

I attached a sample file....

[lokicl]

Hi Ray

You have delete the embedded objects as clearing the content won't help.
Use the below updated code for you sub route NextInvoice

Please Login or Register  to view this content.

regards,
lokicl

[ray.kanata]

Great Thanks lokicl!

It solved my problem

[ray.kanata]

Hi lokicl!

Can you please explain each line of the code above?

Thanks

[Leith Ross]

Hello Ray,

This code does the same thing. I use OLEObjects instead of Shapes because it makes what is happening easier to understand and it makes all properties and methods available to you.

Since you are dealing with embedded objects, these objects belong to the OLEObject class. OLE stands for Object Linking and Embedding.

Please Login or Register  to view this content.

[ray.kanata]

Thanks Leith,
I tried to modify my code below based on your code above but didn't work.
Please let me know how Can I utilize your code in my code?

Thanks

Please Login or Register  to view this content.