GwenDolyn知道如何使用= rand（）功能插入随机文本。

但是，她想知道是否有一种方法可以自定义或将文本添加到= rand（）返回的内容中。她使用该功能作为样板/填充程序进行演示，并希望添加自己的词汇。

不幸的是，没有办法修改= rand（）

的返回值。因为它是Word内置的功能。但是，有两种方法可以解决此问题。可能的候选对象如下：构件块，自动更正条目或宏。稍后再详细介绍。

首先，必须了解Word提供了三种在文档中插入随机文本的方法。 GwenDolyn已经知道= rand（）函数，该函数会插入一些有关如何使用Word中某些功能的文本。如果您想阅读有关褐狐的信息，可以使用= rand.old（）函数。最后，您可以使用= lorem（）

插入基于设计师数十年来使用的_lorem ipsum_填充文本的文本。

如果这些选项都不适合您，那么一种替代方法是创建一个包含所需样板信息的Building Block条目。它可以是所需条目的长度，甚至可以包含“特殊”元素，例如表。与使用= rand（）

|相比，Building Block具有更容易插入文档的优势。功能。 _WordTips_的其他问题介绍了如何创建构建基块。

Word的自动更正功能也可以用于插入有限数量的样板文本。正确设置后，“自动更正”的使用甚至比“构建基块”更快。您需要做的就是记住您创建的小助记符（例如_bpt_，意思是_boilerplate text_），键入该助记符，它将自动替换为更完整的样板。

使用Building Block或AutoCorrect代替= rand（）

的缺点是他们不那么灵活；您无法指定所需的段落数量以及每个段落所需的句子数量。如果您需要这种灵活性，则需要诉诸创建一个可以插入样板的宏。下面是执行此任务的简单宏的示例。

Sub RandomText()

Dim sSent As String     Dim iSentences As Integer     Dim iParagraphs As Integer     Dim J As Integer     Dim K As Integer

iSentences = 3    'Number of sentences per paragraph     iParagraphs = 5   'Number of paragraphs     sSent = "Wallace Widgets makes the best widgets in the known world. "



For J = 1 To iParagraphs         For K = 1 to iSentences             Selection.TypeText sSent         Next K         Selection.TypeParagraph     Next J End Sub

当然，您可以将此宏分配给快捷键，也可以将其添加到“ link：/ wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [快速访问工具栏]”中，并在每次调用它时插入您的文本（在sSent变量中指定）。您甚至可能想要修改宏，以便宏不要求句子和段落“硬编码”，而是要求用户指定每个宏应使用多少个。

注意：

如果您想知道如何使用此页面（或_WordTips_网站上的任何其他页面）中描述的宏，我准备了一个包含有用信息的特殊页面。

点击此处在新的浏览器标签中打开该特殊页面。

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

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（9035）适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。 Word的旧菜单界面在这里：

用您自己的文本替换随机文本。