编辑Excel宏命令双面打印Excel2003表格
电子表格Excel2003的使用技巧

•
人生得意须尽欢,莫使金樽空对月。03:43:5103:43:5103:4310/22/2020 3:43:51 AM
•
安全象只弓,不拉它就松,要想保安 全,常 把弓弦 绷。20.10.2203:43:5103:43Oc t-2022- Oct-20
•
加强交通建设管理,确保工程建设质 量。03:43:5103:43:5103:43Thursday, October 22, 2020
•
严格把控质量关,让生产更加有保障 。2020年10月 上午3时 43分20.10.2203:43Oc tober 22, 2020
•
作业标准记得牢,驾轻就熟除烦恼。2020年10月22日星期 四3时43分51秒 03:43:5122 October 2020
•
好的事情马上就会到来,一切都是最 好的安 排。上 午3时43分51秒 上午3时43分03:43:5120.10.22
•
一马当先,全员举绩,梅开二度,业 绩保底 。20.10.2220.10.2203:4303:43:5103:43:51Oc t-20
•
牢记安全之责,善谋安全之策,力务 安全之 实。2020年10月22日 星期四3时43分 51秒T hursday, October 22, 2020
•
相信相信得力量。20.10.222020年10月 22日星 期四3时43分51秒20.10.22
自动筛选数据
字体的替换
直接编辑“宏”
导入外部 数据
行列快速转换
在电子表格中运行“宏”
添加说明性文字
数据的分列
数据合并
在excel中添加常用文 件夹
在表格中添加多个视图
设置打印区域
Excel(2003版)手动双面打印设置步骤全图解(使用宏)

Excel(2003版)手动双面打印设置步骤全图解(使用宏)1.工具→宏→录制新宏2.弹出对话框3.更改宏名→确定4.点击停止录制宏5.工具→宏→Visual Basic编辑器,打开编辑器窗口6.插入→模块7.出现如图窗口8.窗口中输入如下内容Sub 手动双面打印()Dim Pages As LongDim myBottonNum As IntegerDim myPrompt1 As StringDim myPrompt2 As StringmyPrompt1 = "在打印时发生错误,请检查你的打印机设置"myPrompt2 = "请将出纸器中已打印好一面的纸取出并将其放回到送纸器中,然后按下""确定"",继续打印"Pages = ExecuteExcel4Macro("Get.Document(50)") '统计总页数On Error Resume NextIf (Pages = 0) Then '如果为零,说明没有可打印内容,退出程序MsgBox "Microsoft Excel 未发现任何可以打印的内容", 0 + 48Exit SubEnd IfIf (Pages = 1) Then '判断是否只有一页,如果是,只打印第一页,然后退出ActiveSheet.PrintOutIf Err.Number = 1004 ThenMsgBox myPrompt1, 0 + 48 '提示用户发生打印错误End IfExit SubEnd IfFor i = 1 To Pages Step 2 '设置循环,打印奇数页ActiveSheet.PrintOut From:=i, To:=iIf Err.Number = 1004 ThenMsgBox myPrompt1, 0 + 48Exit SubEnd IfNext imyBottonNum = MsgBox(myPrompt2, 1 + 48) '提示用户取出纸张,确认后继续打印If (myBottonNum = 1) ThenFor j = 2 To Pages Step 2 '打印偶数页ActiveSheet.PrintOut From:=j, To:=jNext jEnd IfEnd Sub如图9.按“Alt+Q”退出编辑器10.返回工作表窗口,工具→自定义11.宏→自定义按钮12.点击“自定义按钮”前的笑脸,拖曳至工具栏13.右击笑脸,改按钮名为“手动双面打印(&C)”14.点击“指定宏”15.对话框中选择宏→确定→关闭16.重新打开工作表,点击工具栏的按钮,即可手动双面打印(先按张打印出单数页,印完后的对话框中点击“确定”,然后按张打印偶数页)。
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实质上有大小写区分的,因此使用这个公式不是完全准确。
excel2003启用宏方法

