2014-12-19 77 views
0

我想用vbscript格式化插入的图像标题。我尝试了以下,但它不起作用。我找不到任何允许字体格式设置的InsertCaption方法。在一些论坛上,我发现它可以从字设置改变字幕风格,但无法找到相同的vb代码,并且在任何情况下都是无效的。我正在尝试以下。第一行完美地工作。其余没有影响。在VB/VBscript中插入标题方法

objselection.InsertCaption "Figure", ": " & Object_Title , "", wdCaptionPositionAbove 
objSelection.Font.Color = RGB(107, 143, 122) 
objSelection.Font.Name = FontNameCaption 
objSelection.Font.Size = FontSizeCaption 
objSelection.Font.Style = FontColorCaption 
+3

你想通过[tag:word-vba]或[tag:vbscript]来做到这一点,因为这是两件不同的事情。 – L42 2014-12-20 05:03:20

回答

0

插入的标题不会成为图像或选择的一部分。这只是另一种具有特定格式的段落。你可以做这样的事情改变所有字幕格式:

For Each para In ActiveDocument.Paragraphs 
    If para.Style = "Caption" Then 
    With para.Range 
     .Font.Color = RGB(107, 143, 122) 
     .Font.Name = FontNameCaption 
     .Font.Size = FontSizeCaption 
     .Font.Style = FontColorCaption 
    End With 
    End If 
Next 

然而,更好的办法是修改“标题”的风格在你的文档模板,这样你就不需要修改字幕格式。