如题所述
请问有没有VBA的命令??QQ309710057,可否细聊??多谢多谢
sub 取数()j=range("A1048576").end(xlup).row() /1000for i = 1 to jcells(j,2) = cells((i-1 )*1000+1 , 1)nextend sub意思是将A列中从第1行开始,每隔1000行取一个值放在B列