如何用Google Script将指定表格列导出至Word文档？

方法一：VBA宏自动导出（适合重复操作） #

• 打开workstuff.xlsx文件，按下Alt + F11打开VBA编辑器
• 插入新模块：右键左侧工程窗口里的工作簿名称 → 插入 → 模块
• 将以下代码粘贴到模块中：

Sub ExportToWord()
    Dim ws As Worksheet
    Dim wdApp As Object
    Dim wdDoc As Object
    Dim rng As Range
    
    ' 指定目标工作表和导出范围
    Set ws = ThisWorkbook.Worksheets("workstuff")
    Set rng = Union(ws.Range("A4:A200"), ws.Range("C4:C200"), ws.Range("D4:D200"))
    
    ' 初始化Word应用
    Set wdApp = CreateObject("Word.Application")
    wdApp.Visible = True
    Set wdDoc = wdApp.Documents.Add
    
    ' 复制粘贴表格
    rng.Copy
    wdDoc.Range.PasteExcelTable LinkedToExcel:=False, WordFormatting:=False, RTF:=False
    
    ' 保存文档（修改路径为你的目标路径）
    wdDoc.SaveAs2 Filename:="C:\导出结果.docx", FileFormat:=16
    
    ' 清理对象
    Set wdDoc = Nothing
    Set wdApp = Nothing
    Set rng = Nothing
    Set ws = Nothing
    
    MsgBox "导出完成！"
End Sub

• 按下F5运行宏，或回到Excel通过「开发工具」→「宏」按钮执行
• 注意：确保已安装Word，代码中的保存路径可按需修改

方法二：手动复制粘贴（适合单次操作） #

• 打开workstuff.xlsx，选中A列4-200行，按住Ctrl键依次选中C列、D列的4-200行
• 按下Ctrl + C复制选中内容
• 打开Word新建空白文档，右键选择「粘贴选项」里的「保留源格式」或「仅保留文本」
• 保存Word文档即可

内容的提问来源于stack exchange，提问作者Edmund