Vba 参照活动单元格行插入公式

我正在尝试将公式插入单元格，并尝试使用ActiveCell.Row使用动态单元格引用

Range("Q" & ActiveCell.Row).Formula = "=IF(Range(""P"" & ActiveCell.Row).Address ="""",""DD/MM/YYY"",CONCATENATE(NETWORKDAYS(O21,P21),"" Working Days""))"

但是我得到了一个应用程序定义的错误

有人能告诉我哪里出了问题吗？谢谢

Range("Q" & ActiveCell.Row).Formula = "=IF(" & Range("P" & ActiveCell.Row).Address & " ="""",""DD/MM/YYY"",CONCATENATE(NETWORKDAYS(O21,P21),"" Working Days""))"

---

您必须注释掉字符串中的VBA代码。

谢谢，这成功了！我会在几分钟内接受答案。干杯