复制粘贴到word文档中的表格超出页面该怎么办

  1.  
  2. 首先,我们打开一个表格超出页面的word文档,如图所示;

    复制粘贴到word文档中的表格超出页面该怎么办

  3. 然后我们点击表格左上角的那个按钮,如图所示,这样我们就选中了整个表格;

    复制粘贴到word文档中的表格超出页面该怎么办

  4. 然后我们右击,弹出的界面,我们将鼠标放在自动调整的地方;

    复制粘贴到word文档中的表格超出页面该怎么办

  5. 弹出的界面,共计有三个选项,其中最后一个选项设置起来相对来说不是太方便,我们点击第一个选项,根据内容调整表格;

    复制粘贴到word文档中的表格超出页面该怎么办

  6. 结果如图所示,这样我们就根据了表格内容来调整了表格了;

    复制粘贴到word文档中的表格超出页面该怎么办

  7. 其次,我们也可以选择根据窗口来调整表格,这个选项更加的实用一些,可以很快的让表格更加适合整个文档;

    复制粘贴到word文档中的表格超出页面该怎么办

  8. 最终结果如图所示,这样我们就将表格根据窗口进行了调整好了。

    复制粘贴到word文档中的表格超出页面该怎么办

  • 1
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
您好!这个问题需要进行两个步骤: 第一步,将从Word文档复制表格粘贴到Excel表格,并建立链接。 可以按照以下步骤操作: 1.在Excel打开要粘贴表格的工作表。 2.在Word打开要复制表格。 3.在Word选择表格复制表格。 4.在Excel选择要粘贴表格的单元格,右键单击,选择“粘贴选项”。 5.在“粘贴选项”选择“链接和使用目标格式”。 6.单击“确定”。 第二步,使用VBA代码来实现从Word文档复制粘贴到Excel表格的链接。 可以使用以下VBA代码实现: Sub CopyTableFromWord() Dim objWord As Object Dim objDoc As Object Dim objTable As Object Dim objRange As Object Dim strFileName As String '设置Word文档路径 strFileName = "D:\test.docx" '打开Word文档 Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open(strFileName) '复制表格 Set objTable = objDoc.Tables(1) objTable.Range.Copy '关闭Word文档 objDoc.Close False Set objDoc = Nothing objWord.Quit Set objWord = Nothing '粘贴表格到Excel ActiveSheet.Paste Destination:=ActiveSheet.Range("A1") '建立链接 Set objRange = ActiveSheet.Range("A1").CurrentRegion objRange.LinkSources xlLinkTypeExcelLinks, strFileName, objTable.Range.Address End Sub 这段代码首先打开指定的Word文档复制第一个表格,然后在Excel粘贴表格,并在粘贴的表格上建立链接。请将代码的文件路径和表格位置替换为您自己的路径和位置。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值