excel每重复后递增

来源:百度知道 编辑:UC知道 时间:2024/06/08 07:26:19
您好,假设要输入的数据在A列,且每重复2行后递增3 变成:
1
1
4
4
7
7
10
10
13
13
......要怎么弄啊?

a1=1
a2=1
a3=a1+3
a4=a2+3
选中a3和a4鼠标停在a4右下角变成小十字,按住左键向下拖就ok 了

sub 显示()
for i=1 to 65535 step 2
cells(i,1)=(3*i-1)/2
cells(i+1,1)=(3*i-1)/2
next i
end sub

在第一个单元格内输入或复制以下公式:
=IF(MOD(ROW(A1),2)=0,INDIRECT("A"&ROW(A1)-1),((ROW(A1)-1)/2)*3+1)
然后下拉复制即可。