VBA 1004錯誤內的Excel公式

Question

我正在比較兩列，並在另一列中顯示差異。 我有一個有效的excel公式，但是我需要在vba宏中使用它。 當我嘗試在宏中使用它時，出現錯誤“運行時錯誤：'1004'：應用程序定義或對象定義的錯誤”。 如何解決？

Sub Macro2()

   Range("B2:B60").Formula = "=IF(COUNTIF($A:$A,$B2)=0, B2, "")"

End Sub

Answer 1

字符串中的引號需要加倍，因此，而不是

Range("B2:B60").Formula = "=IF(COUNTIF($A:$A,$B2)=0, B2, "")"

采用

Range("B2:B60").Formula = "=IF(COUNTIF($A:$A,$B2)=0, B2, """")"

但是請注意，這將產生循環引用錯誤，因為單元格B2（等）將引用自身。

也許您打算將新值寫入C列？ 如果是這樣，請使用

Range("C2:C60").Formula = "=IF(COUNTIF($A:$A,$B2)=0, B2, """")"