运行 时间错误 13：每次输入不匹配 运行 我的代码
run time error 13: type mismatch everytime i run my code
当我尝试 运行 脚本时，我得到了这个 type mismatch (Error 13)。下面是代码突出显示的错误。
我试图将带有 VBA 的公式输入到单元格中，但出现错误。
TopVisibleCell.Formula = _
"=IF(ISERROR(LEFT(I2,SEARCH( " - " ,I2)-1)),I2,LEFT(I2,SEARCH( " - " ,I2)-1))"
您需要使用 ""
在 VBA 中转义 "
TopVisibleCell.Formula = _
"=IF(ISERROR(LEFT(I2,SEARCH("" - "",I2)-1)),I2,LEFT(I2,SEARCH("" - "",I2)-1))"
当我尝试 运行 脚本时，我得到了这个 type mismatch (Error 13)。下面是代码突出显示的错误。 我试图将带有 VBA 的公式输入到单元格中，但出现错误。
TopVisibleCell.Formula = _
"=IF(ISERROR(LEFT(I2,SEARCH( " - " ,I2)-1)),I2,LEFT(I2,SEARCH( " - " ,I2)-1))"
您需要使用 ""
"
TopVisibleCell.Formula = _
"=IF(ISERROR(LEFT(I2,SEARCH("" - "",I2)-1)),I2,LEFT(I2,SEARCH("" - "",I2)-1))"