用VBA实现打印指定区域

xxxxyyyy · 发表于 2017-7-24 16:16

某张表内容较多，需打印其中指定的几行。为避免误操作（未选择打印选定的区域），希望：在某两个单元格输入需要打印的起止行号，然后用VBA实现打印指定的行区域。请问如何编辑VBA？
如表：

xxxxyyyy · 发表于 2017-7-24 17:07

补充：必须要设置顶端标题行

easykxfms · 发表于 2017-7-25 02:39

我也想知道。

cflood · 发表于 2017-7-25 09:36

ActiveSheet.PageSetup.PrintTitleRows = "$1:$1"
ActiveSheet.PageSetup.PrintArea = "$A$" & [e2] & ":$B$" & [h2]

xxxxyyyy · 发表于 2017-7-25 09:58

果然有效！谢谢！

梁笑燕 · 发表于 2024-3-3 00:33

用VBA实现打印指定区域
https://club.excelhome.net/thread-1359073-1-1.html
(出处: ExcelHome技术论坛)

请问就这么行了吗

梁笑燕 · 发表于 2024-3-6 14:14

知道喽原来是关键部分

梁笑燕 · 发表于 2024-3-6 14:59

我想多张sheet表都要这个指定的单元格显示行数不知道怎么实现

梁笑燕 · 发表于 2024-3-7 06:56

cflood 发表于 2017-7-25 09:36
ActiveSheet.PageSetup.PrintTitleRows = "$1:$1"
ActiveSheet.PageSetup.PrintArea = "$A$" & [e2] & ":$ ...

可以应用到多张sheet表吗
每张里有多个年份在想要指定年份区域打印

沈默00 · 发表于 2024-3-7 07:29

录制个宏试试

		自动登录	找回密码
密码			免费注册

[求助] 用VBA实现打印指定区域