ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 1815|回复: 11

[求助] 如何设置只打印方框区域内的内容?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2020-1-15 18:21 | 显示全部楼层 |阅读模式
只输出方框里面包含的东西(因为表中有很多插图,单元格不能随意调整),类似于Auto cad中的窗口打印,这个EXCEL是否能实现呢? AAA.JPG

TA的精华主题

TA的得分主题

发表于 2020-1-15 18:38 | 显示全部楼层
设置打印区域不会吗?

TA的精华主题

TA的得分主题

发表于 2020-1-15 19:36 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
yes363001640 发表于 2020-1-15 18:38
设置打印区域不会吗?

不是楼主意图吧
打印区域指的是工作表单元格区域,而楼主要的是“方框”边线范围内的区域
有点意思,期待高手

TA的精华主题

TA的得分主题

发表于 2020-1-15 19:43 | 显示全部楼层
如果是方框范围内“完整”的单元格区域,则通过方框的.Top、.Left、.Height、.Width 来推算即可
如果是以方框边线“截图”式的区域,则有难度了

TA的精华主题

TA的得分主题

 楼主| 发表于 2020-1-15 22:15 | 显示全部楼层
aman1516 发表于 2020-1-15 19:36
不是楼主意图吧
打印区域指的是工作表单元格区域,而楼主要的是“方框”边线范围内的区域
有点意思,期 ...

是的,EXCEL传统我们都是以单元格作为打印区域。现在我们以方框内的内容作为打印或PDF输出的区域。 这个在Auto  CAD中很方便(指定打印的两个对角的XY坐标即可,为什么EXCEL就没有提供相关的方法呢?)哪位高人有好的解决方案呢?

TA的精华主题

TA的得分主题

 楼主| 发表于 2020-1-15 22:23 | 显示全部楼层
aman1516 发表于 2020-1-15 19:43
如果是方框范围内“完整”的单元格区域,则通过方框的.Top、.Left、.Height、.Width 来推算即可
如果是以 ...

如果是单元格的话就好了。 目前用EXCEL做了个大型的流程图和或者SmartArt,有时需要打印其中一部分分支,可是EXCEL 却没有提供我们解决方案。

TA的精华主题

TA的得分主题

 楼主| 发表于 2020-1-15 22:33 | 显示全部楼层
不知道我的意思大家是否能了解。再次截图说明问题。

红框为边界

红框为边界

打印输出时只输出红框内容

打印输出时只输出红框内容

TA的精华主题

TA的得分主题

发表于 2020-1-15 22:33 | 显示全部楼层
ABC5258 发表于 2020-1-15 22:23
如果是单元格的话就好了。 目前用EXCEL做了个大型的流程图和或者SmartArt,有时需要打印其中一部分分支, ...

实现屏幕截图功能
http://club.excelhome.net/thread-969561-1-1.html

正如版主说的,用VB.net写的
可借鉴,通过屏幕坐标来实现


TA的精华主题

TA的得分主题

发表于 2020-1-15 22:46 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
例如:
  1. [code]
  2. Sub test()
  3. Dim Px, Py
  4. With ActiveSheet.Shapes("Rectangle 1")      '指定方框
  5.   Px = "Left: " & ActiveWindow.PointsToScreenPixelsX(.Left)
  6.   Py = "Top : " & ActiveWindow.PointsToScreenPixelsY(.Top)
  7. End With
  8. MsgBox "方框的屏幕坐标为:(" & Px & "," & Py & ")"
  9. End Sub
复制代码
[/code]

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2020-1-15 22:58 | 显示全部楼层
ABC5258 发表于 2020-1-15 22:33
不知道我的意思大家是否能了解。再次截图说明问题。

改下应能满足楼主要求:
EXCEL 做的批量截图...具体用途自己猜...
http://club.excelhome.net/thread-1324069-1-1.html


您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-25 09:36 , Processed in 0.038164 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表