VBS脚本怎么复制SAP里的物料描述到新的EXCEL

要复制SAP中的物料描述到新的Excel文件中，您可以使用VBS脚本中的SAP GUI Scripting功能来实现。以下是一个示例脚本：

' 创建SAP GUI自动化对象
Set SapGuiAuto = GetObject("SAPGUI")
' 获取SAP GUI脚本对象
Set Application = SapGuiAuto.GetScriptingEngine
' 连接到SAP系统
Set Connection = Application.OpenConnection("SAP系统名称", True)
' 获取SAP会话
Set Session = Connection.Children(0)

' 进入SAP的物料主数据视图
Session.findById("wnd[0]").maximize
Session.findById("wnd[0]/tbar[0]/okcd").Text = "/nmm03"
Session.findById("wnd[0]").sendVKey 0

' 输入物料号
Session.findById("wnd[0]/usr/ctxtRM_MARA-MATNR").Text = "物料号"
' 点击“Enter”键
Session.findById("wnd[0]").sendVKey 0

' 获取物料描述
materialDescription = Session.findById("wnd[0]/usr/tabsTABSPR1/tabpSP01/ssubSUB1:SAPLMGMM:0100/subSUB1:SAPLMGD1:1100/subSUB1:SAPLMGD1:1101/txtMARA-MATLW").Text

' 创建Excel对象
Set ExcelApp = CreateObject("Excel.Application")
' 创建新的工作簿
Set Workbook = ExcelApp.Workbooks.Add
' 获取第一个工作表
Set Worksheet = Workbook.Worksheets(1)

' 将物料描述写入Excel中
Worksheet.Cells(1, 1).Value = materialDescription

' 保存Excel文件
Workbook.SaveAs "文件路径"

' 关闭Excel文件和SAP会话
Workbook.Close
ExcelApp.Quit
Session.findById("wnd[0]").Close

请注意，您需要根据您的SAP系统和物料数据的位置进行适当的调整。