Vba Outlook邮件另存为（olTXT）方法将文本包装在100个字符之后。我如何使它更长？

我使用下面的VBA将电子邮件数据拉入文本文件，但当我这样做时，行要在100个字符后换行。因为我正在编写生成的.txt文件的脚本，所以这个包装让事情变得很困难。是否存在防止文本换行或延长.txt文件行最大长度的方法

Sub saveEmail(Msg As Outlook.MailItem)
Dim saveFolder As String
Dim dateFormat
Dim dtDate As Date
dateFormat = Format(Now, "yyyy-mm-dd ")
saveFolder = "C:\Users\########\AppData\Local\Temp\"

  ' assume an email is selected
  Set Msg = ActiveExplorer.Selection.Item(1)

  dtDate = Msg.ReceivedTime
   sName = Format(dtDate, "yyyy-mm-dd", vbUseSystemDayOfWeek, _
    vbUseSystem) & Format(dtDate, " (hh-nn-ss)", _
    vbUseSystemDayOfWeek, vbUseSystem)

  ' save as text
  Msg.SaveAs saveFolder & "\" & "New Matter Report.txt", olTXT
  Call SendMessage
End Sub

---

您可以查看邮件属性并构建自己的文本文件，而不依赖于SaveAs方法。

您可以查看邮件属性并构建自己的文本文件，而不依赖于SaveAs方法。

问题：指向一种调整文本包装点的方法，该方法为您提供了一些帮助控制（在OL 2013选项|邮件|消息格式中）在该问题的建议答案中，有一个参考，建议使用文件系统对象。我还没有找到一种方法来避免包括换行符在内的SaveAs。

问题：指向一种调整文本包装点的方法，该点为您提供了一些控制（在OL 2013选项中为“邮件”消息格式）在这个问题的建议答案中，有一个参考，其中建议使用文件系统对象。我还没有找到避免SaveAs（包括换行）的方法。

老板说我们需要自动化this@NateMay可能邮件没有以纯文本模式打开，这就是它被包装的原因。看看这个：老板说我们需要自动化this@NateMay可能邮件没有以纯文本模式打开，这就是它被包装的原因。看看这个：