Question

我目前在excel中使用VBA编写此公式（可行）

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

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

所以你的公式应该是：

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""))"

使用vba

1 个答案: