电子表格如何实现双面打印

电子表格如何实现双面打印

Excel本身不具有双面打印的功能，需要用到“宏”，才能实现。

1、录制“宏”。

单击菜单工具→宏→录制新宏。

2、在弹出的录制新宏对话框中设定新的宏名``随便``自己知道是啥就行

将宏保存在个人宏工作簙中。

3、单击确定后，按停止录制宏按钮。

4、按“Alt+F11”进入Microsoft Visual Basic编辑器。在编辑器中新建模块1，在我们刚才录制的手动双面打印宏命令中输入如下代码：

Sub 手动双面打印()

Dim Pages As Long

Dim myBottonNum As Integer

Dim myPrompt1 As String

Dim myPrompt2 As String

myPrompt1 = "在打印时发生错误，请检查你的打印机设置"

myPrompt2 = "请将出纸器中已打印好一面的纸取出并将其放回到送纸器中，然后按下""确定""，继续打印"

Pages = ExecuteExcel4Macro("Get.Document(50)") '统计总页数

On Error Resume Next

If (Pages = 0) Then '如果为零，说明没有可打印内容，退出程序

MsgBox "Microsoft Excel 未发现任何可以打印的内容", 0 + 48

Exit Sub

End If

If (Pages = 1) Then '判断是否只有一页，如果是，只打印第一页，然后退出ActiveSheet.PrintOut

If Err.Number = 1004 Then

MsgBox myPrompt1, 0 + 48 '提示用户发生打印错误

End If

Exit Sub

End If

For i = 1 To Pages Step 2 '设置循环，打印奇数页

ActiveSheet.PrintOut From:=i, To:=i

If Err.Number = 1004 Then

MsgBox myPrompt1, 0 + 48

Exit Sub

End If

Next i

myBottonNum = MsgBox(myPrompt2, 1 + 48) '提示用户取出纸张，确认后

继续打印

If (myBottonNum = 1) Then

For j = 2 To Pages Step 2 '打印偶数页

ActiveSheet.PrintOut From:=j, To:=j

Next j

End If

End Sub

5、“按Alt+Q”返回到工作表窗口，单击菜单“工具”→“自定义”，在弹出的自定义对话框中选择“命令”选项卡，在命令选项卡中选择“宏”→“自定义按钮”。

6、拖动自定义按钮道任务栏上（也就是那个笑脸），右键单击自定义按钮图标，在弹出的对话框中将“自定义按钮(&C)”更名为“手动双面打印(&C)”，然后再单击“指定宏”

7、在弹出的“指定宏”对话框中选择我们刚才创建的宏

8、所有工作已全部完成，随便打开任意工作簙单击刚创建的按钮试试，程序就会自动先打印所有奇数页，然后提示你取出纸张，确认后再打印所有偶数页，就像在使用Word的手动双面打印一样方便。

利用Word和Excel批量打印奖励

利用Word和Excel批量打印奖励（推荐好用） 用Word批量打印奖状、证书、成绩单、工资单的方法、 简单分以下四步: 1、创建数据库、主文档 2、打开或创建数据源 3、在主文档中插入合并域 4、将数据源中的数据合并到主文档中 具体操作如下： 如：***同志在2007年陕西省教育技术成果**评比中你制作的《***》被评为*等奖，特发此证，以资鼓励。陕西省教育厅2007年4月24日 其中*号为每个人不同内容，其他都一样。方法是： 第一步：建立数据库 新建一个excel电子表格，将每人姓名、成果类型、成果名称、评定等次，输入表格（注意不要省略表格中的标题行，以免邮件合并时找不到合并域名），保存名为“荣誉证.xls”后即可关闭以备后用。 第二步：建立荣誉证模板 新建一个word文件，输入：***同志在2007年XXX省教育技术成果**评比中你制作的《*******》被评为*等奖，特发此证，以资鼓励。 教育厅2007年4月24日，设计页面大小并打印找准位置，打印一个看排版合适，保存为“荣誉证.doc”（注：*号为要自动填写的内容而定） 第三步：邮件合并 1. 在刚建立的“荣誉证.doc”文件中，选择菜单栏的“视图/工具/邮件合并”，则出现“邮件合并”工具栏要常用工具栏下。 2. 在“邮件合并”工具栏中点击“获取数据”下拉按钮，选择“打开数据源(o)…”，在出现打开刚保存的excel电子表格“荣誉证.xls”，点击“确定”，这时你会发现在工具栏中多了一栏邮件合并工具栏。 4. 把光标置于要插入相应项目的位置如证书上要写的姓名位置，点击“插入域”下拉菜单（下拉菜单中的相应选项与“荣誉证.xls”表格中的标题行是一一对应的如“姓名”），

利用PDF阅读器来实现excel2013奇偶数页打印

利用PDF阅读器来实现 Excel2013奇偶数页打印 Excel2013打印选项一直没有奇数页，偶数页分开打印这个功能，导致老式打印机没有办法实现双面打印，先打奇数页，再翻转过来打偶数页，当然去网上搜索相关VBA代码也是比较简单的一种实现方法，方法很多，总之只要能实现自己想要的结果，找适合自己的方法就最好，现在我就把我的方法简要说明一下 简单来说： 就是通过创建PDF阅读文档，在PDF阅读器里面来实现奇偶分别打印以实现双面打印的要求。懂得看到这里就可以了。。。。。。 复杂的来说： 第一步：下载安装软件“福昕阅读器“ 第二补：打开excel或者word就能在菜单栏看到“福昕阅读器“的菜单选项 第三部：打开已经制作好的需要双面打印的excel2013的文件 第四部：点击菜单栏上的福昕阅读器

