这个投稿的WORD官方模板到底哪里出错了？

drroot

http://www.aip.org/pubservs/compuscript.html
直接下载地址:
ftp://ftp.aip.org/ems/word/ibm/t2k/t2k.zip

这个宏好象加密了, 提供个比较有用的小程序：
http://file1.softsea.net/30407/vbpsetup.exe
附件有注册机

按里面的Readme,无论在里头输入Title、Table Captions...
都提示"5834..."出错，调试后：在下面每个.Style都会中断：
譬如Title的

1. </p><p>Private Sub CancelButton_Click()</p><p>Title_Dialog.Hide<br/>Unload Title_Dialog</p><p>End Sub</p><p>Private Sub OKButton_Click()</p><p>' Validate title first...<br/>If TitleBox.Text = "" Then<br/>&nbsp;&nbsp;&nbsp; MsgBox "A title for the article is required !", vbExclamation, "AIP Toolkit"<br/>&nbsp;&nbsp;&nbsp; Exit Sub<br/>End If</p><p>' Then if OK, place title with tags into document...</p><p>With Selection<br/>&nbsp;&nbsp;&nbsp; .Style = "Normal"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '&lt;--这里会中断<br/>&nbsp;&nbsp;&nbsp; .ParagraphFormat.Alignment = wdAlignParagraphLeft<br/>&nbsp;&nbsp;&nbsp; .Style = "Article Title"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '&lt;-这里也会中断掉<br/>&nbsp;&nbsp;&nbsp; .TypeText Text:=TitleBox.Text<br/>End With</p><p>Title_Dialog.Hide</p><p>With Selection<br/>&nbsp;&nbsp;&nbsp; .ParagraphFormat.Alignment = wdAlignParagraphCenter<br/>&nbsp;&nbsp;&nbsp; .TypeParagraph<br/>End With</p><p>Unload Title_Dialog</p><p>End Sub<br/>Private Sub UserForm_Activate()</p><p>TitleBox.Text = ""<br/>TitleBox.SetFocus</p><p>End Sub<br/>

复制代码

不知该如何修改呢？

我用的是Office 2003

iXiIz2Rb.rar (192.81 KB, 下载次数: 2)

2006-8-19 12:00 上传

点击文件名下载附件
这个投稿的WORD官方模板到底哪里出错了？

konggs

估计他的是语言1033版（英文版）。

我们的是2052版（中文版）

所以，把相应的样式改中中文版的即可。

如：.Style = "Normal"可以对应于.style="正文"

drroot

:) 确实是这个语言问题...多谢kong兄了!

有没详细的VBA中英版式转换对照表呢?
譬如还有:
Heading <-->标题

另外,要是有个VBA 中英格式转换程序就更好了[em02]

konggs

这个。吾不知道。我没有接触过英文的。

我更多的是中文。例如，你上面的则是wdstyleheadingsN

可以看WordVBA的帮助中文版。见到英文版时，看一下，应该可以理解。

至于转换程序，我想我是没办法了。

守柔

以下内容仅作补充和参考。

Word中的样式，往往包含本地名称，而这些名称，在不同的语言中是不同的，作为段落的Style属性，如果能够使用WdBuiltinStyle则具有通用性，却因此失去“个性”。

wdStyleNormal相当于“正文”或者“Normal”
wdStyleHeading1，“标题 1”
wdStyleHeading2 ，“标题 2”
wdStyleHeading9，“标题 9”

记得前时也有网友提问，关于表格的样式，其中的本地化样式，没有办法转化为Word内部常数，只能通过判断应用程序的语言来进行了。