objExcelWorkBook = Excel.OpenExcel('''C:\Users\Asus\Desktop\ie客户平台数据对比\网上充值明细.xlsx''',False,"WPS","","") Dim aa objRet1 = Excel.ReadCell(objExcelWorkBook,"网上充值明细","A5") TracePrint(objRet3) arrayData = DataHandling.append_list([],objRet1)
TracePrint(arrayData) Excel.CloseExcel(objExcelWorkBook,True)