第五步：点击”创建P DF“—保存到你想要存储的位置（我一般保存在桌面方便使用）-点击确认保存后就会出现正在发布的菜单，等发布完毕以后，我们到保存的位置（桌面）就会看到刚刚创建的一个新的PDF文档 第六步：打开这个新创建的PDF文档 第七部：在PDF阅读器中点击文件——打印 第八步：在菜单里面找到“奇数页打印，偶数页打印”的选项，我们先选择奇数页打印-然后点击确定打印，开始打印奇数页

第九步：打印完毕以后我们只需要把打印的文件一起拿出来掉个头放到打印里面去，然后选择仅偶数页面，勾选下面的逆序打印（先前打印的奇数页顺序是1、3、5、7、9……）所以我们勾选“逆序”以后打印的顺序就是（……，10、8、6、4、2）这些倒置过来的顺序来打印，就可以保证打印的正反两面顺序对应不出错误。 第十步：OK打印完成，整理下打印完毕的文件，装订。

excel表格批量打印的教程

竭诚为您提供优质文档/双击可除excel表格批量打印的教程 篇一：用word和excel批量打印技巧 用word和excel批量打印技巧 20xx-09-08 woRd邮件合并打印excel数据制作大量奖证、奖状、准考证、成绩单、明信片、信封等个人报表 在学校工作，难免会遇到各种证书打印。有很多证书是同类的，比如运行会的奖证，三好学生等等。这不全县三教征文结果出来了，一看550人的庞大队伍，这要是写或者人工排版，不定要划好长时间，对我这样的懒人来说宁肯划一天时间来研究一下偷懒的办法来完成半天的工作的，好在这次划的时间并没那么久，欣喜之余拿出来分享一下！ 设计思路：建立两个文件一个excel电子表格存放姓名和获奖等次等信息，一个woRd文件作为证书样版调用电子表格中的姓名和获奖信息，保持打印的格式一致！ 采用的方法：woRd的邮件合并功能 实施步骤： 1、创建电子表格，因为我的电子表格是从长阳教育网

下载的结果公示，已包含了获奖者的姓名、论文题目以及获奖等次等信息，因为要调用，标题以及不规范的非获奖记录行都要删除整理一下如图所示。 以上只列出了sheet1工作表部分名单，在整理过程中要删除空白行或无意义的行，以免出错！以上文件整理好以后以book1为名保存到桌面备用。 2、打开woRd20xx文字处理软件（2000版可能有所不一样），在“工具”菜单中选择----“信函与邮件”菜单----“邮件合并” 3、出现邮件合并向导： 选择右边向导中的“信函”复选框，下一步“正在启动文档”----默认的“当前文档”----下一步“选取候选人”----默认“使用现有列表”----下一步：“撰写信件”，到这里一直是下一步，到了这里，要选取数据源了，出来一个浏览窗口。 找到桌面上这个备用的电子表格文件，“打开”： 因为我们整理的数据在工作表1中，所以就选择第一个表： 选择表1所，我们要打印的数据出来了，“全选”后确定。这个数据表就可以使用了，下面接着讲如何安排这些数据到woRd中。 4、设计wRod中的格式：

excel中打印的设定

excel中打印的设定 2010-07-27 14:46:43| 分类：默认分类| 标签：|字号大中小订阅打印Excel中的单列表格如果只打印Excel中的一个单列表格，相信有的朋友一定会为此而挠头，由于在Excel的页面设置中没有“分栏”这一功能，所以对于长长的一列在打印时就不太好办了，不过，利用Excel的同门师兄word，就可以将要这一列的内容横向排 列、逐行显示，具体的做法如下： 打开表格，复制要打印的某一列，然后点击菜单中的“文件→新建...→工作簿”，然后将复制的某一列粘贴到该工作簿的第一列中，点击“文件”下的“保存”，在弹出的保存窗口中，将“保存类型”选择为“文本文件（制表符分隔）（*.txt）”，然后点击“保存”，不要管弹出提示，点“确定”或“是”就把这个工作簿保存为“book1.txt”了。 下面打开word，点击菜单中的“文件→打开...”，在弹出的打开窗口中，将文件类型改为“所有文件(*.*)”，然后选择打开刚才保存的“book1.txt”，同样“book1.txt”在word窗口内显示的也是长长的一列文字，如果你的word没有将“视图”下的“显示段落标记”前的对勾去掉，你就会发现，在每一行的后面都会有一个段落标记，只要将这个段落标记替换成几个空格，不就可以横向显示这些文字了！对，就是这个 意思！ 下面点击“编辑”下的“替换”，在弹出的“查找和替换”窗口中，点“高级”展开高级查找的菜单，点击其中的“特殊字符”，在弹出的菜单

中选择“段落标记”，这样在“查找内容”项内显示的就是“^p”，当然也可以直接“查找内容”中输入“^P”，然后在“替换为”项内输入几个空格，具体数量视要打印的内容而定，最后点击“全部替换”，等出现替换完成提示后，再看word中的原本单列显示的文本，是不是已变成逐行显示了，下面只要再对这些文字进行一下调整、修饰，加上标题，就可 以打印了。 用好Excel的双面打印 编辑宏 第一步:启动Excel 2003(其他版本请仿照操作)，执行“工具→宏→Visual Basic编辑器”命令，进入Visual Basic编辑状态(如图1)。 第二步:在右侧的“工程资源管理器”区域中，选中“VBAProject(PERNOSAL.XLS)”选项，执行“插入→模块”命令，插入 一个新模块(模块1)。 小提示

两个表格怎么连续打印

