Excel宏设定双面打印

合集下载

自定义Excel表格的打印使用方法

自定义Excel表格的打印使用方法自定义Excel表格的打印使用方法自定义Excel表格的打印纸张默认状态下打印 Excel 文档，纸张类型为 A4 纸。

若没有 A4 型纸张，可重新设置表格的打印纸张，具体操作如下。

（1）打开需要打印的文档，单击“文件→页面设置”命令，打开“页面设置”对话框。

（2）选择“页面”选项卡，在“纸张大小”框下拉菜单中选择合适的纸张。

（3）单击“选项”按钮，从打开的对话框中还可自定义手功设置页面的宽度与高度。

用Excel表格实现机打支票对于财务人员来说填写支票是一项重要的日常工作。

使用电脑进行支票套印既可减少工作量，又能有效地避免填写失误，显然是个不错的选择。

下面就以Excel2003为例介绍一下套印支票的具体操作。

一、精确设置套印位置为了获得支票图样，你需要一台扫描仪或数码相机。

把支票放入扫描仪，扫描分辨率设定为100dpi、缩放比100。

在预览图形上调整扫描区域框使它尽量靠近支票边，或者在扫描后再用图形处理软件进行修剪。

最后把扫描的图像处理后保存为ZP.bmp。

编注：如果用数码相机拍照，可以将照片在Photoshop软件中放大尺寸，使它和实际的支票尺寸相同。

1．设置定位背景启动Excel，单击菜单栏的“格式/工作表/背景…”打开工作表背景对话框，把刚才保存的ZP.bmp设定为背景。

单击工具栏上显示比例的下拉列表框，把显示比例设定为106%。

注：106%的比例是这样得来的。

在把扫描的支票图设置为电子表格背景后，设置显示比例为100%，用绘图工具栏中的“矩形”工具画一个与背景支票等高的矩形，打印出来。

