updating photo
 

I have a master document of construction data that updates itself
whenever I put a number like "124" in d5 (field)

I want to add a picture from a folder of digital images that are named
sequentially like: dsc00124.jpg

I want to see the picture on the same page as the master document

I would like a way to get the picture to update corresponding to the
number I insert in the field, also I have to handle the leading zeros
and the fact that I'll have thousands of pictures

Thanks a lot

Hi Joe,

You need some sort of container to hold the picture. Let's say we use
an embedded chart as a container. Just Insert - Chart and click Finish
to insert a blank chart in a worksheet. Hold the shift key down and
click on the chart to see the name of the embedded chart (it should
be "Chart 1".

Then run this macro. Change strPath to suit your situation.
Note that we could do the same thing using a shape to hold the
picture, but a chart object can be much more useful.


Sub UpdateChartPic()

Dim strPic As String
Dim strPath As String

strPath = "C:\Documents and Settings\Ed\My Documents\My Pictures\dsc00"

strPic = Range("D5")
strPic = strPath & strPic & ".jpg"

ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.ChartArea.Fill.UserPicture PictureFile:=strPic

End Sub

Ed Ferrero
http://edferrero.m6.net




I have a master document of construction data that updates itself
whenever I put a number like "124" in d5 (field)

I want to add a picture from a folder of digital images that are named
sequentially like: dsc00124.jpg

I want to see the picture on the same page as the master document

I would like a way to get the picture to update corresponding to the
number I insert in the field, also I have to handle the leading zeros
and the fact that I'll have thousands of pictures

Thanks a lot

Wow thanks, friend. I'll start working on it. Can it run automatically
whenever a certain field has a number put in it? And can the number be
pasted into the formula you gave me automatically, changing for each
different user inputted number?



In article , Ed Ferrero
wrote:

Hi Joe,

You need some sort of container to hold the picture. Let's say we use
an embedded chart as a container. Just Insert - Chart and click Finish
to insert a blank chart in a worksheet. Hold the shift key down and
click on the chart to see the name of the embedded chart (it should
be "Chart 1".

Then run this macro. Change strPath to suit your situation.
Note that we could do the same thing using a shape to hold the
picture, but a chart object can be much more useful.


Sub UpdateChartPic()

Dim strPic As String
Dim strPath As String

strPath = "C:\Documents and Settings\Ed\My Documents\My Pictures\dsc00"

strPic = Range("D5")
strPic = strPath & strPic & ".jpg"

ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.ChartArea.Fill.UserPicture PictureFile:=strPic

End Sub

Ed Ferrero
http://edferrero.m6.net




I have a master document of construction data that updates itself
whenever I put a number like "124" in d5 (field)

I want to add a picture from a folder of digital images that are named
sequentially like: dsc00124.jpg

I want to see the picture on the same page as the master document

I would like a way to get the picture to update corresponding to the
number I insert in the field, also I have to handle the leading zeros
and the fact that I'll have thousands of pictures

Thanks a lot