Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Working OK in Vista but not in win XP
I am trying to find out why ? If I know more I post back -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "IanC" wrote in message ... Hi Ron I'm using XP (SP2) and Office 2k (SP3). -- Ian -- "Ron de Bruin" wrote in message ... Fast test Working OK here Vista and O 2007 No WinZip installed (only 7-Zip) Test it tomorrow on a Win XP sysyem What do you use (Windows and Office) ? -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Ron de Bruin" wrote in message ... Tomorrow I have time Ian to look good I will reply tomorrow evening -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "IanC" wrote in message ... Hi Ron MoveHere placed the target file in the destination directory, but did not remove the original from the zip. Could this be because you have WinZip installed and this is being used? -- Ian -- "Ron de Bruin" wrote in message ... Hi Ian MoveHere was working in my test yesterday Will play with it this weekend -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "IanC" wrote in message ... Hi Ron. MoveHere still leaves the original file in the zip (ie it's no different to Copy Here) I tried to Kill the file in the zip but it came up with no file found. Looks like I'm on to a loser here. Thanks for trying. -- Ian -- "Ron de Bruin" wrote in message ... Btw: You can move it oApp.Namespace(FileNameFolder).MoveHere oApp.Namespace(fname).Items.Item("ron.xlsm") I will try to delete it in a zip file this evening -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Ron de Bruin" wrote in message ... I will play with it this evening and see if I can find a way If you unzip first then you can do what you want but in the zip it is diffecult I think ? Unzip Do what you want in the normal folder Zip it again -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "IanC" wrote in message ... Thanks, Ron. I'm afraid I'm using the Windows XP zip facility. I may be able to persuade my employer to buy a copy of WinZip, but that still doesn't really get round the issue of the time involved (which could be considerable) and the dangers that introduces. I think in this case I'll have to settle for some manual intervention. If only I could delete the extracted file from the zip (this doesn't appear to be possible with Windows zip), then I could probably look to see if the file exists in the zip instead of counting the files. Thanks for your help. -- Ian -- "Ron de Bruin" wrote in message ... 1: The WinZip code on my site can do that (see the parameters link) But you can Delete the zip first before you create it with the VBA Kill command 2 : If you use WinZip I have code on my site that give you more control See the note on the page Warning : It is not possible to hide the copy dialog when you copy to a zip folder (only working with normal folders). Also there is no possibility to avoid that someone can cancel the CopyHere operation or that your VBA code will be notified that the operation has been cancelled. -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "IanC" wrote in message ... Hi Ron Many thanks for your help with unzipping a file with VBA. I now how 2 problems with zipping. I'm using your "Sub Zip_All_Files_in_Folder()" routine to zip a file to a zip which already contains a copy of the file. 1. I'm prompted that the zip already contains a copy of the file. Can I automatically overwrite the existing file without the prompt appearing? 2. Having asked for the file to be replaced, the code moves on to the Do...Loop and hangs up. I see now that this is because the code is waiting until the number of files in the zip matches the number in the folder. This will never happen as there's only 1 file in the folder and more than that in the zip. Is there any way to detect that the compression is complete, rather than counting files? The only alternative I can see is to extract all the files, delete the zip, replace the file I need to, then recreate the zip. As this is to be done over a VPN connection, the time involved and the chances of a problem with the connection increases greatly. -- Ian -- |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Enquiry | Excel Discussion (Misc queries) | |||
Enquiry Form | Excel Worksheet Functions | |||
Urgent enquiry | Excel Worksheet Functions | |||
Enquiry on VB for Excel | Excel Programming | |||
A formula enquiry; (screenshots included) | Excel Discussion (Misc queries) |