Locate the chart insertion.

[NdNoviceHlp]

Can't seem to get the right syntax for placing an inserted picture in a chart (I assume it's possible?). The following inserts the .gif file in the upper left corner of the chart. I would like to move the picture to the lower left corner of the chart. If anyone has abit more code I'd appreciate it. Thanks. Dave

'add ICON to chart
ActiveChart.ChartArea.Select
ActiveChart.Pictures.Insert ("C:\Picname.gif")

 

[tusharm]

What does the macro recorder give you when you use the UI to get what you want?

 

[NdNoviceHlp]

Thanks Tushar. The code I posted was derived from the macro recorder. As far as I can tell, you can't specify the insertion point. Hence, the posted question. Haven't been able to google anything yet either. Would sure appreciate further assistance. Dave

 

[NdNoviceHlp]

I get it...move the picture after the insertion. Thanks Tushar. Have a nice day. Dave

'add ICON to chart
ActiveChart.ChartArea.Select
ActiveChart.Pictures.Insert("C:\Picname.gif").Select
Selection.ShapeRange.IncrementTop 210

 

[tusharm]

Did you move the picture where you wanted it? In 2003, after some tweaking, the following works. The tweaking involved the "usual" method for putting something flush bottom-right in its container, i.e., the child's left = parent's width - child's width and the same for the top.

Sub Macro1()
    With ActiveSheet.ChartObjects(1).Chart
    .Pictures.Insert ("C:\Temp\Pic.jpg")
    MsgBox .Shapes.Count
    With .Shapes(1)
    .Left = ActiveChart.ChartArea.Width - .Width
    .Top = ActiveChart.ChartArea.Height - .Height
        End With
        End With
    End Sub

Thanks Tushar. The code I posted was derived from the macro recorder. As far as I can tell, you can't specify the insertion point. Hence, the posted question. Haven't been able to google anything yet either. Would sure appreciate further assistance. Dave

 

[NdNoviceHlp]

Many thanks for the extra learning Tushar. That's exactly the stuff I was looking for to fancy up some charts. Dave

 

[tusharm]

You are welcome.