竭诚为您提供优质文档/双击可除两个表格怎么连续打印 篇一：excel工作表之间连续双面打印 excel工作表之间连续双面打印 1、首先把需要双面打印（前面的封面目录之类的需要单面打印的可以不设置）的工作表都在打印设置里面设置成“双面打印”，打印——属性，自己根据需要选择“长边装订”或者是“短边装订”，再点击“确定”。 2、需要注意的是，这个界面确定以后，回到打印的主界面就直接点击“关闭”就可以了，不要选择“确定”否则就直接打印出来了。用这种方法把所有工作表都设置完。 3、再选择“打印”——选择“整个工作簿”（或者用shiFt 键选中所要打印的工作表，但“打印内容”里要选择“活动工作表”），就可以直接打印了。 ok 篇二：excel打印多个工作表,页面不连续 改用vba完成打印 按住alt依次按f11,i,m粘贴下面代码后按 f5subprintall()dimsasworksheetForeachsinactiveworkb

ook.worksheets s.printoutnext endsub subprint1()dimiasinteger dimstrasstring Fori=1toworksheets.count str=i这个数字加1表示列表起始行，为0从第1行开始。 Foreachshtinworksheets a=a+1这个数字如果为2则隔行列表。 myindexsheet.cells(a,"a").Value=https://www.sodocs.net/doc/c510057924.html,引号中字母代表列表所在的列(下行同)，现为b列。 sht.hyperlinks.addmyindexsheet.cells(a,"a"),address :="",subaddress:=https://www.sodocs.net/doc/c510057924.html,times代表循环次数，执行前把times赋值即可(不可小于1，不可大于 2147483647)Fori=1totimes call打印一个表 ifRange("完成标志")="打印完毕"thenexitFor nexti endsub

Excel(2003版)手动双面打印设置步骤全图解(使用宏)

Excel（2003版）手动双面打印设置步骤全图解（使用宏）1.工具→宏→录制新宏 2.弹出对话框

3.更改宏名→确定 4.点击停止录制宏 5.工具→宏→Visual Basic编辑器，打开编辑器窗口

6.插入→模块 7.出现如图窗口 8.窗口中输入如下内容 Sub 手动双面打印() Dim Pages As Long Dim myBottonNum As Integer Dim myPrompt1 As String Dim myPrompt2 As String myPrompt1 = "在打印时发生错误，请检查你的打印机设置" myPrompt2 = "请将出纸器中已打印好一面的纸取出并将其放回到送纸器中，然后按下""确定""，继续打印" Pages = ExecuteExcel4Macro("Get.Document(50)") '统计总页数 On Error Resume Next If (Pages = 0) Then '如果为零，说明没有可打印内容，退出程序

MsgBox "Microsoft Excel 未发现任何可以打印的内容", 0 + 48 Exit Sub End If If (Pages = 1) Then '判断是否只有一页，如果是，只打印第一页，然后退出ActiveSheet.PrintOut If Err.Number = 1004 Then MsgBox myPrompt1, 0 + 48 '提示用户发生打印错误 End If Exit Sub End If For i = 1 To Pages Step 2 '设置循环，打印奇数页 ActiveSheet.PrintOut From:=i, To:=i If Err.Number = 1004 Then MsgBox myPrompt1, 0 + 48 Exit Sub End If Next i myBottonNum = MsgBox(myPrompt2, 1 + 48) '提示用户取出纸张，确认后继续打印If (myBottonNum = 1) Then For j = 2 To Pages Step 2 '打印偶数页 ActiveSheet.PrintOut From:=j, To:=j Next j End If End Sub 如图

巧用VBA编程实现EXCEL电子表格的批量自动打印

巧用VBA编程实现EXCEL证件 的批量打印 夏教荣陈文涛 （湖南省邵阳县白仓镇中学421114） 摘要介绍了在EXCEL中如何使用VBA,通过实例论述了在EXCEL中可以通过VBA编程实现含有照片的电子证件或表格批量自动打印，提高了EXCEL在实际应用中的工作效率及节省人力资源。 关键词VBA编程自动打印EXCEL 一VBA简介 1、什么是VBA？ VBA是Visual Basic For Application的缩写，它是以Visual Basic为发展基础的语言。在Office软件中，VBA应用程序能够在Word、Access、Excel等之间进行交互式应用，加强了应用程序间的互动。 VBA是VB的应用程序版本，可以理解为“寄生在Office办公软件中的VB”，可以看作是VB语言的一个子集。 VBA使Office形成了独立的编程环境。 2、VBA与Visual Basic的关系 1）、VB用于开发Windows应用程序，其代码最终被编译为可执行程序。而VBA是用于控制已有应用程序的自动化操作，其代码为解释。 2）、VB拥有独立的开发环境，而VBA必须集成在已有的应用程序中(Excel等)。 3）、VB开发出来的应用程序在脱离开发环境后仍能执行，而VBA编写出来的程序必须在访问集成应用程序(Excel等)的基础上进行。 尽管有以上不同，但它们仍然非常相似。都使用相同的语言结构。两者的程序的语法及程序流程完全一样。 二、在Excel中使用VBA 1、进入VBA的方法 下面以Office2010为例说明来进入VBA的方法： 功能区中有一个“开发工具”选项卡，在此可以访问 Visual Basic 编辑器和其他开发人员工具。由于 Office 2010 在默认情况下不显示“开发工具”选项卡，因此必须使用以下过程启用该选项卡： 1）、在“文件”选项卡上，选择“选项”打开“Excel 选项”对话框。 2）、单击该对话框左侧的“自定义功能区”。 3）、在该对话框左侧的“从下列位置选择命令”下，选择“常用命令”。 4）、在该对话框右侧的“自定义功能区”下，选择“主选项卡”，然后选中“开发工具”复选框。 5）、单击“确定”。

