View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
RB Smissaert RB Smissaert is offline
external usenet poster
 
Posts: 2,452
Default reading data from thumnails

Excel can't do it, but maybe there is an API for that software and maybe you
can set a
reference to it in Excel and then use the properties/methods of that API.
In the VBE look under Tools, References and see if it is available.
The other option is to open the file in binary mode and read the file.
You will then need to find out though where and how that information is
stored.

Function ReadBinaryFile(strFile As String) As Variant

Dim hFile As Long
Dim btArray() As Byte

ReDim btArray(1 To FileLen(strFile))

hFile = FreeFile

Open strFile For Binary As #hFile
Get #hFile, 1, btArray
Close hFile

ReadBinaryFile = btArray

End Function


Sub tester()

Dim i As Long
Dim arr

arr = ReadBinaryFile("C:\Image66.gif")

For i = 1 To 20
MsgBox arr(i)
Next

End Sub


RBS


"michael.a7" wrote
in message ...

I have some photos and I'm creating a sheet that inventories my images.
I am inserting a photo thumbnail on the sheet and I would like excel to
read the (ITCP) data from the image such as date it was taken, Fstop,
focal length, etc. and automatically fill in the corresponding fields.

Does excel have the capability to retrieve that information from the
photo?
Thanks


--
michael.a7
------------------------------------------------------------------------
michael.a7's Profile:
http://www.excelforum.com/member.php...o&userid=33027
View this thread: http://www.excelforum.com/showthread...hreadid=557491