Question

excel VBA怎样用变量表示单元格区域？

我想用到 cells（i，j）到 cells（100，j）这个区域同时满足为空的时候，执行某程序。
这里当然i小于100，也就是j列的第i到100行这个区域怎么表示？
谢谢！

Answer 1

=Application.WorksheetFunction.Max(Range(("A" & J & ":" & "C" & i))
或者
=Application.WorksheetFunction.Max(Range((cells(j,1),cells(i,3)))

Answer 2

sub ddd()
dim j,m,n as integer
'j没有赋值
n=0
for m=i to 100
if cells(i,j)<>"" then
n=1
goto tt
endif
next
tt:
if n=0 then
执行程序
endif
end sub

Answer 3

range(cells(i,j),cells(100,j))

追问

If Range(Cells(i, j), Cells(12, j)) = "" And Range(Cells(a, b), Cells(12, b)) = "" Then
我这句运行错误，提示信息：类型不匹配，帮忙看一下。

追答

If application.sum(Range(Cells(i, j), Cells(12, j))) = 0 And application.sum(Range(Cells(a, b), Cells(12, b))) = 0 Then