ActiveX управления Word. Выделите текст и изображения

Question

Это то, что я сделал до сих пор:

word = actxserver('Word.Application'); 

document = word.documents.Open('C:\Documents and Settings\kz7213\Desktop\Test.docx'); 

selection = word.Selection; 

selection.TypeText('Big Finale'); 
selection.Style='Heading 1'; 
selection.TypeParagraph; 

FIG1 = figure('Visible','off'); plot([1 2 3 4 5],[4 1 3 5 7]); 

print -dmeta 

selection.Paste; 

selection.Style='Heading 1'; 

selection.InsertCaption('Figure','Test figure 1'); %Not working 
selection.Style='CaptionStyle'; 

selection.TypeParagraph; 

Как выбрать предыдущий введенный текст, такие как «Большой финал», чтобы изменить его, или выбрать фигуру я наклеен с выбором. Вставить команду, чтобы сделать подпись для изображения?

Answer 1

Возможное решение в VBA для MS Word:

'to find a text 
    Selection.Find.Execute FindText:="Big Finale", Wrap:=wdWrapAlways 

'to select inline shape 
    ActiveDocument.InlineShapes(1).Select 

Альтернативное решение найти InlineShape (s) является использование .Find.Execute method со следующими параметрами:

Selection.Find.Execute FindText:="/", Wrap:=wdWrapAlways, MatchWildcards:=True