excel2003启用宏方法
推荐文章
WPS启用宏的方法图解步骤热度: Excel表格怎么启用宏功能热度: excel怎么启用宏热度: 2003excel的宏在哪里热度: excel的宏怎么启用的热度:
Excel中经常需要启用宏功能,宏功能具体该如何启动呢?接下来是店铺为大家带来的excel2003启用宏方法,供大家参考。
excel2003启用宏方法:
启用宏步骤1:excel宏非常实用,可以大大的提高工作效率,首先打开excel表格。
启用宏步骤2:点击excel左上角的office图标,然后点击选择excel选项。
启用宏步骤3:在excel选项中选择信任中心,然后点击信任中心设置。
启用宏步骤4:在信任中心选择宏设置,excel默认禁用所有宏,并发出通知。
启用宏步骤5:我们可以点击选择启用所有宏然后确定就可以了。
excel表双面打印

EXCEL中双面打印?一个工作簿中多个工作表怎样设置,能打印出反面都无空白页?[ 标签:双面打印, excel, 工作表 ] Young 2010-10-09 10:49一个工作簿中多个工作表(例如:每个表都是一页)满意答案如果你的打印机支持双面打印,直接文件,打印,整个工作簿,然后在打印机属性里选择双面打印就可以了。
如果不是,得用宏。
同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:Sub test()Dim i, j As IntegerDim sh As WorksheetFor Each sh In ThisWorkbook.Sheetsi = i + (sh.HPageBreaks.Count + 1) * (sh.VPageBreaks.Count + 1)Next shFor j = 1 To i Step 2ThisWorkbook.PrintOut i, iNext jMsgBox "请将纸反放后点OK,以打印偶数页", vbOKOnly, "Hi"For j = 2 To i Step 2ThisWorkbook.PrintOut i, iNext jEnd Sub在此界面直接按F5运行此宏,OK。
即使每个工作表多余一页也可以解决。
继续追问:要把一个excel中的sheet1、sheet2……假设都是单面的,打印成:表1在正面,表2在反面,下面依次有好多页,如何设置?(打印机能设置双面打)不好意思,是我没表达清楚。
或者有什么办法,把那些表组合在一个表中?补充回答:我第一句就回答你了:)再上个图吧:继续追问:我要把sheet2(单页)打印在sheet1(单页)的背面,(不用手动把纸翻页)而选整个工作簿后打印出来的是单面(打印机设置的是双面打印)…………我试过的!选整个工作簿,设置双面打印,每个表中才执行双面打印。
非常感谢高手的热心帮忙,期望更好的答案补充回答:说实话,这个我还真没试过。
Excel中2003版进行设置宏按钮的操作方法

