如何在Mac上使用Excel保存Word文档？开发者社区

link之家

链接快照平台

输入网页链接，自动生成快照
标签化管理网页链接

相关文章推荐

烦恼的四季豆 · [更新]Excel催化剂插件常见问题汇总开发者社区· 2 月前 ·

直爽的牛肉面 · python/openpyxl/DataVa ...· 2 月前 ·

长情的火锅 · python读取excel,获得下拉选中所有 ...· 2 月前 ·

不拘小节的电影票 · #全球首艘智能型无人系统母船开工#清华唐.. ...· 1 年前 ·

道上混的草稿纸 · OpenAPI如何计费_大数据开发治理平台 ...· 2 年前 ·

神勇威武的灌汤包 · 如何用Pandas重命名一个重置索引上的多个列· 2 年前 ·

咆哮的爆米花 · flutter应用开发中集成极光推送（flu ...· 2 年前 ·

Set wdApp = New Word.Application

Option Explicit
Sub CreateBasicWordReportEarlyBinding()
    Dim wdApp As Word.Application
    Set wdApp = New Word.Application
    With wdApp
        .Visible = True
        .Activate
        .Documents.Add
        With .Selection
            .ParagraphFormat.Alignment = wdAlignParagraphCenter
            .BoldRun
            .Font.Size = 18
            .TypeText "Best Movies Ever"
            .BoldRun
            .Font.Size = 12
            .TypeText vbNewLine
            .ParagraphFormat.Alignment = wdAlignParagraphLeft
            .TypeParagraph
        End With
        Range("A2", Range("A2").End(xlDown).End(xlToRight)).Copy
        .Selection.Paste
        .ActiveDocument.SaveAs2 Environ("UserProfile") & "\Desktop\MovieReport.docx"
        .ActiveDocument.Close
        .Quit
    End With
   Set wdApp = Nothing
End Sub

ActiveDocument.SaveAs2 FileName:= _

推荐文章

烦恼的四季豆 · [更新]Excel催化剂插件常见问题汇总开发者社区

2 月前

直爽的牛肉面 · python/openpyxl/DataValidation给 excel添加下拉列表_excel data validation list

2 月前

长情的火锅 · python读取excel,获得下拉选中所有选项_python获取下拉菜单内容 excel

2 月前

不拘小节的电影票 · #全球首艘智能型无人系统母船开工#清华唐... 来自清华大学 - 微博

1 年前

道上混的草稿纸 · OpenAPI如何计费_大数据开发治理平台 DataWorks-阿里云帮助中心

2 年前

神勇威武的灌汤包 · 如何用Pandas重命名一个重置索引上的多个列

2 年前

咆哮的爆米花 · flutter应用开发中集成极光推送（flutter极光推送第一篇）_51CTO博客_极光推送 flutter

2 年前

问 如何在Mac上使用Excel保存Word文档？

Stack Overflow用户