高手好，我想要 1至9个数字 每三个数字一行 一共84行 自动生成的公式

xiaodong112233

高手好，我想要 1至9个数字 每三个数字一行 一共84行 自动生成的公式

Eva1015

用VBA写了个，你可以拿去试试
sub test()
dim arr(1 to 84,1 to 1)
s=0
for i=1 to 7
    for j=i+1 to 8
     for k=j+1 to 9
      s=s+1
      arr(s,1)=i&j&k
next
next
next
range(“a2:a85”)=arr
end sub

Binknight

提供一个简单函数方法（无法上传附件，仅文字描述）
设单元格：A1=最小值（1/2/3等任意） B1=最大值（98/99/100等任意）
C1=$A$1,D1=C1+1,E1=D1+1
C2=IF(C1=$B$1-2,"一共有"&ROW()-1&"组三位数",IF(D1=$B$1-1,C1+1,C1))
D2=IF(D1=$B$1-1,C2+1,IF(E1=$B$1,D1+1,D1))
E2=IF(E1<$B$1,E1+1,D2+1)

C2:E2区域下拉即可。拉到末尾显示有多少组三位数，超出循环范围会显示#VALUE!