如何在Word 2016中添加文本?当你在Word 2016写,特别是如果你在一个学术文章,甚至一个大的虚构作品,那么您可能想秒杀大文本,而不是将其删除。要添加文本,请选择它,然后将其向下移动到文档末尾。当您“完成”写作时,请查看峰值以查看是否值得保存。

以下是使过程自动化的spike_text宏的代码:

Sub spike_text()

‘ spike_text Macro

‘ Move selected text to the end of the document

If Selection.Type = wdSelectionNormal Then

Selection.Cut

Selection.EndKey Unit:=wdStory

Selection.TypeParagraph

Selection.Paste

Application.GoBack

Application.GoBack

Else

MsgBox “Nothing to spike”

End If

End Sub

该宏包含if-else结构。所述如果测试确定文本是否被选择。如果是这样,则将文本剪切并粘贴到文档末尾。如果未选择文本,则等式的其他部分将显示一个带有文本“ Nothing to刺的消息”的消息框。

最初记录了此宏,并使用了以下击键:

Ctrl + X

Ctrl +结束

Ctrl + V

Shift + F5,Shift + F5

Shift + F5键盘快捷键可将您返回到文档中的上一个编辑位置。

记录击键之后,添加了if-else结构,以确保当未选择文本时宏不会显示难看的错误消息。此过程是防御性编程的一部分,在该过程中,您预计并非每个宏都在理想条件下启动。在这种情况下,不理想的条件是未选择文本。

声明:本站所有文章均出自互联网,只为学习之用;如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。