永发信息网

Excel VBA 如何调用正常的函数 如 subtotal sum

答案:2  悬赏:30  手机版
解决时间 2021-03-07 23:02
Sub 宏1()

Range("D7").Select '下面公式中的 11 我想换成非空单元格最后的行怎么换? 直接换成 i ,貌似不行
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[4]C:R[11]C)"
Range("F7").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],RC[2]:R[9]C[3],2,0)"
Range("F8").Select
End Sub 谁帮我解释解释里面的单元格是怎么定位的。=SUBTOTAL(9,R[4]C:R[11]C)=SUBTOTAL(9,D11:D18)参数之间是啥么关系?
最佳答案
某一列的最后一个非空单元格的行:A列:I=RANGE("A65536").END(XLUP).ROW 即从65536行开始往上找调用工作表函数使用:APPLICATION.SUM()或者WORKSHEETFUNCTION.SUM()公式中R[4]C:R[11]C R代表行,C代表列。自己录制一个宏,对应一下就看懂了。
全部回答
r[4]c:r[11]c是r1c1样式。。 你代码中先选择了d7. range("d7").select 下面的代码 activecell.formular1c1 = "=subtotal(9,r[4]c:r[11]c)" 表示在d7里面写入公式: "=subtotal(9,r[4]c:r[11]c)" r[4]c:r[11]c 中的r[4]c 表示相对于d7向下偏移4行,列不变,即d11, r[11]c 表示相对于d7向下偏移11行,列不变,d18 所以呢 "=subtotal(9,r[4]c:r[11]c)"就等于=subtotal(9,d11:d18) 余下的类推即可
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
【我思我行】遭遇下列情景时,你会做出什么选
独门升鲜活烤鱼(王舍路全国总店)我想知道这个
间接计入费用的有哪些
be all you can be是什么意思
足球史上有单场超过100个进球的比赛吗
天津大学2015专项计划招生主要有什么专业
后田地址在什么地方,想过去办事
对于男人而言,哪个亲一些
嗨学网一级消防工程师高端密过班怎样
可以把衣服放健身房那里吗
1.4东风雪铁龙c2多少速度是经济速度
汽车打着的时候 电瓶突然拆掉会怎么样
本人在5173上卖了游戏账号之后,钱将在96小时
白竹山地址在什么地方,想过去办事
DHCP过期时间最高2周,怎么延长
推荐资讯
小学1~6年级语文词语,古诗,日积月累(人教版
Whether you're heading into the wild or do
秦殇声望有什么用?
四字成语接龙:放,山,高,水,长,虎,归,
同学,好朋友,认识5,6年了,能发展成恋人吗
邓小平说:“过去有一段时间,针对苏联霸权主
通利汽配这个地址在什么地方,我要处理点事
跨专业考研的成功率为多少
徐州市团结工贸有限公司地址在什么地方,想过
遂平县驻马店中国农业银行(遂平县支行)在什么
RMB与美元的汇率是高好还是低好?为什么?
劳务派遣费怎么做账
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?