Excel 单单元格和空白单元格

我使用这个宏在单个单元格中对单个数字求和，用逗号分隔

Function Individual(R As Range) As Double
   Individual = Evaluate(Replace(R.Value, ",", "+"))
End Function

函数类似于=IndividualXY，其中XY是写入单个数字的源单元格

---

当源单元格为空时，如何修改宏以将0写入目标单元格？

Tnx FreeMan，你救了我一天：很高兴帮助，@Marko。在解决方案出现时，单击复选标记，这样当其他人在搜索中遇到它时，他们就更容易知道它起作用了。

Function Individual(R As Range) As Double
  if len(r.value) > 0 then
    Individual = Evaluate(Replace(R.Value, ",", "+"))
  else
    Individual = 0
  end if
End Function