注册 登录
编程论坛 VFP论坛

请问excel要选定打印页的第2页,如何选定

liunis 发布于 2022-05-09 23:49, 1307 次点击
OLEAPP.ACTIVESHEET.range('a1').VALUE=OLEAPP.ActiveSheet.pagesetup.pages.count
OLEAPP.ActiveSheet.PageSetup.PrintGridlines=.T.


Ole app.activesheet.pagesetup(2).select 这个不对
9 回复
#2
sdta2022-05-10 06:54
这是录制的宏,楼主试下
ActiveWindow.SelectedSheets.PrintOut From:=2, To:=2, Copies:=1
#3
liunis2022-05-10 08:33
谢谢。小白一个,怎样执行这个语句才能得到答案
#4
sdta2022-05-10 13:13
试试这个
OLEAPP.ActiveWindow.SelectedSheets.PrintOut(2, 2, 1)
#5
liunis2022-05-10 14:45
回复 4楼 sdta
这个不行,这个是打印第2页,会传到打印机。我目的是要这份文档 一共 5页,把第2页 按打印分印的格式 选出来保存,并不需要打印
#6
cjc10102022-05-10 15:28
oExcel.ActiveSheet.PrintOut(2,2,1)  &&& (从第2页起,到第2页止,共1份)
#7
liunis2022-05-10 15:46
只要选定不要打印
#8
zhken2022-05-12 17:53
f=oleapp.activesheet.hpagebreaks(1).location.address
如果你每页固定高度,这个可以取得首页区域
#9
cjc10102022-05-13 16:21
这是我能找到的文档,你自己试吧。只能帮你到这了。
◆打印当前工作表:oExcel.ActiveSheet.PrintOut() &&共八个参数
*参数1-数值:起始页号,省略则默认为开始位置
*参数2-数值:终止页号,省略则默认为最后一页
*参数3-数值:打印份数,省略则默认为1份
*参数4-逻辑值:是否预览,省略则默认为直接打印(.F.)
*参数5-字符值:设置活动打印机名称,省略则为默认打印机
*参数6-逻辑值:是否输出到文件,省略则默认为否(.F.),若选.T.且参数8为空,则Excel提示输入要输出的文件名
*参数7-逻辑值:输出类型,省略则默认为(.T.)逐份打印,否则逐页打印
*参数8-字符值:当参数6为.T.时,设置要打印到的文件名
#10
my23182022-05-13 18:31
回复 9楼 cjc1010
很有帮助,谢谢,收藏了
1