I want to save the Zip and CSV File with Particular Name and Particular Location

[Naga.Naredla]

Hi All,

Can you please help me out I want to save the Zip File name as IcCurrencyConversionRates and should be stored in the below path
C:\Automation\Source Zip File
but when I am using the below code the File Name is IcCurrencyConversionRates but it is asking to choose the location
My requirement is the location should also be fixed and it should not ask for saving in a location

FolderName = Application.GetSaveAsFilename("IcCurrencyConversionRates", "Zip Files (*.zip), *.zip ", , "C:\Automation\Source Zip File\")

 

[Chihiro]

If the folder exist...

FolderName = Application.GetSaveAsFilename("C:\Automation\Source Zip File\IcCurrencyConversionRates", "Zip Files (*.zip), *.zip ", , "Save as Zip")

Have a read of syntax documentation below.
https://docs.microsoft.com/en-us/office/vba/api/excel.application.getsaveasfilename

 

[Naga.Naredla]

Thank you,

I am able to place the zip in that specific path but the issue is it is asking me to save but my intention is it should automatically be saved without any save as dialog box

Can u please help me on that

 

[Chihiro]

Then you are using entirely wrong function. .GetSaveAsFilename will always display dialog box, as it is meant to do.

Have a read of Ron de Bruin's article on zipping file using Windows default zip program.
https://www.rondebruin.nl/win/s7/win001.htm