Find text in doc, and paste chart where text is located Options

[jason]

I have the basics but I am obviously missing something.

find text:


myRange.Find.Execute FindText:="%PLOT_1"


paste plot:
Set WDApp = GetObject(, "Word.Application") ' Reference
active
document
Set WDDoc = WDApp.ActiveDocument ' Copy chart as a picture
ActiveChart.CopyPicture Appearance:=xlScreen, Size:=xlScreen,
_
Format:=xlPicture ' Paste chart at cursor position
WDApp.Selection.PasteSpecial Link:=False,
DataType:=wdPasteMetafilePicture, _
Placement:=wdInLine, DisplayAsIcon:=False ' Clean up
Set WDDoc = Nothing
Set WDApp = Nothing


basically: i need a way to set Placement:= location(%PLOT_1)


but i am unsure how to do this.
any help would be great.
thanks!

 

[Lene Fredborg]

See my response to your duplicate question elsewhere. Please do not post the
same question separately to more NewsGroups.

--
Regards
Lene Fredborg - Microsoft MVP (Word)
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word