如何从WORD中把域代码成功放入新浪博客使其生效?

来源:百度知道 编辑:UC知道 时间:2024/06/22 09:04:40
我在WORD中使用shift+F9的功能显示了所有内容的域代码,目的是编辑一些带有网址链接的文字及图片,我在WORD中已经把这些内容修改好了,我想放入我的新浪博客中,在博客中有“显示源代码”选项,我选择后把在WORD中的域代码复制粘贴到当中,却不能显示原有的图片和链接,只有普通的文字而已。请问各位高手,像我这种情况要如何能够实现WORD中的域代码在新浪博客中正常显示带链接的图片和文字?如回答有效我可继续加分~!
按照1楼朋友的方法来做后,粘贴到新浪博客中不能显示正常的带链接的文字和图片,都是在VBA编辑器中得到的域代码而已,怎么办?

通常情况下,在Word里面复制域只能得到域的结果,而不能得到域代码。可以用下面几个步骤来获取域代码的纯文本形式:
1、在Word中选中需要复制的域(此时显示不显示域代码都无所谓);
2、ALT+F11弹出VBA编辑器,“插入-模块”,然后在编辑区中粘贴如下宏代码:
Sub CopyOutFieldCode()

Dim Fieldstring As String
Dim NewString As String
Dim CurrChar As String
Dim CurrSetting As Boolean
Dim fcDisplay As Object

Dim X As Integer
NewString = ""
Set fcDisplay = ActiveWindow.View
Application.ScreenUpdating = False
CurrSetting = fcDisplay.ShowFieldCodes
If CurrSetting <> True Then fcDisplay.ShowFieldCodes = True
Fieldstring = Selection.Text
For X = 1 To Len(Fieldstring)
CurrChar = Mid(Fieldstring, X, 1)
Select Case CurrChar
Case Chr(19)
CurrChar = "{"
Case Chr(21)
CurrChar = "}"
Case Else
End Select