|
本帖最后由 跑跑2014 于 2014-3-15 13:38 编辑
If Sheet9.Range("a2") >= "" Then
Columns("A:K").Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(3, 4, 5, 6, _
7, 8, 9, 10, 11), Replace:=True, PageBreaks:=False, SummaryBelowData:=True
end if
现有上段代码,想如果Sheet9.Range("a2") 如果等于空就不执行后面代码,现这样写不对,如何修改呢。 请教高手,多谢了。
If Sheet9.Range("a2") <>"" Then
|
|