Vba 如何在Outlook的电子邮件正文中插入条目
我试图做的是从Excel中复制一个范围(2列),并粘贴到Outlook的电子邮件正文中。我想在邮件正文中也有两栏,但我仍然在一行中收到所有内容。这是我的密码:Vba 如何在Outlook的电子邮件正文中插入条目,vba,Vba,我试图做的是从Excel中复制一个范围(2列),并粘贴到Outlook的电子邮件正文中。我想在邮件正文中也有两栏,但我仍然在一行中收到所有内容。这是我的密码: Tresc = "Cześć" & vbCr & vbCr & " słówko/a na dzisiaj to:" & vbCr & vbCr & Tresc & vbNewLine 'utworzenie hiperłącza Hiperlacze = "mailto:
Tresc = "Cześć" & vbCr & vbCr & " słówko/a na dzisiaj to:" & vbCr & vbCr & Tresc & vbNewLine
'utworzenie hiperłącza
Hiperlacze = "mailto:" & Trim(LCase(Adres)) & _
"?subject=" & Tytul & _
"&body=" & Tresc
我相信您正在寻找“回车/换行”的内置vbCRLF,而不仅仅是vbCR。我相信您正在寻找“回车/换行”的内置vbCRLF,而不仅仅是vbCR。因为这是一个mailto链接,所以还有一些其他规则在起作用。将
vbCr
替换为“%0D%0A”
例如:
Tresc = "Cześć%0D%0Asłówko/a na dzisiaj to:" 'etc.
因为这是一个mailto链接,所以还有一些其他规则在起作用。将
vbCr
替换为“%0D%0A”
例如:
Tresc = "Cześć%0D%0Asłówko/a na dzisiaj to:" 'etc.
从Excel复制/粘贴范围的代码在哪里?下面是代码:对于i=1到ZakresSlowek.Rows.Count For j=1到ZakresSlowek.Columns.Count Tresc=Tresc&&&&ZakresSlowek.Cells(i,j)。Value Next Tresc=Tresc&vbNewLine Next Tresc=“Cześć”&vbCr&“słwko/a na Dzisaj至:“&vbCr&vbCr&Tresc&vbNewLine我会使用比
vbCrLf
更好的抽象vbNewLine
,但在任何情况下,考虑到这是一个mailto
链接,我怀疑您需要对实际字符进行HTML编码。您的问题标题具有误导性:您没有在电子邮件正文中插入输入,而是在mailto链接中插入输入,这是一件非常不同的事情。@MathieuGuindon+1,我首先在电子邮件发送宏中测试了所有类型的换行符,一切正常。然后我意识到这个VBA代码中有一个超链接。请编辑您的问题并将代码添加到那里,而不是将其放在注释中。人们可能不会阅读注释,也不会看到此信息。从Excel复制/粘贴范围的代码在哪里?以下是代码:对于i=1到ZakresSlowek.Rows.Count对于j=1到ZakresSlowek.Columns.Count Tresc=Tresc&“”&ZakresSlowek.Cells(i,j).Value Next Tresc=Tresc&vbNewLine Next Tresc=“Cześć”&vbCr&vbCr&słwko/a na dzisaj to:“&vbCr&vbCr&Tresc&vbNewLine我会使用比vbCrLf
更好的抽象,但在任何情况下,鉴于这是一个mailto
链接,我怀疑您需要对实际字符进行HTML编码。您的问题标题具有误导性:您没有在电子邮件正文中插入输入,而是在mailto链接中插入输入,这是一件非常不同的事情。@MathieuGuindon+1,我首先在电子邮件发送宏中测试了所有类型的换行符,一切正常。然后我意识到这个VBA代码中有一个超链接。请编辑您的问题并将代码添加到那里,而不是将其放在注释中。人们可能不会阅读评论,也不会看到此信息。我尝试过vbCRLF,但无效。您是否认为由于Outlook设置,它可能无法工作?不,我使用它来生成Outlook电子邮件。这里不确定。我试过vbCRLF,但不起作用。您是否认为由于Outlook设置,它可能无法工作?不,我使用它来生成Outlook电子邮件。这里不确定。投票支持正确性,但最好包含正确的术语,以便OP和未来的读者可以研究他们需要了解的关于html编码的所有内容。投票支持正确性,但最好包含正确的术语,这样OP和未来的读者就可以研究他们需要了解的关于html编码的一切。