我有一个电子邮件图表,我正在尝试从图表中获取电子邮件,以便向特定人员发送电子邮件。到目前为止,这是我在我的宏中所拥有的,但它似乎不起作用:
set email = ActiveDocument.GetSheetObject("CH63").GetCell(13,2)
ActiveDocument.Variables("TOEmail").SetContent email.text, true
ToAdd = TOEmail
sendMail Message , "RoadRunner Supplier Report - CR000U" , PATH & "CR000U " & DateToday &".xls" , ToAdd , CcAdd
CH63是我的电子邮件图表,ToAdd是保存电子邮件的变量。