量得打印出的矩形高为8.5厘米，直接量取支票的高度为8厘米，8.5÷8=106%就是所需的`比例。

2．设置界面及数据定位通过拖动行、列标题的边界调整行高列宽，再配合使用格式工具栏中的“合并及居中”按钮，让支票中要每个要填写的位置均正好与一个单元格重合。

对于日期的年月日、小写金额的个十百千的格子都只要合并在一个单元格就够了。

Excel2022添加一个“双面打印按钮

Excel2022添加一个“双面打印按钮E某CEL函数小技巧大家知道，在Word中可以将“奇数页”和“偶数页”分开打印，从而实现多页文档的“双面打印”效果。

但是，在E某cel中却没有这一功能。

下面，我们就以E某cel2007为例，为其添加一个具有“双面打印”功能的按钮。

一、展开“开发工具”选项卡要在E某cel中实现“双面打印”，就要用到其内嵌的VBA功能，因此，需要先展开“开发工具”选项卡。

启动E某cel2007，单击左上角的软件图标，在随后出现的下拉菜单中(如图1)，选择“E某cel选项”选项，打开“E某cel选项”对话框(如图2)。

E某CEL函数小技巧先在左侧选中“个性化设置”选项，然后在右侧“使用E某cel时采用的首选项”下面选中“在功能区显示‘开发工具’选项卡”，确定返回。

二、生成“个人宏工作簿”为了让“双面打印”按钮对所有工作簿都有效，我们需要将其保存在“个人宏工作簿”中。

第一次使用“宏”这个功能时，需要先让软件生成一个隐藏的“个人宏工作簿”。

切换到“开发工具”选项卡中，单击其中的“录制宏”按钮，打开“录制新宏”对话框(如图3)。

输入一下宏名称(如“mdy”)，按“保存在”右侧的下拉按钮，在随后出现的下拉列表中，选择“个人宏工作簿”选项，确定进入“宏”录制状态。

E某CEL函数小技巧不需要进行任何操作，直接单击“开发工具”选项卡中的“停止录制”按钮，系统会自动生成一个隐藏的“个人宏工作簿”。

特别提醒:以后需要在“个人宏工作簿”中编辑宏时，就不需要再进入此步操作了。

三、编辑“双面打印”代码单击“开发工具”选项卡上的“ViualBaic”按钮，进入VBA编辑状态(如图4)。

特别提醒:按“Alt+F11”组合键，即可快速进入VBA编辑状态。

在左侧“工程资源管理器”中，展开“VBAProject(PERSONAL.某LSB)”选项(这就是“个人宏工作簿”)，双击其中的“模块1”，然后用下述代码替换右侧编辑区中的原有代码:Submdy()OnErrorReumeNe某t某=E某ecuteE某cel4Macro("get.document(50)")Fori=1ToInt(某/2)+1E某ecuteE某cel4Macro"PRINT(2,"&2某i-1&","&2某i-1&",1,,,,,,,,2,,,TRUE,,FALSE)"Ne某tiMgBo某"请将打印纸反向装入打印机中",vbOKOnly,"打印另一面"Forj=1ToInt(某/2)+1E某ecuteE某cel4Macro"PRINT(2,"&2某j&","&2某j&",1,,,,,,,,2,,,TRUE,,FALSE)"Ne某tjEndSub输入完成后，关闭VBA编辑窗口返回到E某cel编辑状态。

Excel中双面打印的方法

Excel中双面打印的方法Excel中双面打印的方法可以通过修改注册表的方法来解决这个问题：1、打开注册表编辑器方法：开始 -> 运行 -> 输入regedit -> 确定2、找到注册表子项HKEY_CURRENT_USERSoftwareMicrosoftOffice12.0ExcelSec urity3、在右侧空白处点击鼠标右键，选择“新建-> DWORD值(D)”，输入“ExtensionHardening”点击确定。

4、用鼠标右键点击ExtensionHardening，然后单击“修改（M）”，在数值数据中填写“0”即可确定。

5、关闭注册表编辑器，再次打开xls文件看看是不是提示是不是不见了？备注小知识：ExtensionHardening设置的值的数据设置：* 0：不检查文件扩展名和文件类型并绕过该函数的警告消息。

* 1：检查文件扩展名和文件类型。

如果它们不匹配会显示警告消息。

* 2：检查文件扩展名和文件类型。

如果它们不匹配不要打开该文件。

Excel中双面打印的方法技巧1.首先从网上下载安装一个小插件ExcelPrinter；2.打开Exce切换到“加载项”选项，你会发现比原来多出了“手动双面打印”和“打印当前页”这两项工具按钮；3.单击“手动双面打印”，再单击打印按钮进行打印。

Excel会先把1、3、5……等单页的内容发送到打印机打印，打印完单页后会弹出一个对话框提醒换一面打印，按对话框中提示，将出纸器中已打印好一面的纸掏出并将它们放回到送纸器中，然后按下“确定”，则可打印出双页内容。

方法一、Excel分别对AB列两列数据对比，比如A2=B2，就返回相同，否则返回不相同。

C2公式为：=IF(A2=B2,"相同","不同")，这样就可以实现excel两列对比。

不过细心的朋友会发现，A5和B5实质上有大小写区分的，因此使用这个公式不是完全准确。

每页打印两版正反双面打印的技巧

每页打印两版正反双面打印的设置技巧设置纸张A4，横向
二、修改以下设置：
1、每张纸上放置多页。

2、每页版数：自定义2× 1。

3、打印顺序：横向。

4、页边距可修改为0。

5、打印范围：第一次打印正面设置为1,2,5,6,9,10,⋯，取消逆序打印；第二次打印反面设置为3,4,7,8,11,12,⋯，并设置逆序打印。

如下图
三、细节1：看一下总页数，如是奇数页，打印反面的时候要记得把最后一页拿出来。

另外正面和反面的顺序不要弄反了，方法是可先打印几张，比如两张纸，正面打印好后，注意顺序，再打印反面，注意放纸的顺序。

细节2：打印设置，第一次设置为1,2,5,6,9,10,⋯，第二次设置为
3,4,7,8,11,12,⋯，如果有几百页，手动输入太麻烦了，解决这个问题我是这么做的。

第一步：打开excel, 先填
充前两行然后向下填充到总页数为止
第二步：然后隔一行插入一行，再把第2、4 列向下移一行。

第三步：再填充E列“ =A1 & B1” F列“ =C1 &D1”.
第四步：把E、F列复制粘贴数值，再转置。

第五步：把第一行粘贴到记事本中，用查找替换删除中间的空格，得到
1,2,5,6,9,10,⋯，就可以复制到打印的对话框中进行打印了。

以上方法在PDF、word中都可以用，大家不妨一试。

利用宏实现奇数偶数及正反打印

' TotalPages就是总页数' Step是计算步长，这里i每次加2For i=1 To TotalPages Step 2' 打印 i 页Next i这里很明显将打印1、3、5、7、9这样的奇数页，如果是2、4、6、8、10这样的偶数页该怎么办呢，可以看出步长依旧是2，只是起始从2开始了，那么i初始应该设置为2。

通过PrintOut方法就能进行打印了，这里我们默认打印选中的Sheet，所以使用ActiveWindow.SelectedSheets：' TotalPages就是总页数' Step是计算步长，这里i每次加2' 打印奇数页For i = 1 To TotalPages Step 2ActiveWindow.SelectedSheets.PrintOut From:=i, To:=iNext i为了通用，我们将上面的方法封装成一个Sub过程：' StartPage 要打印的起始页' TotalPages 要打印的总页数' SkipPages 每次打印跳过的页数Sub PrintSheet(ByVal StartPage As Integer, _ByVal TotalPages As Integer, _ByVal SkipPages As Integer)For i = StartPage To TotalPages Step SkipPages+1ActiveWindow.SelectedSheets.PrintOut From:=i, To:=iNext iEnd Sub这里步长为了便于理解被我改为SkipPages，跳过的页数，比如步长2，也就是说每次跳过1 页。

好，到这里基本上是万事俱备只欠东风了，这个东风也就是如何获取打印的总页数，其实我们可以通过Excel内置宏GET.DOCUMENT获取，其中参数是50，表明“当前设置下欲打印的总页数，其中包括注释，如果文件为图表，值为1”。

Excel打印设置技巧大全

Excel打印设置技巧大全没有打印机一样可以打印预览在没有安装打印机的电脑上按下Excel的“打印预览”按钮后，Excel会却提示没有安装打印机，且无法打印预览。

其实，只要单击“开始”→“设置”→“打印机”，然后双击“添加打印机”项目，再随便安装一个打印机的驱动程序。

重启Excel，就会发现已经可以打印预览了。

打印指定页面一个由多页组成的工作表，打印出来后，发现其中某一页（或某几页）有问题，修改后，没有必要全部都打印一遍！只要选择“文件”→“打印”（不能直接按“常用”工具栏上的“打印”按钮，否则是将整个工作表全部打印出来），打开“打印内容”对话框，选中“打印范围”下面的“页”选项，并在后面的方框中输入需要打印的页面页码，再按下“确定”按钮即可。

首行重复打印当工作表大于1页时，用户一般希望在打印时能在每一页中均能包含首行，你可以这样设置，打开“页面设置”对话框，单击“工作表”选项卡，接下来只需在“打印标题→顶端标题行”文本框中输入：：类似的字符，或用鼠标将工作表中的首行拖过来也可以，以后就该表格首行就会打印在每页了。

表格也缩印有时为工作需要，可能要求将多页内容调整为一页打印出来（在Word中可以通过“缩放”技巧来实现），可选择“文件”→“页面设置”，再在打开的“页面设置”对话框中单击“页面”标签，在“缩放”组下有一个“调整为”选项，只要在这里键入打印工作表内容时所需要的页数（注意页宽和页高两个值必须一致）就可以了。

不过，此功能对于与纸张高、宽比例严重不协调的工作表来说，建议不要采用，否则会严重影响打印效果。

打印选定区域选定需要打印的区域，执行“文件”→“打印”，打开“打印内容”对话框，选中“打印内容”下面的“选定区域”选项，按下“确定”按钮就行了。

如果经常要打印固定的某个区域，可以先选定相应区域，再执行“文件”→“打印区域”→“设置打印区域”。

经过这样的设置后，无论是执行菜单的打印命令，还是直接按“常用”工具栏上的“打印”按钮，均可将设置的区域打印出来。

在Excel中用宏命令制作打印表单

在Excel中用宏命令制作打印表单在Excel中用宏命令制作打印表单2010-07-09 10：18这是一张通过Office办公软件Excel电子表格宏制作的单据打印表，其特点是：①操作简单只用鼠标就可完成打印全过程；②"商品单价"表可由厂家提供(或预先做好)，对已做过选择的内容可进行标记；③"销售单"表可进行快速添加、清除和修改；④单据可选择性的保存。

本表想不到还很实用，只要在"商品单价"表中双击就可以把数据填入到"销售表"中，如果把它做一些小的改动就可用在其它的单据打印上。

现在把制作步骤写下来，让朋友对它做进一步的改进。

1、第一步：首先新建一个Excel电子表文件，在新建的文件中建立二张名字为"商品单价"和"销售单"的表。

在"商品单价"表中是用来存放厂家提供的商品单价数据，只要将厂家的商品单价输入好即可，厂家的商品未调价就不需做修改(如图1)。

2、第二步：在"销售单"表中按图2输入有关数据，部分单元格公式输入如下。

在C1至C3单元格中分别输入=IF(K15="","",K15)，=IF(L1="","",L1)&IF(K1="","",K1)，IF(K2="","",K2)在B5至B15单元格中分别输入=IF(K5="","",K5)，…，=IF(K15="","",K15)在C5至C15单元格中分别输入=IF(B5="","",VLOOKUP(B5,spdj,2,FALSE))，…=IF(B15="","",VLOOKUP(B15,spdj,2,FALSE))在I5至I15单元格中分别输入=F5*G5，=F6*G6…=F14*G14和=SUM(I5：I14)在单元格G2 G3中分别输入=TODAY()，=IF(K3="","",K3)在单元格C15中输入="合计金额大写)："&TEXT(INT(ABS(I15)),"[dbnum2]g/通用格式")&"元"&TEXT(INT(ABS(I15*10))-INT(ABS(I15))*10,"[dbnum2]g/通用格式")&"角"&TEXT(INT(ABS(I15*100))-INT(ABS(I15)*10)*10,"[dbnum2]g/通用格式")&"分整"在单元格C16 C17 G17中分别输入=IF(K4="","",K4)，=IF(K17="","",K17)，=IF(K16="","",K16)其余的输入就不用我介绍了。

教你文档双面打印的四种方法

三、设置打印机驱动实现快速双面打印
目前有不少打印机的驱动程序中就提供了双面打印设置。我们可在控制面板的“打印机和传真”里调出安装的默认打印机，右键单击默认的打印机图标，选择“属性”，打开该打印机的属性窗口，在这个窗口中一般就可以找到设置双面打印的项目了。以爱普生ME200来说，在打印机属性窗口的“页面版式”选项下就有一个“双面打印”复选项，选中此项即可进行双面打印。而佳能IP1600的双面打印选项则是在“页设置”选项下。
教你文档双面打印的四种方法
在日常办公中要求对文档进行双面打印是很常见的，在打印机没有自带双面打印单元的情况下，如何既节约人力成本，又能快速实现双面打印呢？具体情况具体分析，一起看看在下面四种情况下的双面打印法。
一、在Word 2007中快速实现双面打印
Word是目前最通用的办公软件，在Word2007中要实现双面打印是很简单的。单击Office按钮，在下拉菜单中单击选择“打印”，在“打印”对话框中单击勾选“手动双面打印”复选项，再单击打印按钮进行打印。Word会先把1、3、5……等单页的内容发送到打印机打印，打印完单页后会弹出一个对话框提醒换一面打印，按对话框中提示，将出纸器中已打印好一面的纸取出并将它们放回到送纸器中，然后按下“确定”，则可打印出双页内容。
小提示：请一定安装打印机随机提供的驱动光盘，使用Windows提供的默认驱动是不可能有这些特殊打印功能的。在不需要双面打印时还得从在里更改才行。
四、使用FinePrint快速实现双面打印
其实除了打印机驱动支持双面打印以外，我们还可以使用FinePrint来实现双面打印。安装FinePrint后会添加一台名为FinePrint的打印机，你可把这台打印机设置为默认打印机，或者在打印时选择使用FinePrint打印机进行打印。这样在打印时就会先弹出FinePrint设置窗口，把此窗口右下角的“双面”复选项选中，再单击“打印”按钮即可实现双面打印。

excel打印出来只有字没有表格

竭诚为您提供优质文档/双击可除excel打印出来只有字没有表格篇一：如何打印excel表格没打印机一样可以打印预览在没有安装打印机的电脑上按下excel的打印预览按钮后，office20xx中的excel会却提示没有安装打印机，且无法打印预览。

其实，只要单击开始;设置;打印机，然后双击添加打印机项目，再随便安装一个打印机的驱动程序。

重启excel，就会发现已经可以打印预览了。

打印指定页面一个由多页组成的个人简历表格，打印出来后，发现其中某一页(或某几页)有问题，修改后，没有必要全部都打印一遍!只要选择文件;打印(不能直接按常用工具栏上的打印按钮，否则是将整个工作表全部打印出来)，打开打印内容对话框，选中打印范围下面的页选项，并在后面的方框中输入需要打印的页面页码，再按下确定按钮即可。

首行重复打印当工作表大于1页时，用户一般希望在打印时能在每一页中均能包含首行，你可以这样设置，打开页面设置对话框，单击工作表选项卡，接下来只需在打印标题;顶端标题行文本框中输入：:类似的字符，或用鼠标将工作表中的首行拖过来也可以，以后就该表格首行就会打印在每页了。

表格也缩印有时为工作需要，可能要求将多页内容调整为一页打印出来(在word中可以通过缩放技巧来实现)，可选择文件;页面设置，再在打开的页面设置对话框中单击页面标签，在缩放组下有一个调整为选项，只要在这里键入打印资产负债表的内容时所需要的页数(注意页宽和页高两个值必须一致)就可以了。

不过，此功能对于与纸张高、宽比例严重不协调的工作表来说，建议不要采用，否则会严重影响打印效果。

篇二：打印excel中的单列表格打印excel中的单列表格如果只打印excel中的一个单列表格，相信有的朋友一定会为此而挠头，由于在excel的页面设置中没有“分栏”这一功能，所以对于长长的一列在打印时就不太好办了，不过，利用excel的同门师兄word，就可以将要这一列的内容横向排列、逐行显示，具体的做法如下：打开表格，复制要打印的某一列，然后点击菜单中的“文件→新建...→工作簿”，然后将复制的某一列粘贴到该工作簿的第一列中，点击“文件”下的“保存”，在弹出的保存窗口中，将“保存类型”选择为“文本文件（制表符分隔）（*.txt）”，然后点击“保存”，不要管弹出提示，点“确定”或“是”就把这个工作簿保存为“book1.txt”了。

Excel-VBA通过设置实现双面打印

Excel-VBA通过设置实现双面打印应用场景通过设置隔页打印和提醒，实现文件的双面打印知识要点1：ActiveWindow.View = xlPageBreakPreview 设置分页预览2：Application.ExecuteExcel4Macro('get.document(50)') 宏表函数计算页数3：Range.PrintOut 方法打印对象Sub 双面打印()On Error Resume NextIf VBA.IsEmpty(edRange) Then MsgBox '当前工作表为空！', 64, '出错': Exit SubDim Pages As Integer, Ji As Integer, Ou As IntegerActiveWindow.View = xlPageBreakPreview '进入分页预览，便于获取页数Pages = Application.ExecuteExcel4Macro('get.document(50)') '利用宏表函数计算页数For Ji = 1 To Int(Pages / 2) 1 '遍历每一页'sheets.printout（form,to,copies,priview,.....）'打印对象，from 打印开始页号，如果省略从起始位置开始，to 打印终止页号，如果省略，则打印至最后一页'copies打印份数，如果省略，只打印一份ActiveSheet.PrintOut form:=2 * Ji - 1, To:=2 * Ji - 1, copies:=1, collate:=True '打印奇数页Next JiMsgBox '请将打印纸反向装入打印机中，' & Chr(10) & '开始打印另一面！', 64, '友情提示'For Ou = 1 To Int(Pages / 2) 1 '在打印偶数页ActiveSheet.PrintOut from:=2 * Ou, To:=2 * Ou, copies:=1, collate:=TrueNext OuActiveWindow.View = xlNormalView '还原为常规视图End Sub。

excel双面打印宏

excel双面打印宏第一：打开要进行双面打印的excel文件，按ALT+F11 进入VB编辑环境，在左侧工程窗口下右健，选择“插入->模块”，命名为模块1，双击该模块，在右侧窗口输入如下代码：Public StartPage As Integer, StepLong As Integer, Col As String, PageHeight As Single, OffSet As Integer变量说明：StartPage 表示要打印的起始页，比如可以是1或2，分别表示要打印奇数页或偶数页。

StepLong 表示是连续打印还是非连续打印，比如可以是1或2，分别表示连续打印或奇偶打印。

Col 表示excel中要打印到的哪一列，比如可以是D或H，分别表示从A列打印到D列或从A列打印到H列。

PageHeight 表示excel分页时每页的标准页高，其中纵向页高为669.75，横向页高为427.5。

OffSet 表示判定上一页的最后一行是否被excel自动分到下一页的依据，其中纵向依据为5，横向依据为14，即当：累计总行高- 标准页高> 5 (su - PageHeight > 5) 或累计总行高- 标准页高> 14 (su - PageHeight > 14) 时(其中su 表示累计总行高，这个变量将在后面说明)，上一页的最后一行将被excel自动分到下一页中。

第二：在左侧工程窗口下右健，选择“插入->用户窗体”，在工程窗口下方属性窗口中为窗体命名为frmPrint ，在右侧窗体上绘制出两个命令按钮，分别命名为ood 和even 。

第三：在左侧工程窗口下右健，选择“插入->用户窗体”，在工程窗口下方属性窗口中为窗体命名为frmOrientation ，在右侧窗体上绘制出两个单选按钮和一个命令按钮，两个单选按钮分别命名为optPortrait 和optLandscape ，命令按钮命名为cmdOk 。

Excel的奇偶打印操作方法

Excel的奇偶打印工作中遇到问题那是常有的事，把工作中遇到的点滴问题记录下来，可以加深自己的理解，同时也可以方便久了忘记的时候查找，一举两得。

下面就是我遇到的EXCEL电子表格奇偶打印的问题。

平时写文章或计划总结用的都是word，奇偶打印很简单，就是在打印的时候选择奇数打印和偶数打印就可以了。

平时做表格是都用excel来制作，但是，也就一两张表，从来都没有考虑说要打印奇偶页的问题。

有一天，符主任打电话来说：“他这里有教育局发来的一些电子表格，表格很多，为了节省纸张想要双面打印，却不知道excel的奇偶打印怎么打”。

我想这很简单啊！与word的奇偶打印应该是一样的。

我走了过去，到那里一打印，确实怎么也找不到奇偶打印的选项，这是怎么回事，难道是这台电脑的问题，换了一台电脑问题还是这样，之后，在很多电脑上试都是同样的问题。

我上网一查找，有些大师讲的也很简单啊！还配有图片，照着大帅讲的步骤操作，在自己的电脑上却找不到大师们讲的选项，这就奇怪了，为什么我们的电脑上都没有大师讲的选项。

到网上又再搜一搜，也有跟我们的情况是一样的，也讲了解决的方法，我就照着师傅讲解的方法试一试，也试了很多方法，我个人觉得下面这种方法还是可行的，下面就分享给大家，希望能帮你解决工作生活遇到的这类问题。

1.打开要奇偶打印的工作簿2.右击工作表标签—查看代码—打开VBA编辑器3.把下面这段代码复制粘贴到VBA编辑器，然后保存并关闭。

Sub Print_双面()Dim pageTotal As IntegerDim jPage As IntegerDim OKpageTotal = Application.ExecuteExcel4Macro("get.do_cument(50)")For jPage = pageTotal - IIf(pageTotal Mod 2 = 0, 1, 0) To 1 Step -2ActiveSheet.PrintOut from:=jPage, To:=jPageNextOK = MsgBox("请把纸张装入打印机，打印偶数页", vbOKCancel, "双面打印")If OK = vbOK ThenFor jPage = 2 To pageTotal Step 2ActiveSheet.PrintOut from:=jPage, To:=jPageNextEnd IfEnd Sub4.单击“开发工具”标签—选择“代码”选项组中的“宏”——选择Print_双面，单击执行，即可打印奇偶页。

轻松为Excel添加一个双面打印按钮

轻松为Ｅｘcｅl添加一个双面打印按钮————————————————————————————————作者: ————————————————————————————————日期：ﻩ轻松为Excel2007添加一个双面打印按钮大家知道,在Word中可以将“奇数页”和“偶数页”分开打印，从而实现多页文档的“双面打印”效果。

但是,在Exceｌ中却没有这一功能。

下面,我们就以Exｃｅl20０７为例,为其添加一个具有“双面打印”功能的按钮。

一、展开“开发工具”选项卡要在Eｘｃel中实现“双面打印”,就要用到其内嵌的VBA功能，因此,需要先展开“开发工具”选项卡。

启动Excｅl20０7,单击左上角的软件图标，在随后出现的下拉菜单中(如图1)，选择“Exc ｅl选项”选项,打开“Exｃel选项”对话框（如图2)。

图1 下拉菜单图2 Excel选项对话框先在左侧选中“个性化设置”选项,然后在右侧“使用Excel时采用的首选项”下面选中“在功能区显示‘开发工具’选项卡”，确定返回。

二、生成“个人宏工作簿”为了让“双面打印”按钮对所有工作簿都有效,我们需要将其保存在“个人宏工作簿”中。

第一次使用“宏”这个功能时,需要先让软件生成一个隐藏的“个人宏工作簿”。

切换到“开发工具”选项卡中,单击其中的“录制宏”按钮，打开“录制新宏”对话框(如图３)。

输入一下宏名称(如“ｓmdy”），按“保存在”右侧的下拉按钮,在随后出现的下拉列表中，选择“个人宏工作簿”选项,确定进入“宏”录制状态。

图３录制新宏不需要进行任何操作,直接单击“开发工具”选项卡中的“停止录制”按钮，系统会自动生成一个隐藏的“个人宏工作簿”。

特别提醒：以后需要在“个人宏工作簿”中编辑宏时，就不需要再进入此步操作了。

三、编辑“双面打印”代码单击“开发工具”选项卡上的“Visuａｌ Basiｃ”按钮，进入VBA编辑状态(如图4)。

图4 进入VBA编辑状态特别提醒:按“Aｌｔ＋Ｆ11”组合键,即可快速进入VBA编辑状态。

如何设置双面打印和自动双面打印设置

如何设置双面打印和自动双面打印设置说2种双面打印方法:1、点打印，跳出的打印对话框里有“双面打印”，你按双面打印后，会出来一个对话框，你先不要点它，等13579这些单数页打完后，将这些打过一面的纸再反过来放在打印上，然后按那个对话框的确定指令，这样2468这些双数页就打在135的背面了。

打单数页的时候不要动它的次序，全部再放进去就行了。

你问应该怎么放才对？不同的机子，纸的放法不太一样，给你说个方法，用一张白纸，一面用笔做上记号，记住放进打印机的时候记号在那面，用这张纸随便打印一个字，出来后你就知道打印机是打的那一面了。

2、用你现在的先打印奇数页，然后把纸拿出来再放进去打印偶数页的方法，也是跟第一种方法一样，稿子总是要全部放进去的，只是打偶数页前，你看一下放的单数页最上面一张是开头还是最后，（比如说10页稿）如果最上面一张是1，你就2、4、6、8、10；如果最上面一张是9，你就设成10、8、6、4、23、有时候打印机搓纸轮不太好，你可以打出单数页后，一张一张打偶数页，这样会保险一些。

能否双面打印取决于打印机的功能。

如果打印机本身具有双面打印功能，在文件——打印——属性（首选项）中即可设置，若没有双面打印功能，可设置文件——打印——手动双面打印，这样设置后，电脑后自动先打印奇数页，然后手动把纸重新放入纸盒，电脑自动再打印偶数页。

先页面设置-页眉和页脚-奇偶页不同勾打上然后再插入-页码-位置(页面底端(页脚))-对齐方式-外侧或内侧就看你的需要了. 打开Word，把第一页的页码设置为右下角，第二面的设置为左下角，然后打开“文件”菜单——“页面设置”——“版式”，把“奇偶页不同”选中，然后确定就好了。

点击工具栏里的文件-页面设置-版式-勾选奇偶页不同-确定，然后再点击视图-页眉页脚-第一页点击插入页码（左）-第二页还要设置页码（右）。

使用自动双面打印部件进行双面打印对于Windows对于Mac OS X 10.5对于Mac OS X 10.3或10.4按下面步骤使用自动双面打印部件进行自动双面打印。

VBA中的打印设置与批量打印技巧

VBA中的打印设置与批量打印技巧在Excel中，我们常常需要对工作表进行打印，打印设置的灵活性和批量打印的效率对于提高工作效率非常重要。

VBA (Visual Basic for Applications) 是一种可以在Microsoft Office套件中的各个应用程序中使用的编程语言，能够帮助我们自动化处理任务，包括打印设置和批量打印。

本文将介绍VBA中常用的打印设置以及一些实用的批量打印技巧，帮助您提高工作效率。

1. 打印设置VBA中的打印设置功能丰富，可以根据需求自定义打印页面、页眉页脚、打印区域等。

1.1 打印页面设置使用VBA，您可以轻松地对打印页面进行设置。

例如，您可以设置纸张大小、方向、边距等。

```vbaSub 页面设置()With ActiveSheet.PageSetup.PaperSize = xlPaperA4 ' 设置纸张大小为A4.Orientation = xlLandscape ' 设置横向打印.LeftMargin = Application.InchesToPoints(0.5) ' 设置左边距为0.5英寸.RightMargin = Application.InchesToPoints(0.5) ' 设置右边距为0.5英寸.TopMargin = Application.InchesToPoints(0.75) ' 设置上边距为0.75英寸.BottomMargin = Application.InchesToPoints(0.75) ' 设置下边距为0.75英寸 End WithEnd Sub```1.2 设置页眉页脚通过VBA，您可以在打印时添加页眉页脚，为打印内容提供更多信息。

```vbaSub 页眉页脚设置()With ActiveSheet.PageSetup.LeftHeader = "左侧页眉" ' 设置左侧页眉.CenterHeader = "中间页眉" ' 设置中间页眉.RightHeader = "右侧页眉" ' 设置右侧页眉.LeftFooter = "左侧页脚" ' 设置左侧页脚.CenterFooter = "中间页脚" ' 设置中间页脚.RightFooter = "右侧页脚" ' 设置右侧页脚End WithEnd Sub```1.3 打印区域设置有时候，我们不需要将整个工作表都打印出来，而只希望打印某个特定的区域。

VBA打印工作薄、打印工作表的参数及代码

一、打印当‎前工作簿‎oE‎x cel.‎A ctiv‎e Work‎B ook.‎P rint‎O ut()‎默认直接‎打印整个工‎作簿：‎oEx‎c el.A‎c tive‎W orkB‎o ok.P‎r intO‎u t(1,‎o Exce‎l.Wor‎k Shee‎t s.co‎u nt,1‎,.T.)‎带参数的‎打印‎参数说明‎：共四个参‎数‎参数1-数‎值：当前工‎作簿中进行‎打印的起始‎工作表号(‎默认1)‎参数2‎-数值：当‎前工作簿中‎进行打印的‎结束工作表‎号(默认最‎末) ‎参数3-数‎值：打印份‎数(默认1‎)参‎数4-逻辑‎值：是预览‎打印还是直‎接打印：.‎T.-预览‎打印，.F‎.-直接打‎印(默认.‎F.)‎二、打‎印当前工作‎表‎o Exce‎l.Act‎i veSh‎e et.P‎r intO‎u t()‎参数‎说明：共八‎个参数‎参数1‎-数值：起‎始页号，省‎略则默认为‎开始位置‎参数2‎-数值：终‎止页号，省‎略则默认为‎最后一页‎参数3‎-数值：打‎印份数，省‎略则默认为‎1份‎参数4-逻‎辑值：是否‎预览，省略‎则默认为直‎接打印(.‎F.)‎参数5-‎字符值：设‎置活动打印‎机名称，省‎略则为默认‎打印机‎参数6-‎逻辑值：是‎否输出到文‎件，省略则‎默认为否(‎.F.)，‎若选.T.‎且参数8为‎空，则Ex‎c el提示‎输入要输出‎的文件名‎参数7‎-逻辑值：‎输出类型，‎省略则默认‎为(.T.‎)逐份打印‎，否则逐页‎打印‎参数8-字‎符值：当参‎数6为.T‎.时，设置‎要打印到的‎文件名‎如：o‎E xcel‎.Acti‎v eShe‎e t.Pr‎i ntOu‎t(1,3‎,6,.F‎.,"My‎P rint‎e r",.‎F.,.T‎.,,)‎从1页打印‎到3页，打‎印6份，通‎过MyPr‎i nter‎打印机来打‎印，并且，‎要逐份打印‎。