WIN10系统中excel如何打印奇偶页

1.excel电子表格里面怎么实现奇偶页打印?

如果你的打印机支持双面打印,直接文件,打印,整个工作簿,然后在打印机属性里选择双面打印就可以了。

如果不是,得用宏。同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:Sub test()Dim i, j As Integeri = (ActiveSheet.HPageBreaks.Count + 1) * (ActiveSheet.VPageBreaks.Count + 1)For 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。

2.win10系统怎么设置奇偶页打印

win10系统打印机无法打印解决方法一:

1、请确保打印机已打开并连接到你的电脑。

2、如果仍然无法工作,请尝试运行 “打印疑难解答”。

3、如果仍然有问题,你的打印机可能需要新的驱动程序。

4、打开 “开始”菜单, 输入 “设备和打印机”, 从结果列表中选择它,然后选择你的打印机。然后在屏幕顶部选择 “删除设备”, 然后重新安装你的打印机。

5、如果Windows无法自动找到新的驱动程序,请在设备制造商网站上查找一个驱动程序并按照其安装说明进行操作。

win10系统打印机无法打印解决方法二:

右击我的电脑,管理,服务和应用程序,双击服务,找到Spooler Print Spooler或者是Print Spooler以及server双击,看是否禁用了这些服务,把它设置为自动。

3.Excel中如何实现设置奇、偶页打印

1、第一种写法:

Sub PrintRL()

'代码作用:在打印EXCEL文件时连续打印奇偶页

'当为奇数时页脚设在右边,为偶时设在左边并打印

'By redwin for yan

'2007-4-16

Dim Numb As Integer

On Error Resume Next

'得到当前工作簿的打印页数Numb

Numb = ExecuteExcel4Macro("Get.Document(50)")

'MsgBox Numb

With ActiveSheet.PageSetup

For i = 1 To Numb Step 1

If i Mod 2 = 1 Then

.LeftFooter = ""

.RightFooter = "第 &P 页,共 &N 页"

ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i

Else

.RightFooter = ""

.LeftFooter = "第 &P 页,共 &N 页"

ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i

End If

Next i

End With

End Sub

2、第二种写法:

Sub PrintRL()

'代码作用:在打印EXCEL文件时分开打印奇偶页

'当为奇数时页码页脚设在右边,为偶时设在左边

'By redwin for yan

'2007-4-16

Dim Numb As Integer

Dim Numb1 As Integer

On Error Resume Next

'得到当前工作簿的打印页数Numb

Numb = ExecuteExcel4Macro("Get.Document(50)")

'MsgBox Numb

With ActiveSheet.PageSetup

'先打印奇数页;考虑到放纸习惯,先设置好第一张的页码问题

If Numb Mod 2 <> 1 Then

Numb1 = Numb - 1

Else

Numb1 = Numb

End If

For i = Numb1 To 1 Step -2

.LeftFooter = ""

.RightFooter = "第 &P 页,共 &N 页"

ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i

Next i

MsgBox "注意:奇数页已打印完毕,下面将打印偶数页,请注意放纸,确定后便开始喽!", _

vbInformation, "双面打印,将节约进行到底:)"

'再打印偶数页

For i = 2 To Numb Step 2

.RightFooter = ""

.LeftFooter = "第 &P 页,共 &N 页"

ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i

Next i

End With

End Sub

4.怎么在EXCEL中分奇偶页打印

1、第一种写法:Sub PrintRL()'代码作用:在打印EXCEL文件时连续打印奇偶页'当为奇数时页脚设在右边,为偶时设在左边并打印'By redwin for yan'2007-4-16Dim Numb As IntegerOn Error Resume Next'得到当前工作簿的打印页数NumbNumb = ExecuteExcel4Macro("Get.Document(50)")'MsgBox NumbWith ActiveSheet.PageSetupFor i = 1 To Numb Step 1If i Mod 2 = 1 Then.LeftFooter = "".RightFooter = "第 &P 页,共 &N 页"ActiveWindow.SelectedSheets.PrintOut From:=i, To:=iElse.RightFooter = "".LeftFooter = "第 &P 页,共 &N 页"ActiveWindow.SelectedSheets.PrintOut From:=i, To:=iEnd IfNext iEnd WithEnd Sub2、第二种写法:Sub PrintRL()'代码作用:在打印EXCEL文件时分开打印奇偶页'当为奇数时页码页脚设在右边,为偶时设在左边'By redwin for yan'2007-4-16Dim Numb As IntegerDim Numb1 As IntegerOn Error Resume Next'得到当前工作簿的打印页数NumbNumb = ExecuteExcel4Macro("Get.Document(50)")'MsgBox NumbWith ActiveSheet.PageSetup'先打印奇数页;考虑到放纸习惯,先设置好第一张的页码问题If Numb Mod 2 <> 1 ThenNumb1 = Numb - 1ElseNumb1 = NumbEnd IfFor i = Numb1 To 1 Step -2.LeftFooter = "".RightFooter = "第 &P 页,共 &N 页"ActiveWindow.SelectedSheets.PrintOut From:=i, To:=iNext iMsgBox "注意:奇数页已打印完毕,下面将打印偶数页,请注意放纸,确定后便开始喽!", _vbInformation, "双面打印,将节约进行到底:)"'再打印偶数页For i = 2 To Numb Step 2.RightFooter = "".LeftFooter = "第 &P 页,共 &N 页"ActiveWindow.SelectedSheets.PrintOut From:=i, To:=iNext iEnd WithEnd Sub。

