我正在做一些 .vbs 编码,我想在其中打开一个现有的模板文件,对其进行一些更改,然后使用单元格 B2 中指定的文件名“另存为”。
Set objExcel = CreateObject("Excel.Application")
FileDirectory = "C:\Users\j128\Desktop\"
FileName = "TEMPLATE.xlsx"
Set objWorkbook = objExcel.Workbooks.Open(FileDirectory+FileName)
objExcel.Visible = True
objExcel.Cells(2,2).value = "Variable" 'Changes will occur in this section
ActiveWorkbook.SaveAs Filename = cells(2,2).value 'This is where problems occur
我意识到我已经可以使用宏来命名具有单元格中指定值的 Excel 文件。但是,我计划使用此 .vbs 文件来使用电子表格中指定的值来命名其他文档类型。
谢谢你的帮助!
显然这可能是不可能的:如何使用 VBScript 中的常见“另存为”对话框?
我也尝试过使用 sendkeys 来选择“另存为”,尽管在命名新文件时它会分崩离析。