Vba 从excel单元格复制时删除段落标记

当用户点击ctrl+c时，请帮助我从列表框复制字符串。我正在使用dataobject，但由于某些原因，它有时工作得很好，有时会给我一条错误消息。如果你知道这是为什么，停止阅读，因为这个问题的其余部分是没有必要的

现在我将它放在一个工作表单元格中，并使用range.copy，但是，当字符串粘贴到文本框中时，它会保留excel似乎放在每个单元格末尾的段落标记！只是为了让事情变得有趣，段落标记不能用Left删除-它需要除段落标记以外的所有内容。下面的段落标记用P表示

退货：strinP

必须是我缺少的简单功能。

您尝试过修剪功能吗？ 为什么要使用Range.copy

您不能只分配textbox1.value=RangeA1吗？

---

它工作正常，没有任何bug。

我还没有测试过，但是你试过切掉两个字符吗

---

我敢肯定这是\r\n或回车+换行，而不仅仅是\n你需要切掉。

按段落标记，你是说这个家伙“a.k.a.”？只是为了消除换行或回车的歧义…s=hello¨后跟s=Lefts，Lens-1对我来说很好。。。按预期返回s=hello。

s = "stringP"
s = Left(s,len(s)-1)
print s