我有一个包含我们所有客户信息的电子表格。所以我们有客户 1、2、3、4、5，每个客户都有一个 EMAIL_ADDRESS 列，其中包含一个或多个电子邮件地址。我需要读取所有这些地址并以某种形式或方式输出它们。我们有AJ标记的列Email_Addresses，我需要为每个客户或行提取所有电子邮件。
我找到了这个代码
Dim xlApp
Dim xlBook
Dim xlSheet
Set xlApp = CreateObject("Excel.Application")
xlApp.visible = true
Set xlBook = xlApp.Workbooks.open("D:\Macro\BirthDay.xls")
Set xlSheet = xlBook.Worksheets("Sheet1")
MsgBox xlSheet.Cells(1, A1).Value
但是我的问题是我如何获得这个或一些代码来读取 Email_Address Column 中的所有行AJ。
vbscript ×1