沈郎 2016-11-16 13:51 采纳率: 0%
浏览 1196
已结题

excel vba编程 不懂这代码的意思,求解

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

    求解这代码是什么意思
  • 写回答

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向钉钉机器人发送可以放大的图片?