Excel 填充句柄 - 如何设置迭代计数器?

Excel fill handle - how to set iteration counter?

是否可以通过excel填充句柄,增加字符串中包含的索引?

即: 有这个:

catalog/images/1/5start.jpg

需要这个:

catalog/images/1/6start.jpg
catalog/images/1/7start.jpg
catalog/images/1/8start.jpg

有这个:

catalog/images/1/sta5rt.jpg

需要这个:

catalog/images/1/sta6rt.jpg
catalog/images/1/sta7rt.jpg
catalog/images/1/sta8rt.jpg

不是直接可行的,但使用辅助列很容易:

A1中放入catalog/images/1/5

B1中放start.jpg

C1中输入公式=A1 & B1.

Select那三个单元格,往下拉:

这就是我结合使用 UDF 和公式的方法。如果您愿意,可以将其转换为仅 VBA。

首先将此代码放入模块中:

Public Function DigitsOnly(sStr As String) As Variant
    Dim oRegExp As Object

    Set oRegExp = CreateObject("VBScript.RegExp")

    With oRegExp
        .IgnoreCase = True
        .Global = True
        oRegExp.Pattern = "\D"
        DigitsOnly = oRegExp.Replace(sStr, vbNullString)
    End With
End Function

将此公式放入单元格 A2 并将其向下拖动,直到您想要增加数字为止。

This formula will assume you have data in cell A1.

=SUBSTITUTE(A1,DigitsOnly(TRIM(RIGHT(SUBSTITUTE(A1,"/",REPT(" ",99)),99))),DigitsOnly(TRIM(RIGHT(SUBSTITUTE(A1,"/",REPT(" ",99)),99)))+1)