zoukankan      html  css  js  c++  java
  • 操作Excel的宏

          有时候在Excel中,需要循环的算每一列的值,而这一列的值是某几列的求和或者某种运算后的结果,比如如下的C4=C3+B4clip_image001

         可以用一个宏来实现,宏代码如下:

    Dim i As Integer
        For i = 10 To 252
             ActiveSheet.Hyperlinks.Add anchor:=Range("G" & i)
             Range("G" & i).Select
             ActiveCell.FormulaR1C1 = "=R[-1]C+RC[-1]"
        Next

          一般可以先通过录录制一个宏来查看这个宏的代码,然后进行改进。录制的过程,其实只需要新建一个宏,然后点击开始录制,然后直接在Excel上进行相关的操作,它就已经在录制了。

          经过实验,如果想实现某一列等于前面二列的值相加,如下图:

    clip_image002

          可以用如下代码:

    Dim i As Integer
        For i = 10 To 252
             ActiveSheet.Hyperlinks.Add anchor:=Range("G" & i)
             Range("G" & i).Select
             ActiveCell.FormulaR1C1 = "=RC[-1]+RC[-2]"
        Next
  • 相关阅读:
    k8s令牌登录设置方法
    etcd查看集群信息
    go Map
    go 切片重组
    go For-range结构
    go 切片
    go 数组与切片
    go 内存优化
    go 格式化输出
    go 闭包函数
  • 原文地址:https://www.cnblogs.com/xiaoxiangfeizi/p/3494798.html
Copyright © 2011-2022 走看看