在vba中写入“IF（A2）IS NULL”

我目前写的这个公式与VBA的Excel（它的工作原理）

Cells(r, c).Formula = "IF(COUNTIF($C:$C,C" & r & ")=COUNTIFS($C:$C,C" & r & ",$" & col & ":$" & col & "," & col & r & "),""PRODUIT"",""ARTICLE""))" 

现在，我想给这个公式添加一个条件：

如果单元格是空白的， 然后返回“”; 其他，我的实际公式

所以我试过这个：

 Cells(r, c).Formula = "=IF(C" & r & " = " " ;"";IF(COUNTIF($C:$C,C" & r & ")=COUNTIFS($C:$C,C" & r & ",$" & col & ":$" & col & "," & col & r & "),""PRODUIT"",""ARTICLE""))" 

我需要一些帮助，预先感谢和抱歉我的英语不好。

Answer 1

如果你想检查单元格是否为空（空string），我更喜欢使用Chr(34)以便在公式string中包含"" 。

所以你的公式应该是：

 Cells(r, c).Formula = "=IF(C" & r & "=" & Chr(34) & Chr(34) & " ;" & Chr(34) & Chr(34) & ";IF(COUNTIF($C:$C,C" & r & ")=COUNTIFS($C:$C,C" & r & ",$" & col & ":$" & col & "," & col & r & "),""PRODUIT"",""ARTICLE""))"