如何将自动更正条目从一台计算机的MS Word 2013传输到另一台计算机？

我尝试将此处列出的整个目录从源计算机复制到目标计算机，但这并未使目标计算机上显示自动更正条目。

以下是从源复制并放置在目标计算机上的确切位置的目录：

C：\ Documents and Settings \ Raj \ Application Data \ Microsoft \ Templates
C：\ Documents and Settings \ Raj \ Application Data \ Microsoft \ Office
C：\ Documents and Settings \ Raj \ Application Data \ Microsoft \ UProof
C：\用户\拉吉\应用程序数据\漫游\微软\模板
C：\ Users \用户拉吉\应用程序数据\漫游\微软\办公
C：\用户\拉吉\应用程序数据\漫游\微软\ UProof

但是，我没有在目标计算机的MS Word 2013上获得自动更正条目。我该怎么做才能让自动更正条目传输？

microsoft-word microsoft-office

— 拉吉
source

您是否尝试过复制单个文件？你的覆盖可能有些东西迫使Word从头开始？

— codingCat 2016年

@codingCat，实际上，我先单独做了，然后在单个传输不起作用时尝试了整个目录。

— 拉伊2016年

然后我肯定会建议我在下面列出的实用程序。祝好运。:-)

— codingCat 2016年

如果该实用程序不起作用，请尝试使用Kutools for Microsoft Word（39美元，具有完整功能的45天免费试用版）。

— harrymc 2016年

不知道该怎么处理这个问题，因为很多人都回答了非常好的答案。事实证明，尽管自动更正条目DID传输，但选项没有，并且我的一些选项取决于在数学区域之外使用的Math自动更正（必须在目标计算机的MS Word的校对选项中重新选择）。一旦我启用它，所有自动更正功能就像我在源计算机的MS Word安装上一样。

— 拉伊2016年

Answers:

首先，你在做什么应该在理论上工作。在最近版本的办公室中，移动自动更正的过程没有改变。以下文章是我发现的最直接的描述。它详细介绍了2010版Office，但仍应与2013版一起使用。

https://technet.microsoft.com/en-us/magazine/ff956104.aspx

您说您复制了整个文件夹。你试过单个文件吗？您可能会通过覆盖意外事件来强制重置单词。

如果这些想法都不起作用，我可以建议这个实用程序：

http://www.addbalance.com/usersguide/autotextautocorrect.htm#Moving_AutoCorrect

我没有理由自己尝试（所以要小心使用），但强烈建议。

我希望这有帮助。:-)

— codingCat
source

另请参阅如何移动自动更正条目。正如您所说的那样，该过程没有改变，并且在为Word 2007编写时，这些说明仍然是正确的。我自己成功地使用过它们。

— Twisty Impersonator 2016年

这里有一些VBA将自动更正条目导出到文件，然后从该文件导入。在第一台计算机上运行导出，将代码和导出的文件传输到第二台计算机，然后运行导入。但有一个限制：此方法不会传输任何富文本条目。事情是这样:-)变成☺或<=>成为⇔当你试图将其导出。如果有人知道如何调整代码，以便它不工作，我会很感激。

请务必将常量文件路径更改为适合您的内容。

Const strDelimeter As String = "|||"
Const fPath As String = "C:\Temp\AutoCorrectEntries"

Sub ExportAutoCorrect()
    Dim ace As AutoCorrectEntry
    Open fPath For Output As #1
    For Each ace In Application.AutoCorrect.Entries
        If Not ace.RichText Then
            Write #1, ace.Name & strDelimeter & ace.Value
        End If
    Next
    Close #1
End Sub

Sub ImportAutoCorrect()
    Dim i As Integer
    Dim fLine As String
    Dim aceName As String
    Dim aceValue As String
    Open fPath For Input As #1
    Do Until EOF(1)
        Line Input #1, fLine
        If Left(fLine, 1) = """" Then fLine = Mid(fLine, 2)
        If Right(fLine, 1) = """" Then fLine = Left(fLine, Len(fLine) - 1)
        i = InStr(1, fLine, strDelimeter)
        If i > 0 Then
            aceName = Left(fLine, i - 1)
            aceValue = Mid(fLine, i + Len(strDelimeter))
            Application.AutoCorrect.Entries.Add aceName, aceValue
        End If
    Loop
    Close #1
End Sub

— 工程师吐司
source

Manually Move AutoCorrect Entries

此方法通常用于格式化的自动更正条目。它会将默认模板文件从一台计算机移动到另一台计算机。所有自动更正列表的位置：[user] / appdata / roaming / microsoft / office / * .acl在计算机1上:(这是您要复制自动更正列表FROM的计算机。）

确保关闭所有Microsoft Office程序。（Outlook，Word，Excel等......）
将Normal.dotm文件复制到目标计算机（计算机2）可以访问该文件的中间位置*。

Normal.dotm 位置是： C:\Documents and Settings\username\Application Data\Microsoft\Templates

在计算机2上:(这是您要将自动更正列表移动到的计算机。）

浏览到Templates文件夹：

C：\ Documents and Settings \ username \ Application Data \ Microsoft \ Templates 2.重命名Normal.dotm文件Normal.bak以备份它。

右键单击Normal.dotm并单击重命名。键入Normal.bak并按ENTER键。3.确保关闭所有Microsoft Office程序。（Outlook，Word，Excel等......）

从中间位置*复制Normal.dotm文件（自动更正条目）。（例如USB驱动器，在线或共享网络。）

如果您不确定如何执行此操作，则电子文件存储：LSU概述文章将有所帮助。5.将Normal.dotm文件粘贴到以下文件夹中：C:\Documents and Settings\username\Application Data\Microsoft\Templates
单击此处