作业帮 > 综合 > 作业

excel vba中range(cells(1,1),(cells(1,2))是否等于range(A1:B1),如果不能

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/06/05 11:35:30
excel vba中range(cells(1,1),(cells(1,2))是否等于range(A1:B1),如果不能用什么符号呢?程序如下:
Dim tji,tjj,tja,tjb,tjc,tjd
For tji = 16 To 34
For tjc = 6 To 238
If Cells(tjc,4) = "" Then GoTo tjforend
Next
tjforend:
Range(Cells(5,1),Cells(tjc,4)).AdvancedFilter Action:=xlFilterCopy,CriteriaRange:=Range( _
Cells(4,tji),Cells(5,tji)),CopyToRange:=Range(Cells(6,tji),Cells(6,tji + 1)),Unique:=False
tji = tji + 1
excel vba中range(cells(1,1),(cells(1,2))是否等于range(A1:B1),如果不能
ange(cells(1,1),cells(1,2))等于range("A1:B1")
由於你的tji是变量所以采用了前一种表示方法