用vbs复制Sap左下角弹出的消息粘贴到D盘l.xls文件A1单元格
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
objExcel.Workbooks.Open "D:\l.xls"
objExcel.ActiveSheet.Cells(1,1).Value=CreateObject("WScript.Shell").Popup("Sap左下角弹出的消息",0,"标题",0)
objExcel.ActiveWorkbook.Save
objExcel.Quit
免责声明:
以上内容除特别注明外均来源于网友提问,创作工场回答,未经许可,严谨转载。