Question

我正在从VBA构建一个具有特定范围的自动电子邮件。但现在宏正在采用活动工作表的特定范围。我不知道如何正确指定我的工作簿和表格..也许有人可以提供帮助？

Sub Send()


Dim r As Range

Set r = Range("rm")

With r

ActiveWorkbook.EnvelopeVisible = True

With .Parent.MailEnvelope.Item
.To = ""
.CC = ""
.BCC = ""
.Subject = "Automatic Message: E-comm numbers Today"
.Send

End With

End With




End Sub

它应该在这个工作簿/表中

Workbooks("Copy of Copy of shipments 5.1.xlsm").Sheets("rapportages")

希望你能帮忙:)！

Answer 1

使用fully qualified references：

range

如果不这样做，Excel会从活动工作簿中构造<html xmlns:th="http://www.thymeleaf.org">对象，而不是在这种情况下构建所需的对象。

需要将VBA宏从activeworkbook更改为特定的工作簿/表

1 个答案: