graphic won't go in footer

[jat098]

I am trying to programmatically insert an image in a footer, but it shows up in the header! Here is my code:

With ActiveDocument.Sections(1).Footers(wdHeaderFooterFirstPage).Shapes.AddPictu re(FileName:="c:\sample.jpg", LinkToFile:=False, SaveWithDocument:=True)
End With

Am I doing something wrong? Thanks!

[fumei]

Hmmmm, IF DifferentFirstPage is set = true, then the code works for me. The image goes into the footer of First Page Footer.

I can not duplicate the problem.

[Frosty]

There are some significant bugs with graphics and VBA in word 2007 and 2010. However, when you say it's in the header... Do you mean the location? Because the anchor should show up in the footer, but the shape may be floating near the top of the page.

[jat098]

Yes, the location. Thanks

I had to add it as an inline picture to get it in the right position, but then I cannot seem to move it the left of the text margin.

[Frosty]

If you leave as a floating shape, you can look at adjusting the .top and .left properties. If an online shape, look at creating a negative left indent.

[jat098]

Thanks, simply adjusting Top and Left worked.