Range("B2").Activate
ActiveCell.Formula = "=LEFT(I2,IF(ISERROR(FIND(",",I2,1)),LEN(I2),FIND(",",I2,1)-1))"
有一些人发布了解决方案，但我尝试了所有似乎相关的解决方案。
从Formula和FormulaR1C1之间切换...在公式周围使用双引号，三引号甚至四引号。
Anyhelp在这一点上会很精彩。
答案 0 :(得分：1)
这应该对你有用
Range("B2").Formula = "=LEFT(I2,IF(ISERROR(FIND("","",I2,1)),LEN(I2),FIND("","",I2,1)-1))"
如果不是您使用的是哪个版本的Excel？