2014-09-22 42 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