我正在创建此VBA，以添加一些详细信息以用于记录。然后，我想将其从电子邮件正文中删除，然后再发送出去。大部分时间它都在运行，有时却没有。不确定我的代码中是否有任何错误。
Dispatch_remark = " Dispatched to " & OutMail.To & "; " & OutMail.CC & " on " & Format(Now(), "yyyy-mm-dd hh:mm:ss")
OutMail.HTMLBody = Replace(OutMail.HTMLBody, FirstSentence, FirstSentence & Dispatch_remark, 1, 1)
OutMail.HTMLBody = Replace(OutMail.HTMLBody, Dispatch_remark, "", 1, 1)
示例：FirstSentence为“ 123456”； Dispatch_remark是“已发送给Tony Nguyen； me@gmail.com； abc@mail.com；”
我在电子邮件正文中的第一行看起来像这样：“ 123456分配给Tony ...”
上面代码的第三行是我试图删除“ Dispatched to ...”部分。但有时它不起作用。我认为它的字体或格式可能有些问题，但不确定。
以下是无法从我的电子邮件正文中删除Dispatch_remark的示例： 派往Tony Nguyen；香港（dummy@dsacdsa.com）;香港（dummy@dsacdsa.com）于2020-03-21 11:00:15;
谢谢大家。