我们都知道当数据过多的时候,我们制作Excel图表就会显得非常的复杂,图表上面的内容就会特别多。Excel老玩家就会想到用切片器制作动态可变化的图表来显示。今天我们就来学习一下一个比......
2023-01-08
在Word中,可以通过打印设置,修改打印“奇数页”和“偶数页”来设置双面打印,那么在Excel中,如何实现Excel双面打印呢?如果打印机不支持双面打印,那么我们可以通过Excel VBA手动实现Excel双面打印。
首先Excel2007打开代码编辑器,单击“插入”菜单-“模块”,双击插入的模块,在右侧的代码窗口中输入:
Sub DoubleFacePrint()
On Error Resume Next
Dim x, i, j As Variant
x = ExecuteExcel4Macro("Get.Document(50)")
MsgBox "请将纸放入打印机,开始打印奇数页", vbOKOnly
For i = 1 To Int(x / 2) + 1
ActiveWindow.SelectedSheets.PrintOut From:=2 * i – 1, To:=2 * i – 1
Next i
MsgBox "请将纸放入打印机,开始打印偶数页", vbOKOnly
For j = 1 To Int(x / 2) + 1
ActiveWindow.SelectedSheets.PrintOut From:=2 * j, To:=2 * j
Next j
MsgBox "Excel双面打印完毕", vbOKOnly
End Sub
按F5运行键,出现“请将纸放入打印机,开始打印奇数页”提示时将纸张放入打印机,按“确定”按钮开始打印奇数页。出现“请将纸放入打印机,开始打印偶数页”提示时将纸张放入打印机,按“确定”按钮开始打印偶数页。这样就实现了Excel双面打印。
相关文章
我们都知道当数据过多的时候,我们制作Excel图表就会显得非常的复杂,图表上面的内容就会特别多。Excel老玩家就会想到用切片器制作动态可变化的图表来显示。今天我们就来学习一下一个比......
2023-01-08
在工作中,可能许多朋友都会碰到一个情况,那就是工作簿和工作表数据的合并操作。如何将上百个工作簿快速合并到一个表格中,许多朋友可能会觉得不可思议。今天我们就来教大家学习一......
2023-01-08
今天在这里为你分享5个Excel文本函数,这些拆分和组合函数,你一定会用上的。①LEFT函数公式:=LEFT(A2,1)在Excel表格中,需要想要拆分汉字,想从哪里开始就从那哪里开始。首先选定单元格......
2023-01-08
相信大家也和我一样,才开始看到Excel可以当做翻译软件的时候会很好奇,这究竟是怎样做到的?其实,这个方法并不是很难,它是由一个函数公式而制作出来的,好了,首先我们一起来看看成......
2023-01-08
函数可以说是所用快捷方法中最为简单的一种方法,为什么很多人认为函数用起来很难了?主要是因为它拥有很长的函数公式,记不住。其实不管是学Excel函数,还是学习其他的一些快捷方法......
2023-01-08