Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 6902|回复: 6

[已解决]怎样根据内容确定打印页数

[复制链接]
发表于 2014-4-8 12:38 | 显示全部楼层 |阅读模式
本帖最后由 liwenhong 于 2014-4-8 17:21 编辑

        求根据内容实现打印页数的代码。
        想要达到的效果:当A46单元格为空时,点击菜单栏上的打印机图标,只打印第一页,否则就打印第一、二页。
       具体见附件: 复合条件时才打印第二页.zip (12.86 KB, 下载次数: 46)
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2014-4-8 12:49 | 显示全部楼层
判断单元格是否为空,打印的页码范围是可以通过printout方法指定的。

评分

参与人数 1 +1 收起 理由
liwenhong + 1 很给力!

查看全部评分

回复

使用道具 举报

发表于 2014-4-8 12:52 | 显示全部楼层
PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName, IgnorePrintAreas)

参数:
From 可选 Variant 打印的开始页号。如果省略此参数,则从起始位置开始打印。
To 可选 Variant 打印的终止页号。如果省略此参数,则打印至最后一页。

评分

参与人数 1 +1 收起 理由
liwenhong + 1 很给力!

查看全部评分

回复

使用道具 举报

发表于 2014-4-8 12:56 | 显示全部楼层    本楼为最佳答案   
  1.     If Len(Range("a46").Value) Then
  2.         ActiveSheet.PrintOut from:=1, to:=2
  3.     Else
  4.         ActiveSheet.PrintOut from:=1, to:=1
  5.     End If
复制代码

评分

参与人数 1 +1 收起 理由
liwenhong + 1 很给力!

查看全部评分

回复

使用道具 举报

发表于 2014-4-8 13:00 | 显示全部楼层
试试这个,因为我没有打印机,所以没有测试:
复合条件时才打印第二页.rar (13.31 KB, 下载次数: 50)

评分

参与人数 1 +1 收起 理由
liwenhong + 1 赞一个!

查看全部评分

回复

使用道具 举报

 楼主| 发表于 2014-4-8 14:59 | 显示全部楼层
810126769 发表于 2014-4-8 13:00
试试这个,因为我没有打印机,所以没有测试:

使用安装有打印机测试情况汇报:(1)文件→打印    不起作用。(2)点击打印机图标,也不起作用。即使这样也很感谢您!
回复

使用道具 举报

 楼主| 发表于 2014-4-8 15:02 | 显示全部楼层
本帖最后由 liwenhong 于 2014-4-8 15:05 编辑
hwc2ycy 发表于 2014-4-8 12:56

我设置了一个打印按钮,使用您的代码,实现了盼望的结果,谢谢您了版主!
回复

使用道具 举报

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

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 01:55 , Processed in 0.382908 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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