我构建了一个查询,用于提取延迟付款的客户的姓名、电子邮件地址和订单代码。我正在尝试编写一个自动向所有生成的客户发送电子邮件的 vba 代码。到目前为止,我有:
Private Sub Command27_Click()
Dim oApp As New Outlook.Application
Dim oEmail As Outlook.MailItem
Set oEmail = oApp.CreateItem(olMailItem)
oEmail.To = ?????????
oEmail.Subject = "Test"
oEmail.Body = "Body Text."
oEmail.Send
End Sub
作为电子邮件(点击时),如果我将某人的特定电子邮件地址放在“收件人”位置,它就会起作用。我如何从查询中提取电子邮件地址?(假设可能有很多,没有或一个)