Prev: biological query
Next: Passing object across processes
From: Druidic Ranger on 3 Jan 2010 00:20 On Dec 31 2009, 5:45 pm, "Auric__" <not.my.r...(a)email.address> wrote: > On Fri, 01 Jan 2010 00:43:28 GMT, I wrote: > > Const picDir As String = "C:\Pics" > > Const extension As String = ".jpg" > > Stupid swiss cheese memory... The above two MUST BE EDITED BY YOU to reflect > where the pictures are stored, and the correct extension. (The above is > normal for JPEGs; other formats use other extensions. If you use more than > one extension, my code won't work as written.) > > -- > This movie is awesome: > Val Kilmer contracts mumps and then a huge goitre appears on his neck. > Can Cuba Gooding reattach his hands in time to cure him? Actors play different characters in movies.
From: Druidic Ranger on 3 Jan 2010 00:24 On Dec 31 2009, 5:43 pm, "Auric__" <not.my.r...(a)email.address> wrote: > On Thu, 31 Dec 2009 19:50:32 GMT, lamalatrin wrote: > > On Dec 31, 6:37 am, "Auric__" <not.my.r...(a)email.address> wrote: > >> On Wed, 30 Dec 2009 21:11:11 GMT, lamalatrin wrote: > >> > I have a spreadsheet with information on homes that need to be > >> > photographed. There are 4 photos per home loaded in the directory in > >> > the exact same sequence as the spreadsheet. I need the 4 photos in > >> > the directory to have the name with the data contained in [ column B > >> > ]. Example photo 1, 2, 3, 4 to be renamed to 33704374.1, 33704374.2, > >> > 33704374.3 & 33704374.4 then 5, 6, 7, 8 to be named 33123918.1, > >> > 33123918.2, 33123918.3, 33123918.4. > > >> > If the program could ask for the spreadsheet name and the directory > >> > name would be much appreciated. > > >> What's the format for the photo names *before* renaming? Sequential? Is > >> it literally "1.jpg", "2.jpg", etc.? > > > The camera name them in sequential order. The renaming is determined > > by the each number in colum b in the spreadsheet. The files are in > > that order with 4 pictures per address. > > > 100_1000 > > 100_1001 > > 100_1002 > > 100_1003 > > 100_1004 > > 100_1005 > > 100_1006 > > 100_1007 > > 100_1008 > > 100_1009 > > I assume that it's actually "100_1000.jpg", etc. > > This works from within Excel itself (i.e. not from standalone VB -- in the > Excel interface press Alt+F11, then in the VB editor add a new module to > the spreadsheet, then paste this in and save). To use it from within Excel, > select the row that you want to use for the renaming (i.e. the row with > "32938800-1" or whatever -- THIS STEP IS IMPORTANT!), then press Alt+F8, > select picRenamer, and click run. Note that there are some issues with this > code, such as the fact that you'll get an error if you try to rename a file > to one that already exists. > this is comp.lang.basic.visual.misc, not comp.lang.visual_basic_for_applications... -- Snake Eyes
From: The Ydesicant on 4 Jan 2010 11:02
On Jan 4, 8:23 am, "Auric__" <not.my.r...(a)email.address> wrote: > On Sun, 03 Jan 2010 05:24:15 GMT, Druidic Ranger wrote: > > On Dec 31 2009, 5:43 pm, "Auric__" <not.my.r...(a)email.address> wrote: > > >> This works from within Excel itself (i.e. not from standalone VB -- in > >> the Excel interface press Alt+F11, then in the VB editor add a new > >> module to the spreadsheet, then paste this in and save). To use it from > >> within Excel, select the row that you want to use for the renaming > >> (i.e. the row with "32938800-1" or whatever -- THIS STEP IS > >> IMPORTANT!), then press Alt+F8, select picRenamer, and click run. Note > >> that there are some issues with this code, such as the fact that you'll > >> get an error if you try to rename a file to one that already exists. > > > this is comp.lang.basic.visual.misc, not > > comp.lang.visual_basic_for_applications... > > Yeah, funny thing about that. The "misc" in the name stands for > "miscellaneous". Look that word up in a dictionary. > > -- > This is why I have an email wall of shame. What about classifying the human sense of taste as a visual basic excerpt? Does that fall under miscellaneous too? -- You float like a shame marshmallow. |