Hi all, happy new year!
I've been attempting to tackle this for a while now but as my VBA skills are basic to say the least I'd really appreciate it if someone would be kind enough to give me a few pointers.
As the title says, I'd like to reduce the file size of a number of image files (jpg) in a folder, and then save them as new files. To do this manually I normally use MS Paint, and so this has been my approach with VBA also. Here's the code that I have so far, shown for one file only (as the loop should be pretty simple);
However, I can't figure out how to specify the save location in the SaveAs window using SendKeys (the last three commented SendKeys lines above). Any help with this, or any recommendation for a simpler method than using SendKeys, would be very much appreciated.
The wait function in the above code is necessary before AppActivate will work properly. The code was written by Russel Judge and found at http://vbcity.com/forums/t/81315.aspx ...
Many thanks in advance,
Mott
Bookmarks