5.在EXCEL中怎样设置奇偶页打印

用宏。同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:

Sub dayin()

Dim x, i As Integer

x = ExecuteExcel4Macro("Get.Document(50)")

MsgBox "现在打印奇数页", vbOKOnly

For i = 1 To Int(x / 2) + 1

ActiveSheet.PrintOut From:=2 * i - 1, To:=2 * i - 1

Next i

MsgBox "现在打印偶数页", vbOKOnly

For i = 1 To Int(x / 2) + 1

ActiveWindow.SelectedSheets.PrintOut From:=2 * i, To:=2 * i

Next i

End Sub

在此界面下直接按F5运行此宏,解决问题。

WIN10系统中excel如何打印奇偶页

转载请注明出处windows之家 » WIN10系统中excel如何打印奇偶页

win10

win10开始菜单如何取消字母排列

阅读(116)

本文主要为您介绍win10开始菜单如何取消字母排列,内容包括如何去掉win10开始菜单的排序字母,win10开始菜单排序字母如何去掉,win10开始菜单排序字母如何去掉。首先我们需要任务栏属性找到开始菜单百然后点击所以设置。

win10

如何win10备份c盘资料

阅读(89)

本文主要为您介绍如何win10备份c盘资料,内容包括win10如何只备份c盘?,win10系统怎么备份c盘,win10怎么备份c盘小白求教,。您好,解决win10系统怎么备份c盘的具体步骤如下:1.首先打开计算机,在计算机桌面点击开始菜单,然后点击这里箭头所指的设置

win10

如何在win10系统下关闭系统还原

阅读(179)

本文主要为您介绍如何在win10系统下关闭系统还原,内容包括win10系统怎么关闭系统还原功能,win10系统怎么关闭系统还原,升级完win10怎么关闭还原系统。操作方法: 鼠标右键“计算机”,在弹出的对话框中,点击“属性”按钮。 2、紧接着在弹出的对

win10

win10如何清空

阅读(69)

本文主要为您介绍win10如何清空,内容包括WIN10怎样清理应用缓存,win10应用商店没下载玩的东西怎么删除?爱问,如何清理Win10系统硬盘空间提高系统运行速度?。Windows 10系统自带有两个浏览器:Edge浏览器和IE浏览器Edge浏览器清理缓存的步骤如

win10

win10如何使用邮件

阅读(84)

本文主要为您介绍win10如何使用邮件,内容包括win10邮件功能怎么用,win10怎样设置和使用邮件应用,win10邮件应用怎么用win10正式版内置邮件使用方法。win10邮件功能使用方法:打开邮件应用,可以在开始菜单中找以它,如果邮件应用的磁贴没有在应用

win10

如何共享打印机到多台电脑上win10

阅读(86)

本文主要为您介绍如何共享打印机到多台电脑上win10,内容包括如何共享打印机到另外一台电脑win10,WIN10系统多个不同网络的电脑怎么共享打印机?,windows10怎么共享打印机。朋友,你好:这个完全没有问题,但前提是这二台电脑在同一个IP段内,也就是

win10

win10如何给文件上密码是什么格式的

阅读(102)

本文主要为您介绍win10如何给文件上密码是什么格式的,内容包括Win10系统怎么给文件或文件夹加密,win10怎么给文件夹设置密码,win10怎么给文件夹设置密码。Win10系统给文件或文件夹加密步骤如下:找到并右击需要加密的文件或文件,然后选择“属

win10

win10系统专业版如何获得管理员权限

阅读(113)

本文主要为您介绍win10系统专业版如何获得管理员权限,内容包括win10专业版怎么取得管理员权限,win10专业版怎么获得管理员权限,win10专业版如何获得最高管理员权限。计算机管理员帐户,也就是我们熟知的“Administrator”,拥有可执行影响其他

win10

如何在win10安装五笔

阅读(121)

本文主要为您介绍如何在win10安装五笔,内容包括win10怎样添加五笔输入法,怎样在win10安装其它五笔输入法,win10系统下如何安装万能五笔输入法。win10安装完成后,缺省只有一个拼音输入法,选择&lt;控制面板&gt;打开,然后选择右侧的更换输入法。2、

win10

