通过VBA在Excel中复制单元格公式

布莱恩·D

我想在VBA的C列中创建IF公式。但是,当我这样做时,公式的出现是使用单元格的值而不是单元格引用。我想知道如何使用单元格引用:

[在运行VBA时让公式说[=IF(B2>0,2,A2)]而不是[=IF(1>0,2,1]在C2单元格的Excel工作表中。]

我要重新创建的工作表的图片。 公式在c列中

Dim c As Range
Dim a As Integer
Dim b As Integer

'//loop it in column C
For Each c In Range(Range("C2"), Range("C2").End(xlDown))
    a = c.Offset(0, -1) '// Column B
    b = c.Offset(0, -2) '// Column A
    c.Formula = "=IF(" & b & ">0,2," & a & ")" '// same format as formula [=IF(B2>0,2,A2)]
   
Next
大本钟

如果我正确理解:

Dim a As Range
Dim b As Range

Set b = c.Offset(0, -1) '// Column B
Set a = c.Offset(0, -2) '// Column A

c.Formula = "=IF(" & b.Address(False,False) & ">0,2," & a.Address(False,False) & ")"

但是您无需循环或使用Address;即可完成此操作当公式在列中填充时,Excel将更新相对引用。

With ActiveSheet
    Dim lastRow As Long
    lastRow = .Cells(.Rows.Count, "C").End(xlUp).Row

    .Range("C2:C" & lastRow).Formula = "=IF(B2>0,2,A2)"
End With

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

如何在Excel中仅复制单元格的纯文本?

来自分类Dev

如何在Excel中仅复制单元格的文本值

来自分类Dev

两个工作簿之间的Excel VBA复制单元格

来自分类Dev

从多个Excel文件复制单元格并将其粘贴到主文件中

来自分类Dev

单元格公式替换中的Excel VBA错误1004

来自分类Dev

用Excel文件中的图像复制单元格范围

来自分类Dev

VBA,自动填充系列,而不是复制单元格

来自分类Dev

Excel:在公式中复制单元格格式

来自分类Dev

Excel VBA,如何从Column对象内复制单元格

来自分类Dev

VBA-复制单元格区域(随机行)

来自分类Dev

Excel公式或VBA复制单元格删除空格?

来自分类Dev

Excel VBA:复制单元格内容

来自分类Dev

Excel表查找和复制单元格值

来自分类Dev

查找并复制单元格中的某些值

来自分类Dev

Excel将VBA宏复制单元格循环到新工作表

来自分类Dev

Microsoft Excel,复制单元格的格式

来自分类Dev

Excel:仅当单元格在其他列中匹配时才可以复制单元格吗?

来自分类Dev

Excel VBA-如果单元格值满足条件,则在工作表之间复制单元格

来自分类Dev

根据Excel VBA中的公式创建单元格值

来自分类Dev

如何通过Excel VBA将公式放入单元格中?

来自分类Dev

vba-excel:如何使用for循环和if语句排除复制单元格区域

来自分类Dev

Excel VBA复制单元格值,如果> 0到左侧的单元格

来自分类Dev

Excel VBA宏复制单元格并粘贴到另一个

来自分类Dev

Excel-VBA循环-从单元格复制公式,粘贴到单元格中,然后复制特殊粘贴

来自分类Dev

根据条件复制单元格并通过覆盖其他工作表中的单元格进行粘贴

来自分类Dev

Excel VBA 用公式中的答案替换单元格

来自分类Dev

如果列包含数据,则复制单元格 A,Excel VBA

来自分类Dev

有没有复制单元格的公式?

来自分类Dev

VBA在满足条件时复制单元格

Related 相关文章

  1. 1

    如何在Excel中仅复制单元格的纯文本?

  2. 2

    如何在Excel中仅复制单元格的文本值

  3. 3

    两个工作簿之间的Excel VBA复制单元格

  4. 4

    从多个Excel文件复制单元格并将其粘贴到主文件中

  5. 5

    单元格公式替换中的Excel VBA错误1004

  6. 6

    用Excel文件中的图像复制单元格范围

  7. 7

    VBA,自动填充系列,而不是复制单元格

  8. 8

    Excel:在公式中复制单元格格式

  9. 9

    Excel VBA,如何从Column对象内复制单元格

  10. 10

    VBA-复制单元格区域(随机行)

  11. 11

    Excel公式或VBA复制单元格删除空格?

  12. 12

    Excel VBA:复制单元格内容

  13. 13

    Excel表查找和复制单元格值

  14. 14

    查找并复制单元格中的某些值

  15. 15

    Excel将VBA宏复制单元格循环到新工作表

  16. 16

    Microsoft Excel,复制单元格的格式

  17. 17

    Excel:仅当单元格在其他列中匹配时才可以复制单元格吗?

  18. 18

    Excel VBA-如果单元格值满足条件,则在工作表之间复制单元格

  19. 19

    根据Excel VBA中的公式创建单元格值

  20. 20

    如何通过Excel VBA将公式放入单元格中?

  21. 21

    vba-excel:如何使用for循环和if语句排除复制单元格区域

  22. 22

    Excel VBA复制单元格值,如果> 0到左侧的单元格

  23. 23

    Excel VBA宏复制单元格并粘贴到另一个

  24. 24

    Excel-VBA循环-从单元格复制公式,粘贴到单元格中,然后复制特殊粘贴

  25. 25

    根据条件复制单元格并通过覆盖其他工作表中的单元格进行粘贴

  26. 26

    Excel VBA 用公式中的答案替换单元格

  27. 27

    如果列包含数据,则复制单元格 A,Excel VBA

  28. 28

    有没有复制单元格的公式?

  29. 29

    VBA在满足条件时复制单元格

热门标签

归档