VBA：在特定目录上创建新工作簿

Question

I would like to create a new workbook on a specific directory using a button from an activeworkbook.

Directory will be Drive D:\\SALES_RFQ Database

WorkBook name is "MO Control Number Database"

Condition: The code has to check if the workbook does exists, if not, if has to create the workbook on the given directory.

Any help with much appreciated. Thanks in advance

Answer 1

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