Excel 2013 VBA及UDF执行rng.value=""时返回0，求原因

我之前在处理Excel VBA时也踩过这个坑，其实这背后是Excel的单元格格式逻辑、VBA的类型转换规则，以及UDF的特殊限制共同导致的，具体原因分这几个方面：

1. 单元格的数字格式“强制”转换空值 #

如果目标单元格之前被设置为数字类格式（比如常规格式但曾存储过数字、数值格式、货币格式等），Excel会默认认为这个单元格应该存储数值类型的数据。当你用rng.Value = ""赋值空字符串时，Excel会把不符合数字类型的空字符串自动转换成数值类型的默认值——0，而不是保留空单元格。

2. UDF的操作限制导致的异常 #

如果这段代码是在**用户定义函数（UDF）**里执行的，情况会更特殊：Excel对UDF的权限有严格限制，UDF只能返回值到自身所在的单元格，不能直接修改其他单元格的内容。当你在UDF里尝试给其他单元格赋值空字符串时，Excel会因为上下文限制，返回数值类型的默认值0，而不是预期的空值。

3. VBA的隐式类型转换 #

VBA是弱类型语言，当你把字符串类型的空值（""）赋值给一个原本存储数值的Range对象时，VBA会自动进行隐式类型转换，把空字符串转换成数值类型的默认值0，而不是保留空字符串的状态。

解决办法 #

• 要真正清空单元格内容，推荐用rng.ClearContents方法，它会直接清除单元格内容，不管原有格式是什么，都会变成空单元格。
• 如果必须用Value赋值，可以先把单元格格式改成文本格式：

  rng.NumberFormat = "@"
  rng.Value = ""
  

  这样空字符串就能被正确保留。
• 针对UDF：不要在UDF里修改外部单元格，而是让UDF返回vbNullString，同时把UDF所在单元格的格式设为文本，就能得到空单元格而不是0。

内容的提问来源于stack exchange，提问作者David Boyd