Excel 将单元格值传递给.to和.CC

我将工作簿中的一系列单元格发送到Outlook

我对Ron de Bruin的以下宏进行了一些调整

现在是这样的（只是我编辑的部分）：

我想设置.to=“K1”和.CC=“M1:M4”。这些单元格来自同一活动工作簿。对此链接中列（“K”）中的每个单元格稍微调整一下单元格。值和for不起作用。

尝试以下操作：

.To = Range("K1")
For each cel in Range("M1:M4")
    Dim sCC as String
    sCC = sCC & ";" & cel.Value2
Next
.CC = Mid(sCC,2) 'to cut off initial ";"

---

抱歉，在完成最后一条评论之前按entedr。无论如何，Out look没有读到这一点，这次甚至没有创建电子邮件，而且Outlook对象库处于活动状态。我担心你不会得到更好的答案。。。检查sCC内部的内容以及错误发生的位置occurs@AndersonPimentel-您也不能将

邮件信封

与Outlook一起使用。如果通过Outlook对象发送邮件，则语法不同。更仔细地看一下Ron de Bruin的文章，看看语法上的差异。@Anderson Pimentel，看看这是否是正确的

.To = Range("K1")
For each cel in Range("M1:M4")
    Dim sCC as String
    sCC = sCC & ";" & cel.Value2
Next
.CC = Mid(sCC,2) 'to cut off initial ";"