首页 文章

将公式转换为VBA

提问于
浏览
0

我有两张表,Sheet1和Sheet2 . sheet1中的列J包含项目名称 . 我想要来自sheet2的poject的截止日期 . 为了这,

  • 我正在查看sheet2,项目名称为sheet1,如果它们相同,那么我将日期复制到第w列中的sheet1 .

  • 一次,我已复制,然后我将列u中的日期与列w进行比较,并说明它是否正常 .

我已经以公式的形式制定了上述条件 .

但是我想把它们放在VBA中 . 任何人都可以建议我如何在VBA中构建我的公式 .

列W = IFERROR(VLOOKUP(J2; Sheet2!$ A:$ L; 7; 0);“”)列X = IF($ W2> $ U2; 0; 1)列Y = IF($ W2 <= $ U2; 0; 1)

我不想使用录制的宏 .

2 回答

  • 0

    最简单的方法是在激活并接受公式时记录宏 . 在VBA代码中,我可以找到正确的解决方案 . 例如:

    单元格H3的IF($ W2> $ U2; 0; 1)

    Range("H3").Select
    ActiveCell.FormulaR1C1 = "=IF(RC23>RC21,0,1)"
    
  • 0
    Range("H3").Formula = "=IF(RC23>RC21,0,1)"
    

相关问题