Activate contents of Embedded Zip file

[wotadude]

I have zip files (containing 1 only file each eg. excel, pdf, word msg etc) embedded in a workbook.
I can activate an embedded zip file/folder with vba, but is it possible to then activate the contents of the activated zip folder once the zip folder of the zip file is open.
The zip file/folder will only ever contain 1 file (of any type).
Ideally i would like to close the zip folder window once the file contained within is activated/launched.

Any solutions would be appreciated.

[pike]

Hi wotadude
This site may help
http://www.rondebruin.nl/windowsxpzip.htm

[wotadude]

Thanks Pike,
I have the zipping all under control.
I have the unzipping all under control.
But it is the activation of the zip file within the opened zip folder that i want to activate/open. and then ideally have the zip folder window close after that.

The reason for zipping the embeded files is so that the embedded files are as small as possible. And that when a excel 2003 user activates a 2007 .xlsm workbook that was earlier embedded in the workbook, the 2007.xlsm workbook will be seen as an invalid file due to unrecognised format. Which is a common occurance here. Where as if you activate the 2007 .xlsm file from an embeded zip file containing the 2007 .xlsm file, a file conversion will take place (due to file conversiion utilities we have installed).

Any help with this would be much appreciated

[Leith Ross]

Hello wotadude,

It would help to see the code you have to zip and unzip the files, since this can be accomplished in VBA without opening a zip window. Here is a macro to run any program that has a registered file extension. Copy this code into a standard VBA module.

Please Login or Register  to view this content.

[wotadude]

Your suggested code is fine to launch an external file.
But the file i want to launch is that embedded within my workbook.
I am using code (as per Ron DeBruin) to zip the selected file. Then embedding that zip file manually or via vba to workbook.

Refer attached sample workbook that contains a sample embedded zipped workbook.

then a call macro below to activate it.

Please Login or Register  to view this content.

However it launches an explorer window with its contents, not the file contained within itself.
i want to open the file contained within the zip file/folder. The file could be of any type.
Then close the zip folder window.

[pike]

why not open the workbook select the shape then close the workbook?

[wotadude]

Thanks for the suggestion, but not sure i understand the logic of what you suggest.
I do not want to close the host workbook after opening the embedded zip file/folder. I want to open/activate the embedded zip file contents, and keep the host work book open.