[Excel] ¿·¤·¤¤Book¤ÎºîÀ®¤ÈÊݸ

    Dim NewBook As Workbook
    Set NewBook = Workbooks.Add
    With NewBook
        .SaveAs Filename:=ThisWorkbook.Path + "\"+ "hoge.xls"
    End With