hi,

i am using a lot of photos taken at a construction cite,and i have to write
the date of JPG file which is taken

to excel sheet.

how can i get the date VBA property of which is taken at cite.

I mean the date of taking photo

thanks

Go he
http://sourceforge.net/projects/exifclass/

Download the (zipped) source code - extract the "cls" file and import to
your VBA project (it's for VB6 but seems to work fine in Excel VBA).

Example usage:

Sub Tester()
Dim exif As New ExifReader

exif.Load "D:\Pics\2009\CIMG1730.JPG"
Debug.Print exif.Tag(DateTimeOriginal)

End Sub

Tim



"EXCEL$B!!(BNEWS" wrote in message
...
hi,

i am using a lot of photos taken at a construction cite,and i have to
write the date of JPG file which is taken

to excel sheet.

how can i get the date VBA property of which is taken at cite.

I mean the date of taking photo

thanks

Hi,

To see how you can extract the EXIF data for all jpegs in a foilder to an Excel file, go to:
http://lounge.windowssecrets.com/ind...#entry618 967
and download the attachment there, plus the dll at:
http://members.cox.net/foxbat121/exifview.html

--
Cheers
macropod
[Microsoft MVP - Word]


"EXCEL$B!!(BNEWS" wrote in message ...
hi,

i am using a lot of photos taken at a construction cite,and i have to write the date of JPG file which is taken

to excel sheet.

how can i get the date VBA property of which is taken at cite.

I mean the date of taking photo

thanks

Thanks,it hleps


"Tim Williams" wrote in message
...
Go he
http://sourceforge.net/projects/exifclass/

Download the (zipped) source code - extract the "cls" file and import to
your VBA project (it's for VB6 but seems to work fine in Excel VBA).

Example usage:

Sub Tester()
Dim exif As New ExifReader

exif.Load "D:\Pics\2009\CIMG1730.JPG"
Debug.Print exif.Tag(DateTimeOriginal)

End Sub

Tim



"EXCEL$B!!(BNEWS" wrote in message
...
hi,

i am using a lot of photos taken at a construction cite,and i have to
write the date of JPG file which is taken

to excel sheet.

how can i get the date VBA property of which is taken at cite.

I mean the date of taking photo

thanks

Thanks,it hleps
"macropod" wrote in message
...
Hi,

To see how you can extract the EXIF data for all jpegs in a foilder to an
Excel file, go to:
http://lounge.windowssecrets.com/ind...#entry618 967
and download the attachment there, plus the dll at:
http://members.cox.net/foxbat121/exifview.html

--
Cheers
macropod
[Microsoft MVP - Word]


"EXCEL$B!!(BNEWS" wrote in message
...
hi,

i am using a lot of photos taken at a construction cite,and i have to
write the date of JPG file which is taken

to excel sheet.

how can i get the date VBA property of which is taken at cite.

I mean the date of taking photo

thanks

You can use the Input Textstream functions in Exel VBA to read the data
in JPG files and pick out the Picture Taken Date. I have created an
excel workbook with this <a
href="http://www.ipi-international.co.uk/IPI%20Backup.zip"function</a.
You can copy the code from there if you wish. It seems that there are
some differences in the time when looking at the Picture Taken Date
using Explorer on a Vista system.


EXCEL$B!!(BNEWS;578204 Wrote:

hi,

i am using a lot of photos taken at a construction cite,and i have to
write
the date of JPG file which is taken

to excel sheet.

how can i get the date VBA property of which is taken at cite.

I mean the date of taking photo

thanks


--
ipi-paul
------------------------------------------------------------------------
ipi-paul's Profile: http://www.thecodecage.com/forumz/member.php?u=1819
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=159835

http://www.thecodecage.com/forumz