word的自动更正问题
时间:2005-02-27
来源:互联网
我的模板中有很多条目,由于其他地方出现问题,想重新搞一个模板,但是这些条目导不出来,怎么办?
多谢了
作者: stw 发布时间: 2005-02-27
作者: cxffxc 发布时间: 2005-02-27
谢过斑竹!!!第一个方法等于没有用,我每一次都是用这个方法的,没有修复其它错误。
作者: stw 发布时间: 2005-02-27
请运行以下二个宏:
'* +++++++++++++++++++++++++++++'* Created By 守柔(ShouRou)@ExcelHome 2005-2-28 6:30:38'仅测试于System: Windows NT Word: 10.0 Language: 2052'^The Code CopyIn [ThisDocument-ThisDocument]^''* -----------------------------Option ExplicitSub GetEntries() '导出自动更正所有条目Dim i As AutoCorrectEntry, aEntry As String, MyString As StringFor Each i In Application.AutoCorrect.Entries '在条目中循环aEntry = i.Name & vbTab & i.Value & vbCrLf '取得名称和替换文本MyString = MyString & aEntry '内存中累加NextSelection.InsertAfter MyString '插入到文档中End Sub'----------------------Sub SetEntries() '导入自动更正所有条目Dim P As Paragraph, MyString() As StringFor Each P In ActiveDocument.Paragraphs '在文档段落中循环MyString = VBA.Split(P.Range.Text, vbTab) '数组分隔取值'重新写入自动更正集合中AutoCorrect.Entries.Add Name:=MyString(0), Value:=MyString(1)NextEnd Sub'----------------------在原文档模板时,运行第一个宏,即新建一个空白文档,将宏写入该文档的VBA代码窗口中,运行此宏。保存该文档。
删除原模板(NORMAL.DOT)后,打开上述保存的文档,运行第二个宏,即可导入.
作者: 守柔 发布时间: 2005-02-28
原模版中,创建宏时的密码忘记了,没有办法运行第一个宏,有办法吗?
作者: stw 发布时间: 2005-04-05
作者: stw 发布时间: 2005-04-05
http://club.excelhome.net/viewth ... p;page=1&extra=
C:\Documents and Settings\???\Application Data\Microsoft\Office下, ???为当前系统用户名称。
文件名字为:MSO1033
作者: lengyff 发布时间: 2010-12-16
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28