小编use*_*966的帖子

我编写了以下代码来删除一行中使用 VBA 中的一行中的“*”或“-”字符之后的文本，但它给出了错误。任何人都可以帮忙吗？

Sub Removetext()

For each c In Range("A1:ZZ1")
    c.Value = Left(c.Value, InStr(c.Value, "-") - 1)
Next C

End Sub