win10如何取消卸载软件时密码

阅读(57)

本文主要为您介绍win10如何取消卸载软件时密码,内容包括windows10怎么设置卸载软件时需要密码?,windows.old文件没删除win10怎么没有回退win7这一项还没1个月,win10如何删除程序。你应该是防熊孩子用电脑的时候乱搞把。卸载要密码这个功能

win10

win10登录时的账号列表如何删除

阅读(121)

本文主要为您介绍win10登录时的账号列表如何删除,内容包括win10怎么删除自己登录的账户?,win10要怎么删除掉自己登录的账号?,win10系统怎样删除登陆账号。方法一:右键开始菜单--选择“计算机管理“或者win+R输入compmgmt.msc进入计算机管理

win10

win10系统默认安装目录设置

阅读(96)

本文主要为您介绍win10系统默认安装目录设置,内容包括win10怎么改变默认安装目录,win10如何统一设置软件的默认安装目录,缓存目录,下载目录搜狗,如何设置win10默认安装路径。windows 10操作系统中可参考以下步骤操作:按下键盘的WIN+I组合键,

win10

win10如何设置ppt文字形状

阅读(75)

本文主要为您介绍win10如何设置ppt文字形状,内容包括ppt怎么改变字体形状,Win10纯净版64位系统下如何设置PPT文字透明?,WIN10如何更改鼠标指针样式。解决方法一: 单击文件菜单,在下拉菜单中选中打印。 2、单击颜色/灰度,在颜色/灰度下拉菜单中

win10

win10怎么单独设置程序dpi

阅读(60)

本文主要为您介绍win10怎么单独设置程序dpi,内容包括Win10下如何单独给程序设置DPI缩放,win10怎么调整应用的dpi,怎样进行Win10软件高DPI设置。从开始菜单里点击 设置。

win10

win10开始菜单如何取消字母排列

阅读(116)

本文主要为您介绍win10开始菜单如何取消字母排列,内容包括如何去掉win10开始菜单的排序字母,win10开始菜单排序字母如何去掉,win10开始菜单排序字母如何去掉。首先我们需要任务栏属性找到开始菜单百然后点击所以设置。

win10

如何win10备份c盘资料

阅读(89)

本文主要为您介绍如何win10备份c盘资料,内容包括win10如何只备份c盘?,win10系统怎么备份c盘,win10怎么备份c盘小白求教,。您好,解决win10系统怎么备份c盘的具体步骤如下:1.首先打开计算机,在计算机桌面点击开始菜单,然后点击这里箭头所指的设置

win10

如何在win10系统下关闭系统还原

阅读(179)

本文主要为您介绍如何在win10系统下关闭系统还原,内容包括win10系统怎么关闭系统还原功能,win10系统怎么关闭系统还原,升级完win10怎么关闭还原系统。操作方法: 鼠标右键“计算机”,在弹出的对话框中,点击“属性”按钮。 2、紧接着在弹出的对

win10

win10如何清空

阅读(69)

本文主要为您介绍win10如何清空,内容包括WIN10怎样清理应用缓存,win10应用商店没下载玩的东西怎么删除?爱问,如何清理Win10系统硬盘空间提高系统运行速度?。Windows 10系统自带有两个浏览器:Edge浏览器和IE浏览器Edge浏览器清理缓存的步骤如

win10

win10如何使用邮件

阅读(84)

本文主要为您介绍win10如何使用邮件,内容包括win10邮件功能怎么用,win10怎样设置和使用邮件应用,win10邮件应用怎么用win10正式版内置邮件使用方法。win10邮件功能使用方法:打开邮件应用,可以在开始菜单中找以它,如果邮件应用的磁贴没有在应用

win10

如何共享打印机到多台电脑上win10

阅读(86)

本文主要为您介绍如何共享打印机到多台电脑上win10,内容包括如何共享打印机到另外一台电脑win10,WIN10系统多个不同网络的电脑怎么共享打印机?,windows10怎么共享打印机。朋友,你好:这个完全没有问题,但前提是这二台电脑在同一个IP段内,也就是

win10

win10如何给文件上密码是什么格式的

阅读(102)

本文主要为您介绍win10如何给文件上密码是什么格式的,内容包括Win10系统怎么给文件或文件夹加密,win10怎么给文件夹设置密码,win10怎么给文件夹设置密码。Win10系统给文件或文件夹加密步骤如下:找到并右击需要加密的文件或文件,然后选择“属

win10

win10如何分屏打英雄联盟

阅读(75)

本文主要为您介绍win10如何分屏打英雄联盟,内容包括win10刚刷的系统,分屏玩其他游戏没一点是就是玩LOL就一直闪黑,w10系统玩英雄联盟打字卡怎么版?都快叫气死了一玩游戏就卡 妈的,win10分屏可以多开lol吗。您好,玩游戏的话除了网速和服务器