ActiveCell.FormulaR1C1 = "=INDIRECT(""A""&INT(RAND()*R[1]C[7]+3),TRUE)"
Range("K2").Select
ActiveCell.FormulaR1C1 = ""
Range("K2").Select
ActiveCell.FormulaR1C1 = "=COUNTIF(R[1]C[-10]:R[98]C[-10],""<>"")"
Range("D1:J14").Select
求解这代码是什么意思
excel vba编程 不懂这代码的意思,求解
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
- 邀请回答
-
1条回答
- threenewbee 2016-11-16 15:20关注
RAND()*R[1]C[7]+3生成一个3~R[1]C[7]对应内容的随机整数
INDIRECT得到A列和上述随机数所在行的内容,具体看ActiveCell此时选中的单元格是什么,代码在前面,你没有写COUNTIF计算R[1]C[-10]:R[98]C[-10]里不为空的单元格数,把结果放在K2
Range("K2").Select选中K2
Range("D1:J14").Select选中D1:J14解决 无用评论 打赏 举报
悬赏问题
- ¥17 pro*C预编译“闪回查询”报错SCN不能识别
- ¥15 微信会员卡接入微信支付商户号收款
- ¥15 如何获取烟草零售终端数据
- ¥15 数学建模招标中位数问题
- ¥15 phython路径名过长报错 不知道什么问题
- ¥15 深度学习中模型转换该怎么实现
- ¥15 Stata外部命令安装问题求帮助!
- ¥15 从键盘随机输入A-H中的一串字符串,用七段数码管方法进行绘制。提交代码及运行截图。
- ¥15 TYPCE母转母,插入认方向
- ¥15 如何用python向钉钉机器人发送可以放大的图片?