Dear All

How to zip an excel97 activeworkbook? Went thro the MVP sites and copied
the code but does not work. Pls help.

get errors at the following places:

1. oApp.Namespace(FileNameZip).CopyHere FileNameXls
and in another code copied

2. ShellStr = PathWinZip & "Winzip32 -min -a" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " " & Chr(34) & FileNameXls & Chr(34) _
ShellAndWait ShellStr, vbHide 'Error at this place

brgds/captgnvr

Hi

Excel 97: I not test code on this version anymore

I see you try code from two different page
http://www.rondebruin.nl/windowsxpzip.htm

And
http://www.rondebruin.nl/zip.htm

Do you have registered version of WinZip installed ?



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"CAPTGNVR" wrote in message ...
Dear All

How to zip an excel97 activeworkbook? Went thro the MVP sites and copied
the code but does not work. Pls help.

get errors at the following places:

1. oApp.Namespace(FileNameZip).CopyHere FileNameXls
and in another code copied

2. ShellStr = PathWinZip & "Winzip32 -min -a" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " " & Chr(34) & FileNameXls & Chr(34) _
ShellAndWait ShellStr, vbHide 'Error at this place

brgds/captgnvr

Post a link to the full code. Then we can check how the variables are set.
--
Gary''s Student - gsnu200804


"CAPTGNVR" wrote:

Dear All

How to zip an excel97 activeworkbook? Went thro the MVP sites and copied
the code but does not work. Pls help.

get errors at the following places:

1. oApp.Namespace(FileNameZip).CopyHere FileNameXls
and in another code copied

2. ShellStr = PathWinZip & "Winzip32 -min -a" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " " & Chr(34) & FileNameXls & Chr(34) _
ShellAndWait ShellStr, vbHide 'Error at this place

brgds/captgnvr

DEAR MR. RON DE BRUIN
I consider this as great honor to get ur response and really loads of
appreciation for same.

I went thro both ur postings. This is the ship's computer and I am not sure
if the winzip is a registered one or not. But only on my computer I didt
find the winzip.exe. I have winrar on my comp. I was planning to load the
winzip from radio room computer.

Would u mind telling me what this following lines do as I do not get any
help and it says keyword not found.

ShellStr = PathWinZip & "Winzip32 -min -a" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " " & Chr(34) & FileNameXls & Chr(34) _
ShellAndWait ShellStr, vbHide .

Once again thnks for the quick response.

with rgds/captgnvr



"Ron de Bruin" wrote:

Hi

Excel 97: I not test code on this version anymore

I see you try code from two different page
http://www.rondebruin.nl/windowsxpzip.htm

And
http://www.rondebruin.nl/zip.htm

Do you have registered version of WinZip installed ?



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"CAPTGNVR" wrote in message ...
Dear All

How to zip an excel97 activeworkbook? Went thro the MVP sites and copied
the code but does not work. Pls help.

get errors at the following places:

1. oApp.Namespace(FileNameZip).CopyHere FileNameXls
and in another code copied

2. ShellStr = PathWinZip & "Winzip32 -min -a" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " " & Chr(34) & FileNameXls & Chr(34) _
ShellAndWait ShellStr, vbHide 'Error at this place

brgds/captgnvr

Hi CAPTGNVR

I went thro both ur postings. This is the ship's computer and I am not sure
if the winzip is a registered one or not. But only on my computer I didt
find the winzip.exe. I have winrar on my comp. I was planning to load the
winzip from radio room computer.

Use the code from this page then and not from the WinZip pages
http://www.rondebruin.nl/windowsxpzip.htm




--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"CAPTGNVR" wrote in message ...
DEAR MR. RON DE BRUIN
I consider this as great honor to get ur response and really loads of
appreciation for same.

I went thro both ur postings. This is the ship's computer and I am not sure
if the winzip is a registered one or not. But only on my computer I didt
find the winzip.exe. I have winrar on my comp. I was planning to load the
winzip from radio room computer.

Would u mind telling me what this following lines do as I do not get any
help and it says keyword not found.

ShellStr = PathWinZip & "Winzip32 -min -a" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " " & Chr(34) & FileNameXls & Chr(34) _
ShellAndWait ShellStr, vbHide .

Once again thnks for the quick response.

with rgds/captgnvr



"Ron de Bruin" wrote:

Hi

Excel 97: I not test code on this version anymore

I see you try code from two different page
http://www.rondebruin.nl/windowsxpzip.htm

And
http://www.rondebruin.nl/zip.htm

Do you have registered version of WinZip installed ?



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"CAPTGNVR" wrote in message ...
Dear All

How to zip an excel97 activeworkbook? Went thro the MVP sites and copied
the code but does not work. Pls help.

get errors at the following places:

1. oApp.Namespace(FileNameZip).CopyHere FileNameXls
and in another code copied

2. ShellStr = PathWinZip & "Winzip32 -min -a" _
& " " & Chr(34) & FileNameZip & Chr(34) _
& " " & Chr(34) & FileNameXls & Chr(34) _
ShellAndWait ShellStr, vbHide 'Error at this place

brgds/captgnvr