请问如何在excel中实现只打印奇数页或者偶数页?
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/07/04 21:50:26
请问如何在excel中实现只打印奇数页或者偶数页?
![请问如何在excel中实现只打印奇数页或者偶数页?](/uploads/image/z/2199927-39-7.jpg?t=%E8%AF%B7%E9%97%AE%E5%A6%82%E4%BD%95%E5%9C%A8excel%E4%B8%AD%E5%AE%9E%E7%8E%B0%E5%8F%AA%E6%89%93%E5%8D%B0%E5%A5%87%E6%95%B0%E9%A1%B5%E6%88%96%E8%80%85%E5%81%B6%E6%95%B0%E9%A1%B5%3F)
Sub PrintOddPage()
Dim TotalPg As Integer
TotalPg = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For i = 1 To TotalPg Step 2
ActiveSheet.PrintOut From:=i,To:=i
Next
End Sub
这个是宏.是打印奇数页的.把For i = 1 To TotalPg Step 2改为For i = 2 To TotalPg Step 2就变为打印偶数页了.
Dim TotalPg As Integer
TotalPg = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For i = 1 To TotalPg Step 2
ActiveSheet.PrintOut From:=i,To:=i
Next
End Sub
这个是宏.是打印奇数页的.把For i = 1 To TotalPg Step 2改为For i = 2 To TotalPg Step 2就变为打印偶数页了.
请问如何在excel中实现只打印奇数页或者偶数页?
EXCEL怎么设置奇数页打印和偶数页打印
如何在word2003中打印偶数页
Excel表格打印怎么设置打印奇数页或偶数页?
在不打开word的情况下,如何批量打印奇数页或偶数页?
excel里的表格怎么打印偶数页或奇数页?请告知详细些.
在excel中如何对321这个数实现奇数(1+3)相加,如果是456则偶数4+6相加
在excel中如何把奇数列和偶数列分开
在excel表格中,有列数据1至100,如何筛选奇数或偶数?
word怎么先打印奇数页再打印偶数页?
word2007无法选择奇数或偶数页打印 如图
excel函数请问一下在EXCEL中如何实现两个日期相减得到天数