【求助】excel 如何打印多页的同一区域?

zsdicky

打开excel表,打印预览后显示50页将要打印,但
我只想打印每一页的头五行,要怎样做才行?

湖南 - 金牌会员

期待高手

zsdicky

谁是高手呀?

gz669

直接提取你要打印的数据行可以不
建一个标记用的索引列,然后筛选,打印

zsdicky

QUOTE:

Posted by gz669 on 2009-9-29 17:11
直接提取你要打印的数据行可以不
建一个标记用的索引列,然后筛选,打印

目的是想简化操作,因为数据太多

nojob

Sub test()
For Each iSheet In Sheets
    iSheet.PageSetup.PrintArea = "$14"
Next
End Sub

运行一下这个宏就可以了

nojob

Sub test()
For Each iSheet In Sheets
    iSheet.PageSetup.PrintArea = "$1: $5"
Next
End Sub

看错了,是到第五行

湖南 - 金牌会员

高手来了http://www.ibmnb.com/viewthread ... ;page=1#pid12862297

zsdicky

试了,出问题:不能设置类pagesetup的printarea 属性

shh_czh9

1、先将要打印的表选成“工作组”；
2、然后在某一张表中选取要打印的范围（其实工作组中的同一范围都选取了）；
3、文件→打印…→选定区域→打印预览；
4、看是否符合要求

zsdicky

QUOTE:

Posted by shh_czh9 on 2009-9-30 11:05
1、先将要打印的表选成“工作组”；
2、然后在某一张表中选取要打印的范围（其实工作组中的同一范围都选取了）；
3、文件→打印…→选定区域→打印预览；
4、看是否符合要求

是同一表的,打印时成了很多页,但只要印每一页的头五行
数据不是相同的

nojob

"$1: $5"中间:后的空格删掉再试试.
你的Excel是什么版本的? 在Visual basic里运行,这个是宏,不是函数..

凌晨12点

路过学习一下

zsdicky

QUOTE:

Posted by nojob on 2009-9-30 14:58
"$1: $5"中间:后的空格删掉再试试.
你的Excel是什么版本的? 在Visual basic里运行,这个是宏,不是函数..

试了,删空格后没出错,但只能显示第一页

nojob

For循环有没运行?? 我这Excel2003试了一下,没问题的

红色五月

excel 如何打印多页的同一区域?
恩，这是偶的记号。。。

zsdicky

QUOTE:

Posted by nojob on 2009-9-30 16:27
For循环有没运行?? 我这Excel2003试了一下,没问题的

还是不行,我的也是Excel2003 ,兄弟你那代码放到哪里的?
我试过将那代码放新增模块、Thisworkbook、Sheet1了，都不行

zsdicky

有没有人帮帮我?

信仰

生打印页的前五行，好像还真有点难。。

cansum

把要打印的部份设置为"打印区域"