作者:乔山办公网日期:
返回目录:excel表格制作
1、新建excel,在A1单元格输入=row(),即可将行号作为变量来;
2、将A1单元格源的函数复制到A列剩余单元格,百以A10为例,单元格内容=row()
3、在B1单元格,写入测试数据11;
4、在B2单元格,写入公度式=B1+1;
5、B2单元格,鼠标向下拖动,将公式复制到下面单知元格,即可完成每一行道的数据等于上一行的数字加1;
D2单元格写入公式
=INDIRECT("A"&COLUMN(A1))+B1
或
=OFFSET($A1,COLUMN(A1)-1,)+B1
再或
=INDEX(A:A,COLUMN(A1))+B1
右拉填充公式
例如:
i=13614
Selection.AutoFill Destination:=Range("F2:F"&i)
首先如果你想用函数 只能用引用 ,也就是你打单元格百地址作为度变量,把内容作为值,但这似乎没有意义
所以只能用宏 也就是VBA 在工作表按ALT+F11进入编知程模式,在工则空白窗体放道入下面代码 ,并将光标定位于代码内任何位置,再按F5执行.....
Private Sub CommandButton1_Click()
A1=2 ''可自设 也就是X 你要统计的回列
X=1 ''从第几行开始 这里从第一答行,可自设
while trim(cells(x,A1).value)<>"" then
X=X+1
wend
msgbox("找到非空单元格数量为:" & X-1 &"个")
End Sub