<em>excel</em> VBA中 Range函数将列作为变量怎么表示？

首先如果你想用函数 只能用引用 ,也就是你打单元百格地址作为变量,把内容作为值,但这似乎没有意义
所以只能用宏 也就是度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

首先range是属性，不来是函数，它本身表示一个区域引源用，而不是说它作为函数返回一个区域。百
将列作为变量一般可以用度cells(row,col)属性知中的col(列号）作为变量，作为区道域引用的Range属性可以用range(cells(row1,col1),cells(row2,col2))来表示
在E34输入公式

=SUM(C3:C33)*D34 即可。。。

如果想拖动且不想在公式中改变D34这个位置
可以运用“$”绝对引用。
$A$1绝对引用A1单元格。
=SUM(C3:C33)*$D$34

Sub a()
x = 5
Columns("A").Resize(, x).Select
End Sub

------------------我是华zd丽的分回割线----------------

Sub a()
x = 5
Range(Columns("A"), Columns(x)).Select
End Sub

二选一答