复制没有讨厌的段落标记的字符串

Question

嗨，我有点菜鸟，所以请保持温柔。我正在尝试使用宏来让我的生活更轻松，只需一个按钮即可复制标准电子邮件。电子邮件存储在 sheet 中，其中包含完整的电子邮件地址列表，因此只需在 excel 中完成所有操作并添加我想要的任何代码会很方便。

但我的问题是，我总是在副本末尾看到这些讨厌的段落标记，而且我通常手动将其编辑掉。当我做类似

的事情时，它仍然会发生

range("L6").copy

所以我尝试了

dim bla as string
bla = trim(range("L6").value)
bla.copy

但我发现这不起作用。我什至试过

left(range("L6").copy,len(range("L6").copy)-1).copy

但这也不起作用。

为那些关心的人提供一些背景知识：我有一个供应商列表，其中包含我所有的供应商信息，包括他们用于银行转账咨询的电子邮件地址。在单元格 "L6" 中，我有一条我想使用的多行消息，内容为

早上好：

请查看附件中的银行转帐付款副本。

此致，

消息可能会更改，因此宏应该针对此单元格。这些讨厌的 space 太烦人了。我在电子邮件中添加了更多内容，因此不断复制我的标准电子邮件信息很麻烦。我什至尝试查看 excel 的高级设置 - 没有运气。我不确定，但我认为问题的根源在于结束逗号在我突出显示的文本末尾添加了一个额外的段落 space 。任何帮助将非常感激。有关更多详细信息，请参见屏幕截图。谢谢

ps。不知道我是否使用正确的标签以获得最佳响应

Answer 1

本，

感谢更新。请参考以下截图：

正如您在 select 全部 (CTRL + A) 时看到的那样，每行末尾始终显示一个空白。

1. 没有 space 文本中的空白，但在 selection 处有一个小空白。
2. 第 3 行有一个 space，导致 selection 处的间隙更大。
3. 第 3 行有一根管道，导致 selection 处的间隙变宽。

我认为这不会在复制过程中翻译成 space 秒（我没有遇到从 Excel 复制和粘贴到 Outlook 的问题）。

美好的一天，

乔纳森。

Answer 2

好吧，奇怪。所以那些额外的空间不再发生了。从字面上看，这是重新启动计算机的问题。为什么？如何？ idk我责怪微软。整个考验令人非常失望。