Position shapes correctly in Word 2010 with VBA- tip

macropod · #2 02-04-2014, 07:12 PM

The following works for me:

Code:

Dim Rng As Range
With ActiveDocument
  Set Rng = .Sections.First.Headers(wdHeaderFooterPrimary).Range.Characters.First
  Set shpCompanyLogo = .Shapes.AddPicture(FileName:=strLogoName, LinkToFile:=False, SaveWithDocument:=True, _
    Anchor:=Rng, Left:=CentimetersToPoints(snglLeftOffset), Top:=CentimetersToPoints(snglTopOffset))
End With

PS: When posting code, please use the code tags. They're on the 'Go Advanced' tab.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
picture shapes in word 2010	sgrund	Word	5	01-30-2014 11:45 PM
PPT 2010 automatically rotating shapes	pptdiva	PowerPoint	1	10-01-2013 05:14 AM
Word 2010 Shapes	namedujour	Word	0	08-16-2012 12:57 PM
word 2010 not display math symbols correctly	sharks	Word	1	09-08-2011 04:24 AM
Paste not working correctly Word 2010	wapanap	Word	0	09-13-2010 06:29 PM