☰

在 Excel 工作表中插入/显示双页 Word 对象

tag-icon • tag-icon microsoft-excel microsoft-word microsoft-excel-2010 microsoft-word-2010 embedded
在 Excel 工作表中插入/显示双页 Word 对象

我尝试将一份两页Word文档插入到Excel 2010工作表中。我并没有尝试链接到原始文档。

到目前为止，我已经能够插入对象，但它只显示第一页。要查看第二页，我必须双击该对象，然后进入编辑模式。无论我是在编辑模式还是在普通视图中，都无法调整对象的大小。

我查找了有关此问题的文档并发现此主题，但实际上并没有解决方案。我不想要做的是将我的文档分成两个单独的文件，尽管这看起来更像是我目前唯一的选择。

有人知道如何显示两个都Word工作表中的文档页面Excel无需拆分为两个单独的文件？有人知道这是否可行吗？

答案1

意识到这是一篇较旧的帖子，但是为了帮助其他人，我还是添加了我的修复。借助 Hugo，您可以在 Word 中创建自定义页面大小。转到布局 > 打开大小菜单（页面设置窗口）> 单击“更多纸张大小...”从那里，您可以更改纸张大小，直到它适合您的 x 页页面。从 Letter 大小（8.5 宽度）开始，然后调整长度，直到它将我的所有文本都包含在一页上，效果很好。效果非常好！希望这能有所帮助！

答案2

有一个技巧几乎有效。您可以在 excel 中创建一个文本框，然后选择 word 文档中的所有文本 (Ctrl-A)，将其复制并粘贴到 Excel 文本框中。

图形和尺寸格式通常无法跨越界限，但粗体、链接等通常可以。

就像我说的，这不是一个完美的解决方案，但如果你的 Word 文档中的文本多于格式，你应该接近完美。这是我设法将多个 Word 页面导入 Excel 的唯一方法

答案3

好的，这是我决定的解决方案。

我将 Word 文档嵌入到工作表中。由于用户可以在编辑模式下向下滚动文档，因此我使用 VBA 自动将对象置于编辑模式：

'This code is called from a button on a different sheet. It could also be put in _
'a Worksheet_SheetActivate instead or called from a button on the same sheet. 
Dim ws As Worksheet
Application.ScreenUpdating = False

Set ws = ThisWorkbook.Sheets("Sheet1")
With ws
    .Activate
    .Shapes.Range(Array("Object 7")).Select
    Selection.Verb Verb:=xlPrimary
End With
Application.ScreenUpdating = True

这样，用户就不必双击对象即可进入编辑模式......这不是理想的解决方案，但对我的目的来说这是一个不错的解决方法。

答案4

我修复了我的问题，方法是在对象尚未打开时拖动底部中间的调整对象大小点，使对象的大小与 excel 中第一个 word 文档页面的大小相同。希望这对某些人有帮助。

相关内容