打开编辑好的Excel文档,选中想要打印的区域,如图所示(阴影图层部分为所要打印的区域)。
点击页面布局选项卡,选择打印区域选项, 点击设置打印区域子选项,这时候就成功设置了打印区域。
在设置好打印区域后,需要对选中的打印区域的输出效果稍作调整,以符合输出需求。首先按下CTRL+P, 点击预览选项(红色笔标注)。
在弹出的先窗口中点击页面设置, 可以看到(如下图)1-页面,2-页边距,3-页眉/页脚,4-工作表四个选项卡,它们分别依次负责调整页面布局,调整页边距,添加页眉和页脚,以及工山虚郑作表打印输出的一些逗颂高级选项(工作表选项新手很少使用),再熟悉了整个简单的页面设置后读者可以自行尝试对每一个选项誉咐进行亲自操作。
上述调整完成后,点击确定,输出到打印机即可 。
按ALT+F11,进入VBE,选择Staves表凳颂州,复制下面的代码。。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$J$2" Or Target.Address = "$K$2" Then
Dim i
With ThisWorkbook.Sheets("Staves")
For i = 11 To 790
If .Cells(i, 1).Value = "" Then
Exit For
End If
Next
.PageSetup.PrintArea = "$A$1:$K$" & i - 1
End With
End If
End Sub
这样你该枣蔽J2,K2,点打印预览就樱橘可以打印了
你说了这么多,我是看明白了,就是把两个日期中间的打印出来
第一:宴顷先做日期筛选,我喜欢用VBA完成
第二:设置打印区,因为你有格线,所在会打印空页,这个也只能用VBA完成的晌毕陆
最重要的是我现在没时间给你做这个,希望有时间的人帮他解决下。
你可数兆以分开问。先解决第一,再解决第二。这样解决的更快点。
选择A1→页面设置派告→打印区域→设置打印区域
打开公式丛羡槐→名称管理器→选择渗友Print_Area,输入公式:“=OFFSET(sheet1!$A$1,,,COUNTA(sheet1!$A:$A)+8,COUNTA(sheet1!$9:$9))”
公式中COUNTA(sheet1!$A:$A)计算行数+8是你前面空的8行,COUNTA(sheet1!$9:$9)计算列数
看看打印预览
题目太长,不想看