2023-04-04 vba新建一个带有模版的excel工作簿

Sub 新建有模版的工作薄()

    Dim path As String

    Dim wb As Workbook

    Dim path1 As String

    path1 = "D:\思斯学习\vba学习"

    '每周家务安排表1.xltm 是一个能够运行宏的模版文件

    path = "C:\Users\pc\Documents\自定义 Office 模板\每周家务安排表1.xltm"

    '在指定目录下新建一个有模版的工作簿

    Set wb = Workbooks.Add(path)

    wb.SaveAs path1 & "\ceshi.xlsm", FileFormat:=52

    wb.Close

End Sub

最后编辑于 ：
©著作权归作者所有,转载或内容合作请联系作者
平台声明：文章内容（如有图片或视频亦包括在内）由作者上传并发布，文章内容仅代表作者本人观点，简书系信息发布平台，仅提供信息存储服务。

推荐阅读更多精彩内容