Excel宏设定双面打印

Excel宏设定双面打印 1、这个涉及到宏单击菜单工具→宏→录制新宏 2、在弹出的录制新宏对话框中设定新的宏名``随便``自己知道是啥就行将宏保存在个人宏工作簙中 3、单击确定后，按停止录制宏按钮 4、按“Alt+F11”进入Microsoft Visual Basic编辑器。在编辑器中新建模块1，在我们刚才录制的手动双面打印宏命令中输入如下代码 Sub 手动双面打印() Dim Pages As Long Dim myBottonNum As Integer Dim myPrompt1 As String Dim myPrompt2 As String myPrompt1 = "在打印时发生错误，请检查你的打印机设置" myPrompt2 = "请将出纸器中已打印好一面的纸取出并将其放回到送纸器中，然后按下""确定""，继续打印" Pages = ExecuteExcel4Macro("Get.Document(50)") '统计总页数On Error Resume Next If (Pages = 0) Then '如果为零，说明没有可打印内容，退出程序MsgBox "Microsoft Excel 未发现任何可以打印的内容", 0 + 48 Exit Sub End If If (Pages = 1) Then '判断是否只有一页，如果是，只打印第一页，然后退出ActiveSheet.PrintOut If Err.Number = 1004 Then MsgBox myPrompt1, 0 + 48 '提示用户发生打印错误End If Exit Sub End If For i = 1 To Pages Step 2 '设置循环，打印奇数页ActiveSheet.PrintOut From:=i, To:=i If Err.Number = 1004 Then MsgBox myPrompt1, 0 + 48 Exit Sub End If Next i myBottonNum = MsgBox(myPrompt2, 1 + 48) '提示用户取出纸张，确认后继续打印If (myBottonNum = 1) Then For j = 2 To Pages Step 2 '打印偶数页ActiveSheet.PrintOut From:=j, To:=j Next j End If End Sub 5、不用管他了``“按Alt+Q”返回到工作表窗口，单击菜单“工具”→“自定义”，在弹出的自定义对话框中选择“命令”选项卡，在命令选项卡中选择“宏”→“自定义按钮”。 6、拖动自定义按钮道任务栏上(也就是那个笑脸)，右键单击自定义按钮图标，在弹出的对话框中将“自定义按钮(&C)”更名为“手动双面打印(&C)”，然后再单击“指定宏” 7、在弹出的“指定宏”对话框中选择我们刚才创建的宏 8、所有工作已全部完成，随便打开任意工作簙单击刚创建的按钮试试，程序就会自动先打印所有奇数页，然后提示你取出纸张，确认后再打印所有偶数页，就像在使用Word的手动双面打印一样方便。

Excel打印设置技巧大全

Excel打印设置技巧大全 没有打印机一样可以打印预览 在没有安装打印机的电脑上按下Excel的“打印预览”按钮后，Excel会却提示没有安装打印机，且无法打印预览。其实，只要单击“开始”→“设置”→“打印机”，然后双击“添加打印机”项目，再随便安装一个打印机的驱动程序。重启Excel，就会发现已经可以打印预览了。 打印指定页面 一个由多页组成的工作表，打印出来后，发现其中某一页（或某几页）有问题，修改后，没有必要全部都打印一遍！只要选择“文件”→“打印”（不能直接按“常用”工具栏上的“打印”按钮，否则是将整个工作表全部打印出来），打开“打印内容”对话框，选中“打印范围”下面的“页”选项，并在后面的方框中输入需要打印的页面页码，再按下“确定”按钮即可。 首行重复打印 当工作表大于1页时，用户一般希望在打印时能在每一页中均能包含首行，你可以这样设置，打开“页面设置”对话框，单击“工作表”选项卡，接下来只需在“打印标题→顶端

标题行”文本框中输入：：类似的字符，或用鼠标将工作表中的首行拖过来也可以，以后就该表格首行就会打印在每页了。 表格也缩印 有时为工作需要，可能要求将多页内容调整为一页打印出来（在Word中可以通过“缩放”技巧来实现），可选择“文件”→“页面设置”，再在打开的“页面设置”对话框中单击“页面”标签，在“缩放”组下有一个“调整为”选项，只要在这里键入打印工作表内容时所需要的页数（注意页宽和页高两个值必须一致）就可以了。不过，此功能对于与纸张高、宽比例严重不协调的工作表来说，建议不要采用，否则会严重影响打印效果。 打印选定区域 选定需要打印的区域，执行“文件”→“打印”，打开“打印内容”对话框，选中“打印内容”下面的“选定区域”选项，按下“确定”按钮就行了。如果经常要打印固定的某个区域，可以先选定相应区域，再执行“文件”→“打印区域”→“设置打印区域”。经过这样的设置后，无论是执行菜单的打印命令，还是直接按“常用”工具栏上的“打印”按钮，均可将设置的区域打印出来。 此时，如果想打印别的内容，就必须先执行“文件”→“打印区域”→“取消打印区域”命令，然后再进行打印操作。 打印不连续的单元格（区域） 如果仅仅需要将一些不连续的单元格（区域）中的内容打印出来，那么在按住Ctrl键的同时，用鼠标左键单击需要打印的单元格（区域），选中多个不连续的单元格（区域，如A2.B2:C8.D10……），然后选择“文件”→“打印”，打开“打印内容”对话框，选中“打印内容”下面的“选定区域”选项，按下“确定”按钮就行了。此时，系统将选中的每一个不连续单元格（区域）分开，打印在不同页面上（即A2打印在一张纸上，B2:C8打印在另一张纸上……）。 如果需要经常打印固定的不连续行、列，可以在上述隐藏设置完成后，执行“视图”→

