一种在同一单元格中自动填充值范围的方法

共享一种在同一单元格中快速填充值范围的方法。

上图A2单元格就是一个例子，如果你想快速显示003-007范围内的值变成003 004 005 006 007样式，如果你用手敲打，那就太麻烦了，你可以用以下**快速填写值范围：

函数填充范围（a 作为字符串，B 作为字符串）。

欢迎来到Will's Cottage。

dim arr() as string

dim i as integer

dim s as string

dim s2 as string

arr = split(a, b)

for i = arr(0) to arr(1)

if len(str(i)) = 2 then

s2 = "00" & i

elseif len(str(i)) = 3 then

s2 = "0" & i

elses2 = i

end if

s = s & s2 & " "

NextFill range = left（s， len（s） -1）。

end function

红框内是公式。

红色框内是结果。

如果你想用不同的方式（比如逗号）分隔它们，那么你只需要将红框中的“ ”改为“，”，如下图所示。

如果您不知道如何使用VBA，请参考上一篇文章：

VBA常用用法介绍》，如有疑问欢迎留言