Michel正在编辑一个文档，该文档的文本中确实包含应在脚注中显示的信息。他想知道是否有一种简单的方法来选择文本，自动创建脚注并将所选文本移到脚注。

当然，这可以手动完成。您需要做的就是遵循以下一般步骤：

。选择应该在脚注中的文本。

。按Ctrl + X。这会将文本剪切到剪贴板。

。按Alt + Ctrl + F。这将创建一个新的脚注，并将插入指针放置在脚注本身中。

。将剪贴板的内容粘贴为纯文本。

。根据需要设置脚注的文本格式。

如果您必须执行大量此过程，则可以通过创建执行相同操作的宏来使其自动化。 （好吧，除了第1步和第5步外，其他操作相同-您仍然需要选择要移到脚注中的文本，并且一旦脚注中的文本仍要进行格式设置。）

Sub TextToFootnote()

Dim sTemp As String

sTemp = Selection     Selection.Delete     Selection.TypeBackspace     ActiveDocument.Footnotes.Add Range:=Selection.Range, Text:=sTemp End Sub

宏会将您选择的任何文本复制到sTemp变量中。然后，它删除所选内容，键入退格键，并插入与sTemp中存储的文本等效的脚注。请注意，由于从主文档中删除文本后宏退格，因此假定您选择的内容（以及要移动到脚注的内容）

不包括前导空格。

快速访问工具栏”来使宏更可用。两种方法都可以使您轻松地将文本从文档正文移到脚注中。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（13591）适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。