时间戳

首页 > 解决方案 > 在 Word 文档中从 Excel VBA 插入换行符

excel - 在 Word 文档中从 Excel VBA 插入换行符

问题描述

从我的 Excel 表中，我打开了一个 Word 文档。Excel 在文档中生成一些文本。在文本之间我想要一个 LineBreak。代码导致错误消息指出：参数值超出可接受范围

使用以下 文档应该可以使用 InsertBreak。

Sub InsertLineBreak()
    Set wrd = CreateObject("Word.Application") 'Open Word
    Set objDoc = wrd.Documents.Add 'Add new document
    Set objSelection = wrd.Selection 'Select this document

    objSelection.InsertBreak Type:=wdLineBreak 'Insert Break
End Sub

标签： excelvbams-word

解决方案

它对我来说非常好，你确定你添加了正确的参考吗？

尝试objSelection.InsertBreak Type:=6或添加Microsoft Word 16.0 Object Library引用，或声明一个全局变量wdLineBreak

推荐阅读