Excel VBA:在特定目录上创建新工作簿
我想使用Active工作簿中的按钮在特定目录上创建新工作簿 目录将位于驱动器D:\SALES\u RFQ数据库 工作簿名称为“M.O控制编号数据库” 条件: 代码必须检查工作簿是否存在,如果不存在,则必须在给定目录上创建工作簿 非常感谢您的帮助。Excel VBA:在特定目录上创建新工作簿,excel,vba,Excel,Vba,我想使用Active工作簿中的按钮在特定目录上创建新工作簿 目录将位于驱动器D:\SALES\u RFQ数据库 工作簿名称为“M.O控制编号数据库” 条件: 代码必须检查工作簿是否存在,如果不存在,则必须在给定目录上创建工作簿 非常感谢您的帮助。 提前谢谢到目前为止你都试了些什么?你找到在线指南了吗?你研究了什么,如果有,你对代码的哪一部分感到困惑/你需要帮助吗?非常感谢@Error的帮助,效果很好。 Option Explicit Sub test() Dim Path As St
提前谢谢到目前为止你都试了些什么?你找到在线指南了吗?你研究了什么,如果有,你对代码的哪一部分感到困惑/你需要帮助吗?非常感谢@Error的帮助,效果很好。
Option Explicit
Sub test()
Dim Path As String, DocName As String
Path = "D:\SALES_RFQ Database"
DocName = "M.O Control Number Database"
If Dir(Path & "\" & DocName & ".xlsx") = "" Then
Workbooks.Add
ActiveWorkbook.SaveAs Path & "\" & DocName & ".xlsx"
End If
End Sub