2014-09-22 44 views
0

只是想知道是否有人有任何洞察,为什么这不是我的书签字体大小设置为12.我已经尝试过之前和之后,我宣布书签文本是什么。还尝试了12和“12”。设置书签格式。 VB.Net

myWordDoc.Bookmarks("DefText").Range.Font.Size() = 12 
    myWordDoc.Bookmarks("DefText").Range.Text = Final1 

任何帮助都会很棒。

+0

您是否尝试过记录在Word宏先来看看它是如何处理的过程? – Paul 2014-09-22 14:56:14

+0

是的,我试过使用选择书签的方法,然后使用选择功能,但没有运气。 – Cardinals28 2014-09-22 15:06:09

+0

当我尝试进行选择然后更改格式时,出现错误代码“引用非共享成员需要对象引用”。 – Cardinals28 2014-09-22 15:52:15

回答

1

找到一个非常简单的解决方案,这个稍微搜索后。使用MS-Word样式。

myWordDoc.Bookmarks.Item("DefText").Range.Style = "Heading 3" 
myWordDoc.Bookmarks.Item("DefText").Range.Style = "Defs" 
myWordDoc.Bookmarks("DefText").Range.Text = Final1 

的第一个样式“标题3”格式化文本时报NR和12磅,然后第二个“DEFS”它的格式编号列表。 (由于某种原因,“Defs”风格只会格式化编号而不是内容)

Final1是一个从checkedboxlist构建的定义字符串。这里有一个例子:

For Each Def In CheckedListBox4.CheckedItems 
If Def = "Other 1" Then Final1 = Final1 & TextBox2.Text & vbCrLf 
If Def = "Other 2" Then Final1 = Final1 & TextBox41.Text & vbCrLf 
If Def = "Other 3" Then Final1 = Final1 & TextBox42.Text & vbCrLf 
If Def = "Other 4" Then Final1 = Final1 & TextBox43.Text & vbCrLf 
If Def = "Other 5" Then Final1 = Final1 & TextBox44.Text & vbCrLf 
Next 

这与使用样式有所帮助: http://www.docs.is.ed.ac.uk/skills/documents/3738/3738.pdf

+1

对我来说看起来不错(特别是如果它有效!)+1。 – Paul 2014-09-25 14:57:42