如何删除隐藏的引号

时间:2017-05-11 09:37:22

标签: excel vba excel-vba excel-formula

我的Excel工作表中包含很少的文本列。这些文本列是电子邮件消息。此工作表中的数据将用于发送邮件。

Excel中的数据看起来很好但是当邮件被复制到电子邮件主体时,引号会出现在邮件的开头和结尾。

我在网上研究过并发现这些是不受欢迎的字符。我尝试使用以下公式删除"

=SUBSTITUTE(SUBSTITUTE(CLEAN(K1),CHAR(127),""),CHAR(160),"")

但是问题是有多个列存在这个问题所以这个方法对我来说不是很可行的选择。另一个问题是,在此之后,单元格将丢失格式。

请帮我解决此问题,如果可能,我正在寻找查找和替换方法。最糟糕的情况是宏观。

提前致谢。

2 个答案:

答案 0 :(得分:0)

 Cells.Replace What:=Chr(127), Replacement:=vbNullString
    Cells.Replace What:=Chr(160), Replacement:=vbNullString

答案 1 :(得分:0)

您的Excel工作表中的单元格包含数据中的多行数据,这意味着单元格中的所有行都使用carriage return输入。 (输入密钥)

如果将此类单元格复制并粘贴到txt文件,您将获得" "内的文本。 " "实际上不是引号,而是带回车的文本。

只需使用公式,让我知道它是否有效,

=SUBSTITUTE(A1,CHAR(10)," ")

enter image description here