VBA code to zip file not working

[mp3909]

Hi,

So I found a piece of VBA code online which should zip a file.
This is the code:

Please Login or Register  to view this content.

The parameters of the function are set to

Capture.PNG


But when I run the code, it is keep looping over this part

Please Login or Register  to view this content.

Anyone know why?

[WideBoyDixon]

It could be related to how you're passing the array of files to zip. ParamArray expects multiple values separated with a comma so you need to call it like this:

Please Login or Register  to view this content.

Do not try and pass it as an array. If you want to pass an array, change the final parameter in the function:

Please Login or Register  to view this content.

Then you can call it like this:

Please Login or Register  to view this content.

WBD

[mp3909]

Hi WBD,

I only have one file to zip, so I am essentially just passing one file to the function.

I tried what you said in your reply but still no luck

[WideBoyDixon]

Ah. OK. I tried a little test locally on my PC and it worked. I also tried passing a UNC path (as in your example) and that also worked. I'm not sure why it wouldn't work for you.

WBD

[mp3909]

could it be because the file that I want to zip is saved in a shared network drive that I only have read access to

[WideBoyDixon]

Shouldn't be but you could try zipping up other files or changing the permissions on the file to see if that makes a difference.

WBD