excel双面打印设置

电子表格Excel怎样设置双面打印(奇偶打印) 用好Excel的双面打印 从节约的角度出发，公司的表格都要求双面打印。但Excel偏偏没有这一功能！怎么办？自己动手添加一个“双面打印”的按钮吧！ 编辑宏 第一步:启动Excel 2003(其他版本请仿照操作)，执行“工具→宏→Visual Basic编辑器”命令，进入Visual Basic编辑状态(如图1)。 第二步:在右侧的“工程资源管理器”区域中，选中“VBAProject(PERNOSAL.XLS)”选项，执行“插入→模块”命令，插入一个新模块(模块1)。 小提示 “PERNOSAL.XLS”叫做“个人宏工作簿”，第一次使用宏功能时，需要进入下述操作，添加“个人宏工作簿”:在Excel中，执行“工具→宏→录制新宏”命令，打开“录制新宏”对话框(如图2)，输入一个名称，然后选择将其“保存在”“个人宏工作簿”中，确定返回，随便做一下编辑操作，然后按“停止录制”工具栏上的“停止录制”按钮，系统即可自动添加“个人宏工作簿”。 第三步:双击“模块1”进入代码输入区域，将下述代码输入其中: Sub dy() On Error Resume Next x = ExecuteExcel4Macro("Get.Document(50)") 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 End Sub 第四步:输入完成后，关闭Visual Basic编辑窗口返回。 添加按钮 第一步:执行“工具→自定义”命令，打开“自定义”对话框(如图3)。 第二步:切换到“命令”标签下，在“类别”下面选中“宏”选项，然后将右侧“命令”下面的“自定义按钮”选项拖到工具栏合适位置上，添加一个按钮。 第三步:单击“更改所选内容”按钮，在随后展开的快捷菜单中，在“命名”右侧的方框中输入按钮名称(如“双面打印”，并选中“总是用文字”选项。 第四步:在不关闭“自定义”对话框的情况下，右击工具栏上刚才添加的“双面打印”按钮(参见图3)，在随后弹出的快捷菜单中，选择“指定宏”选项，打开“指定宏”对话框(如图4)。 第五步:选中上面编辑的宏，确定退出，再关闭“自定义”对话框返回Excel编辑状态

用word和excel批量打印技巧

用word和excel批量打印技巧 2010-09-08 WORD邮件合并打印EXCEL数据制作大量奖证、奖状、准考证、成绩单、明信片、信封等个人报表 在学校工作，难免会遇到各种证书打印。有很多证书是同类的，比如运行会的奖证，三好学生等等。这不全县三教征文结果出来了，一看550人的庞大队伍，这要是写或者人工排版，不定要划好长时间，对我这样的懒人来说宁肯划一天时间来研究一下偷懒的办法来完成半天的工作的，好在这次划的时间并没那么久，欣喜之余拿出来分享一下！ 设计思路：建立两个文件一个Excel电子表格存放姓名和获奖等次等信息，一个WORD文件作为证书样版调用电子表格中的姓名和获奖信息，保持打印的格式一致！ 采用的方法：WORD的邮件合并功能 实施步骤： 1、创建电子表格，因为我的电子表格是从长阳教育网下载的结果公示，已包含了获奖者的姓名、论文题目以及获奖等次等信息，因为要调用，标题以及不规范的非获奖记录行都要删除整理一下如图所示。 以上只列出了Sheet1工作表部分名单，在整理过程中要删除空白行或无意义的行，以免出错！以上文件整理好以后以boo k1为名保存到桌面备用。 2、打开WORD2003文字处理软件（2000版可能有所不一样），在“工具”菜单中选择----“信函与邮件”菜单----“邮件合并”

3、出现邮件合并向导： 选择右边向导中的“信函”复选框，下一步“正在启动文档”----默认的“当前文档”----下一步“选取候选人”----默认“使用现有列表”----下一步：“撰写信件”，到这里一直是下一步，到了这里，要选取数据源了，出来一个浏览窗口。

找到桌面上这个备用的电子表格文件，“打开”： 因为我们整理的数据在工作表1中，所以就选择第一个表：

如何自己设置excel双面打印

编辑宏 第一步:启动Excel 2003(其他版本请仿照操作)，执行“工具→宏→Visual Basic编辑器”命令，进入Visual Basic编辑状态(如图1)。 第二步:在右侧的“工程资源管理器”区域中，选中“VBAProject(PERNOSAL.XLS)”选项，执行“插入→模块”命令，插入一个新模块(模块1)。 小提示 “PERNOSAL.XLS”叫做“个人宏工作簿”，第一次使用宏功能时，需要进入下述操作，添加“个人宏工作簿”:在Excel中，执行“工具→宏→录制新宏”命令，打开“录制新宏”对话框(如图2)，输入一个名称，然后选择将其“保存在”“个人宏工作簿”中，确定返回，随便做一下编辑操作，然后按“停止录制”工具栏上的“停止录制”按钮，系统即可自动添加“个人宏工作簿”。

第三步:双击“模块1”进入代码输入区域，将下述代码输入其中: Sub dy() On Error Resume Next x = ExecuteExcel4Macro("Get.Document(50)") 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 End Sub 第四步:输入完成后，关闭Visual Basic编辑窗口返回。 添加按钮 第一步:执行“工具→自定义”命令，打开“自定义”对话框(如图3)。

用Excel和VBA轻松实现桌签批量打印

用Excel和VBA轻松实现桌签批量打印 用Excel来制作桌面标签（以下简称桌签）确实是一个比较新颖的方法，不过要是同时制作很多桌签也还是比较费时的。那么今天笔者就介绍一种用VBA轻松实现桌签批量打印的方法。 一、准备工作 ⒈启动Excel2003(其他单元格也可以)，执行“工具→自定义”命令，打开“自定义”对话框。在“命令”标签中，选中“类别”下面的“工具”选项，然后在“命令”下面找到“照相机”选项，并将它拖到工具栏合适位置上。 ⒉在Sheet1工作表中(最好将文档取名保存一下)，仿照图1的样式，在B列相应的单元格中输入需要打印桌签的名称，并在A1中输入一个名称。 ⒊在C1单元格(也可以是其他单元格)中输入公式:=COUNTA(B:B)，用于统计所要打印的桌签数目。 ⒋选中A1单元格，设置字符居中对齐，并设置一种适合用作桌签的字体(如魏碑体)。 二、制作桌签 ⒈选中A1单元格，单击一下工具栏上的“照相机”按钮，再切换到“Sheet2”工作表中，单击一下鼠标，即可得到一张A1单元格的照片 小贴士:这种照片不同于普通图片，它与A1单元格中的数据建立了链接，随A1单元格中的字符改变而改变。

⒉选中“照片”，执行“格式→图片”命令，打开“设置图片格式”对话框，在“颜色与线条”标签中，将“线条”设置为“无线条颜色”，点击“确定”返回。 ⒊根据桌签底座的尺寸，将“照片”调整至合适大小，并将它定位到页面合适位置上。 ⒋将上述“照片”复制一份，在“设置图片格式”对话框的“大小”标签中，将它“旋转→180°”，并将它定位到页面合适位置上(效果参见图2)。 三、编制宏程序 ⒈按下“Alt+F11”组合键，打开“Visual Basic编辑器”(图3)，在右侧的“工程资源管理器”区域中，选中“VBAProject(桌签.xls)”选项，执行“插入→模块”命令，插入一个模块(模块1)。 ⒉双击“模块1”，展开右侧的代码编辑区，将下述代码输入其中:Sub 桌签() '建立一个名称为“桌签”的宏。 For i = 1 To Sheet1.Cells(1, 3) '设立一个循环:开始值为1，结束值为Sheet1工作表C3单元格内的值(即桌签数目)。 Sheet1.Select '选中Sheet1工作表。 Cells(1, 1).V alue = Cells(i, 2).V alue '依次将B列的桌签字符调入A1单元格中。 Columns("A:A").Select '选中A列。 Selection.Columns.AutoFit '将A列设置为“最合适的列宽”，这样让字符不同的桌签自动适应“照片”的大小。

excel添加按钮Excel 2007 添加 双面打印 按钮

excel添加按钮:Excel 2007 添加 双面打印按钮 疯狂代码 https://www.sodocs.net/doc/c510057924.html,/ ?:http:/https://www.sodocs.net/doc/c510057924.html,/Office/Article60972.html 大家知道在Word中可以将“奇数页”和“偶数页”分开打印从而实现多页文档“双面打印”效果但是在Excel中却没有这功能下面我们就以Excel2007为例为其添加个具有“双面打印”功能按钮 、展开“开发工具”选项卡 要在Excel中实现“双面打印”就要用到其内嵌VBA功能因此需要先展开“开发工具”选项卡 启动Excel2007单击左上角软件Software图标在随后出现下拉菜单中(如图1)选择“Excel选项”选项打开“Excel选项”对话框(如图2) 先在左侧选中“个性化设置”选项然后在右侧“使用Excel时采用首选项”下面选中“在功能区显示‘开发工具’选项卡”确定返回 2、生成“个人宏工作簿” 为了让“双面打印”按钮对所有工作簿都有效我们需要将其保存在“个人宏工作簿”中第次使用“宏”这个功能时需要先让软件Software生成个隐藏“个人宏工作簿” 切换到“开发工具”选项卡中单击其中“录制宏”按钮打开“录制新宏”对话框(如图3)输入下宏名称(如“smdy”)按“保存在”右侧下拉按钮在随后出现下拉列表中选择“个人宏工作簿”选项确定进入“宏”录制状态 不需要进行任何操作直接单击“开发工具”选项卡中“停止录制”按钮系统会自动生成个隐藏“个人宏工作簿” 特别提醒:以后需要在“个人宏工作簿”中编辑宏时就不需要再进入此步操作了

3、编辑“双面打印”代码 单击“开发工具”选项卡上“Visual Basic”按钮进入VBA编辑状态(如图4) 特别提醒:按“Alt+F11”组合键即可快速进入VBA编辑状态 在左侧“工程资源管理器”中展开“VBAProject(PERSONAL.XLSB)”选项(这就是“个人宏工作簿”)双击其中“模块1”然后用下述代码替换右侧编辑区中原有代码: Sub smdy On Error Resume Next x = ExecuteExcel4Macro("get.document(50)") For i = 1 To Int(x / 2) + 1 ExecuteExcel4Macro "PRINT(2," & 2 * i - 1 & "," & 2 * i - 1 & ",1,,,,,,,,2,,,TRUE,,FALSE)" Next i MsgBox "请将打印纸反向装入打印机中", vbOKOnly, "打印另面" For j = 1 To Int(x / 2) + 1 ExecuteExcel4Macro "PRINT(2," & 2 * j & "," & 2 * j & ",1,,,,,,,,2,,,TRUE,,FALSE)" Next j End Sub 输入完成后关闭VBA编辑窗口返回到Excel编辑状态 4、添加“双面打印”按钮 其实我们只要运行上面“smdy”宏就可以实现双面打印效果了但是为了操作上方便我们在“快速访问工具栏”上添加个“双面打印”按钮 右击左上角软件Software图标在随后出现下拉菜单中选择“自定义快速访问工具栏”选项打开“Excel选项”对话框并定位到“自定义”选项中(如图5) 单击“从下拉位置选择命令”右侧下拉按钮在随后出现下拉列表中选中“宏”选项将刚才编辑宏“PERSONAL.XLSB!smdy”“添加”到右侧快速工具栏中

excel实现连续打印

Excel制作另类“邮件合并” 发布时间：2012-11-20 点击量：我要评论 抛弃传统的邮件合并方法，用另类方法制作一个高效的邮件合并，可以大大提高工作效率。 由于工作关系，经常用到Word中邮件合并功能打印：奖状、证书、准考证等等不计其数，发现Word中邮件合并功能虽然不少，可是有些东西，用Word中邮件合并功能虽然也能实现，但工作量却多了不少，用起来很不方便。如果科目随时变化，每变换一次，就得重新设计一次Word邮件合并（即科目一列得重新录入、成绩引用也要重新插入）。 下面以打印学生成绩为例，介绍一种直接用Excel 2000制作另类“邮件合并”的方法。虽然开始设计时得花点时间，可是一次设计好后，在以后应用中只需稍作改动，就能完成任务，可大大减少时间及工作量。 一、准备工作 首先，用Excel 2000建一个Excel文件（命名为：成绩打印模板.xls），并把其Sheet1重命名为“成绩”，主要用来存放要打印的数据源（这里用科目1、2……来代替各科目名称）（图2），把Sheet2重命名为“打印用”，主要用来将科目及成绩套打在毕业生推荐表上（图1）。

在这里“成绩”这个工作表几乎不用怎么设计了，因为学生成绩数据是现成的（与数据源一样），要打印哪个班或某个学生的成绩，从现有的数据源表里筛选出来后，将其用全选（Ctrl+A）复制，然后到“成绩”工作表里选中A1单元格，粘贴上去即可。因为在设计这个模板时，是按所有学生所学的最多科目数来设计的，只有用全选复制，粘贴到“成绩”工作表里才能覆盖原“成绩”工作表里所有的信息，打印时才不会将多余的东西打印出来。 其次，是“打印用”工作表，表格的设计及调整。主要目的是根据毕业生推荐表的要求，设计好要套打的内容，本列要套打的内容是“科目”及“成绩”两部分，其余内容为打印作辅助用。在这里设置套打问题不作说明，电子表格有选择“打印区域”功能不难做到。 二、数据引用 第一步：科目的引用 在“打印用”工作表选中B5单元格输入下面的公式：=IF(INDIRECT(ADDRESS(1,ROW($A4),,,"成绩"))<>"",INDIRECT(ADDRESS(1,ROW($A4),,,"成绩")),"")，按下Enter后，得到图1 所示的第一个科目“科目1”，最后将B5单元格公式向下填充到最后B10，得到第一列科目。第二列科目开头D5单元格的公式直接把上面的公式复制过来，并把公式中的ROW($A4)改为ROW($A10)，最后将D5单元格公式向下填充到最后D10，得到第二列科目。采用同样的方法，再设置其余各列科目。 第二步：分数的引用 首先，在“打印用”工作表中的M1单元格输入“序号”、在N1单元格“姓名”，在M2单元格输入公式=IF(成绩!A2<>"",成绩!A2,"")并将其公式向下填充到M6，引用“成绩”工作

wps表格怎么双面打印

竭诚为您提供优质文档/双击可除wps表格怎么双面打印 篇一：excel表格双面打印步骤 wps版excel表格双面打印的步骤 第一步：打开excel表格，鼠标点击文件---《页面设置》 第二步：在【页面】中选择纵向方向，100%比例，a4纸，如下图： 第三步：在【页眉/页脚】的页脚设置成第1页，如图：第四步：在【工作表】中的顶端标题行选择需要打印内容的标题，如图： 页面设置好后，点击『确定』 第五步：在属性栏中选择《打印》，在打印页面中选择打印机的类型，在页码范围选择『页』，点击勾上【手动双面打印】，在【纸张型缩放】那里选择适合的纸张，点【确定】 在打印机打出第一张纸时，再把纸张的第二面翻过来，点击电脑上的【确定】进行第二次的打印。 篇二：wps双面打印技巧

随着家用电脑的普及程度越来越高，普通的喷墨打印机也走进了千家万户，由于普通喷墨打印机价格低廉，其功能也相对较少，与高档的极光打印机相比，典型的就是不具备自动(wps表格怎么双面打印)双面打印功能。但是，家庭使用， 单面不仅有点浪费纸张。有没有办法设置一下，让普通喷墨也能双面打印呢？ 正是由于普通喷墨打印机自动双面打印功能的欠缺，大部分人又贪图一时方便，一页整洁的打印纸，只使用了单面，而另一面就无端的浪费了，并且人们对身边的这种浪费早已熟视无睹，这就有悖于国务院倡导的建设节约型社会的精神了。 虽说普通喷墨打印机不具有自动双面打印功能，而wps 却为我们提供了手动双面打印的辅助功能，手动双面打印的目的，就是要最大限度的节约纸张而提高其利用率。而在wps 中手动双面打印时装订线的设置，又成了一个不是“问题”的问题，为了便于装订，奇数页面的装订线一般都要求在页面的左侧，而偶数页面的装订线却要求是在页面的右侧，而在wps的页面设置中，其装订线默认设置只能是在页面的左侧或上侧（如图01），这对于双面打印时的偶数页面的装订线设置造成了极大的不便，双面打印也就只能是采用加大页面边距的办法来解决了,这样虽说是节约了纸张,却失去了

最新excel数据表分页汇总与批量打印学习资料

Excel数据表分页汇总与批量打印 [文章信息] 作者: 陈秀峰原创 时间: 2004-10-25 出处: 天极网 责任编辑: Shiny [文章导读] Excel数据表格的分页汇总与批量打印，如果采取手工复制、粘贴的做法，不仅操作麻烦，而 且容易出现错误…… 图1是一份普通的Excel数据表，我们现在需要将其打印成如图2所示的样式，如果采取手工复制、粘贴的做法，不仅操作麻烦，而且容易出现错误。为此，笔者在此给出一种较为简便的解决方法，供大家参考。文章末尾提供.xls文件供大家下载参考。 （图片较大，请拉动滚动条观看） 处理过程： 1、启动Excel2003（其他版本请大家仿照操作），打开数据表。 2、切换到Sheet2工作表中，仿照图2所示的样式，制作好需要打印的表格表头的表尾。 3、选中A4单元格，输入公式：=A3+1，并用“填充柄”将其公式复制到A5至A22单元格中（此处假定每页打印20行数据）。 4、分别选中B3至H3单元格，依次输入公式：=IF(ISERROR(VLOOKUP($A3,数 据!A:H,2,FALSE)),"",VLOOKUP($A3,数据!A:H,2,FALSE))、=IF(ISERROR(VLOOKUP($A3,数

据!A:H,3,FALSE)),"",VLOOKUP($A3,数据!A:H,3,FALSE))……=IF(ISERROR(VLOOKUP($A3,数 据!A:H,8,FALSE)),"",VLOOKUP($A3,数据!A:H,8,FALSE))。 5、同时选中B3—H3单元格区域，用“填充柄”将上述公式复制到B4至H22单元格中。 6、分别选中E23和F23单元格，输入公式：=SUM(E3:E22)和=SUM(F3:F22)，用于统计当页工程的“建筑面积”和“造价”，达到分页汇总的目的。 7、执行“工具→宏→Visual Basic编辑器”命令，进入VBA编辑状态（如图3）。 注意：按下“Alt+F11”组合键，也可以快速进入VBA编辑状态。 8、选中“工程.xls”工作簿名称，执行“插入→模块”命令，插入一个新模块（模块1），然后将下述代码输入到右侧的空白区域中： Sub 分页打印() x = InputBox("请输入打印起始页码") '设置打印起始页码 y = InputBox("请输入打印结束页码") '设置打印结束页码 For i = x To y '设置一个循环 Cells(3, 1) = 20 * (i - 1) + 1 '在A3单元格中输入一个序号 ActiveWindow.SelectedSheets.PrintOut '执行一次打印操作 Next '进入下一个循环 End Sub 注意：在上述代码中，英文单引号“'”及后面的字符是对代码的解释，在实际输入的时候不需要输入。 9、输入完成后，关闭VBA编辑窗口，返回工作表中。 10、执行“视图→工具栏→控件工具箱”命令，展开“控件工具箱”工具条（如图4）。 11、单击工具条上的“命令按钮”按钮，然后在工作表中拖拉一下，画出一个命令按钮。 12、右击命令按钮，在随后出现的快捷菜单中，选择“属性”选项，打开“命令按钮属性”设置框（如图5）。

excel,批量打印模板

竭诚为您提供优质文档/双击可除excel,批量打印模板 篇一：用word和excel批量打印技巧 用word和excel批量打印技巧 20xx-09-08 woRd邮件合并打印excel数据制作大量奖证、奖状、准考证、成绩单、明信片、信封等个人报表 在学校工作，难免会遇到各种证书打印。有很多证书是同类的，比如运行会的奖证，三好学生等等。这不全县三教征文结果出来了，一看550人的庞大队伍，这要是写或者人工排版，不定要划好长时间，对我这样的懒人来说宁肯划一天时间来研究一下偷懒的办法来完成半天的工作的，好在这次划的时间并没那么久，欣喜之余拿出来分享一下！ 设计思路：建立两个文件一个excel电子表格存放姓名和获奖等次等信息，一个woRd文件作为证书样版调用电子表格中的姓名和获奖信息，保持打印的格式一致！ 采用的方法：woRd的邮件合并功能 实施步骤： 1、创建电子表格，因为我的电子表格是从长阳教育网

下载的结果公示，已包含了获奖者的姓名、论文题目以及获奖等次等信息，因为要调用，标题以及不规范的非获奖记录行都要删除整理一下如图所示。 以上只列出了sheet1工作表部分名单，在整理过程中要删除空白行或无意义的行，以免出错！以上文件整理好以后以book1为名保存到桌面备用。 2、打开woRd20xx文字处理软件（2000版可能有所不一样），在“工具”菜单中选择----“信函与邮件”菜单----“邮件合并” 3、出现邮件合并向导： 选择右边向导中的“信函”复选框，下一步“正在启动文档”----默认的“当前文档”----下一步“选取候选人”----默认“使用现有列表”----下一步：“撰写信件”，到这里一直是下一步，到了这里，要选取数据源了，出来一个浏览窗口。 找到桌面上这个备用的电子表格文件，“打开”： 因为我们整理的数据在工作表1中，所以就选择第一个表： 选择表1所，我们要打印的数据出来了，“全选”后确定。这个数据表就可以使用了，下面接着讲如何安排这些数据到woRd中。 4、设计wRod中的格式：