0

これは私がこれまでに行ったことです：

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;

「ビッグフィナーレ」などの以前に入力したテキストを選択して編集したり、貼り付けた図を選択して選択したりするにはどうすればよいですか。画像のキャプションを作成するためにコマンドを貼り付けますか?

4

1 に答える 1

3

MS Word の VBA で考えられる解決策:

'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
于 2013-08-07T12:08:54.877 に答える