托德(Todd)正在建立漫画书清单,希望A列中的每个单元格包含重复3次的文本“蝙蝠侠(1940)0”,然后是重复3次的“蝙蝠侠(1940)1”,“蝙蝠侠(1940) 2“

重复了3次,一路通过“蝙蝠侠(1940)700”重复了3次。那是2103条单独的行,但是Todd不确定在复制或填充单元格时如何重复这样的模式。

实际上,您可以通过几种方法来完成这样的任务。一种方法是简单地创建一个序列,然后复制并粘贴两次。

大致思路如下:

。在单元格A1中输入以下内容:Batman(1940)0。选择单元格A1。

。向下拖动填充手柄到单元格A701。这应该为您提供从“蝙蝠侠(1940)0”到“蝙蝠侠(1940)700”的完整序列,并且仍应选择该范围内的单元格。

。按Ctrl + C将范围复制到剪贴板。

。将范围粘贴到单元格A702中,然后再次粘贴到单元格A1403中。

。排序A列。

整个过程非常迅速;我用了大约45秒钟就完成了。但是,这有一个缺点:排序后,您将不会基于文本末尾的数字以数字顺序获得单元格序列。如果要确保这一点,您将要输入第一本漫画书(在单元格A1中)为“蝙蝠侠(1940)000”。当您使用三位数作为结束号码时,排序会很好。

您还可以使用另一种依赖于填充手柄的方法。请遵循以下一般步骤:

。在单元格A1中输入以下内容:Batman(1940)0。在单元格A4中输入以下内容:Batman(1940)1。选择单元格A1:A6。 (这很重要。)

。将填充手柄向下拖动到单元格A2103。这应该给您完整的序列“ Batman(1940)0”到“ Batman(1940)700”,并在序列中的每个项目之后有两个空单元格,并且仍应选择该范围内的单元格。

。按F5。 Excel将显示“转到”对话框。

。单击特殊按钮。 Excel将显示“转到特殊”对话框。

(请参见图1。)

。确保选择了空白单选按钮。

。单击确定按钮。 Excel修改选择,以便仅选择范围内的空白单元格。

。在公式栏中,键入以下公式:= A1。按Ctrl + Enter。这会将公式复制到所有空白单元格。

。选择单元格A1:A2103。

。按Ctrl + C将范围复制到剪贴板。

。使用选择性粘贴粘贴值。这会将公式转换回值。

第三种方法(我发现可以很快完成)是从一开始就使用公式:

。在单元格A1中输入以下公式:* =“ Batman(1940)

”&INT((ROW()-1)/ 3)*。选择单元格A1:A2103。

。按Ctrl + D。单元格A1中的公式将复制到所选范围的其余部分。

。按Ctrl + C将范围复制到剪贴板。

。使用选择性粘贴粘贴值。 (这会将公式转换回值。)

如果您需要经常创建这样的序列,那么您将欣赏基于宏的方法。下面很简单,将所需的文本序列放入A列:

Sub ComicSequence()

Dim sTemp As String     Dim J As Integer     Dim K As Integer

sTemp = "Batman (1940) "

For J = 0 To 700         For K = 1 To 3             Cells(J * 3 + K, 1).Value = sTemp & J         Next K     Next J End Sub

要对单元格值使用不同的前言,您需要做的就是更改分配给sTemp字符串的值。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(9410)适用于Microsoft Excel 2007、2010、2013、2016、2019和Office 365中的Excel。