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

是否可以通过Excel填充句柄,incrase索引包含在string?

即:有这个:

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 

不是直接可能的,但很容易与辅助列:

A1catalog/images/1/5

B1start.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单元格中,并拖动它直到你想增加数字。

此公式将假定您有单元格A1数据。

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

在这里输入图像说明