Excel中2003版进行设置宏按钮的操作方法
宏按钮的设置是基于我们己经编辑好一个宏了那么在我们使用时就需要设置一个可操作的宏按钮了,这样我们就可以方便操作重复的事情了,今天,店铺就教大家在Excel中2003版进行设置宏按钮的操作方法。
Excel中2003版进行设置宏按钮的操作步骤
1、本例子是以excel2003截图了,我们打开excel之后再点击“菜单栏--工具-->自定义”如下图所示。
2、然后就会弹出一个“自定义对话框”了如图所示。
Excel中2003版进行设置宏按钮的操作步骤图2
3、然后在自定的中我们找到命令选项卡,然后在类别中找到“宏”点击之后右边就会一个小表情图标了,如下图所示。
Excel中2003版进行设置宏按钮的操作步骤图3
4、在上图中,用鼠标按住笑脸表情,拖动到EXCEL工具栏中。
可以看到,笑脸表情按钮出现在工具栏中。
Excel中2003版进行设置宏按钮的操作步骤图4
5、现在的按钮还只是一个按钮了,我们要指定才行,现在在“工具-自定义“如图所示
Excel中2003版进行设置宏按钮的操作步骤图5
6、然后我们同样在自定义找到”命令“下面的宏,这一次是右键宏按钮,——》“指定宏”然后在弹出指定宏我们选择宏名就可以了。
Excel中2003版进行设置宏按钮的操作步骤图6
Excel中2003版进行设置宏按钮的操作步骤图7
好了到这里我们的设置就完成了,本教程可用于excel所有版本中哦。
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表格怎么设置打印页码
1、加入在页脚中插入页码,文件——页面设置——页眉/页脚——页脚——下拉框中选择就是。
2、如果二个工作表在同一工作薄中,同时选择二个工作表,_文件_页面设置_页眉页脚_页眉或页脚下选择"第1页第?页"后确定。
同时选中二个工作表,按打印按钮,二个表格页码会连续打印。
方法1:如果你要设置多个工作表,选择第一个表,按Shift键,选最后一个表,这样全选了需要的表,页面设置,页眉页脚,自定义页脚,在你要的位置(左中右)插入页码,确定,打印时按Shift选择需要打印的工作表,再打印就会顺序正确显示页码了。
方法2:第一个表直接页眉页脚中自定义页脚,插入页码,在第二个表中页面设置,页面(在页面设置第一选项卡“页面”)的左下脚有个起始页码,输入21。
页眉页脚,自定义页脚,选择你要的位置插入页码,确定,这样你的表二就从21页开始了。
如果有第三表,按第二表做法设置即可。
注意事项:方法二的做法在打印时,不需要全选要打印的工作表,想打哪个表就哪个表,页码不会错,方法一的做法在打印时,要选择你要打印的全部工作表,页码才不会错。
Excel表格双面打印可以通过打印机设置来实现。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
编辑Excel宏命令双面打印Excel2003表格
在Word2003的“打印”对话框中可以方便地设置双面打印Word文档,但是在Excle2003中则没有双面打印的设置选项。
用户可以通过在Excel2003中编辑宏命令实现双面打印Excel2003表格。
1.编辑Excel2003宏命令
在Excel2003中第一次使用宏功能时,需要添加“个人宏工作簿”(即PERNOSAL.XLS),然后再使用Visual Basic编辑器编辑双面打印的宏命令。
操作步骤如下所述:
第1步,打开Excel2003,在Excel2003窗口中依次单击“工具”→“宏”→“录制新宏”菜单命令,打开“录制新宏”对话框。
在“宏名”编辑框中输入任意名称,然后在“保存在”下拉菜单中选中“个人宏工作簿”选项,并单击“确定”按钮,如图2008070501所示。
图2008070501 选中“个人宏工作簿”选项
第2步,在打开的录制宏工具栏中单击“停止录制”按钮,Excel2003即可自动添加“个人宏工作簿”,如图2008070502所示。
图2008070502 单击“停止录制”按钮
第3步,在Excel2003窗口中依次单击“工具”→“宏”→“Visual Basic编辑器”菜单命令,打开Visual Basic编辑器窗口。
右键单击左侧“工程”窗格中的“VBA Project(PERNOSAL.XLS)”选项,依次选择“插入”→“模块”菜单命令插入模块1,如图2008070503所示。
图2008070503 选择“插入”→“模块”命令
第4步,双击“模块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编辑窗口返回Excel2003窗口,如图2008070504所示。
图2008070504 输入代码
2.在工具栏添加“双面打印”按钮
第1步,在Excel2003窗口依次执行“工具”→“自定义”菜单命令,打开“自定义”对话框。
在“命令”选项卡中的“类别”列表中选中“宏”选项,然后将“命令”列表中的“自定义按钮”选项拖曳到工具栏上的合适位置,如图2008070505所示。
图2008070505 拖动“自定义按钮”选项
第2步,选中刚刚添加的自定义按钮,在“自定义对话框”中单击“更改所选内容”按钮。
在打开的快捷菜单中编辑“命名”编辑框,为自定义按钮输入名称(如“双面打印”),并选中“总是用文字”选项,如图2008070506所示。
图2008070506 命名自定义按钮
第3步,保持“自定义”对话框的打开状态,然后右键单击工具栏上刚添加的“双面打印”按钮,在打开的快捷菜单中单击“指定宏”命令,如图2008070507所示。
图2008070507 单击“指定宏”命令
第4步,打开“宏”对话框,选中事先编辑的宏,并单击“确定”按钮,如图2008070508所示。
图2008070508 “指定宏”对话框
第5步,关闭“自定义”对话框返回到Excel2003窗口。
3.双面打印Excel2003表格
打开需要双面打印的Excel2003文件,在工具栏中单击“双面打印”按钮。
Excel2003会先将奇数页打印出来,然后打开“打开另一面”对话框,提示用户将纸张反向装入打印机的纸槽中。
单击“确定”按钮即可将偶数页打印到另一面上,从而实现双面打印,如图2008070509所示。
图2008070509 更换纸张打印面。