这是打印奇数页1、3 Dim i As Integer MsgBox "现在打印奇数页", vbOKOnly For i = 1 To 2 ActiveSheet.PrintOut From:=Abs(2 * i) - 1, To:=Abs(2 * i) - 1 Next i 顶一下 (0) 0% 踩一下 (0) 0% 相关评论 我要评论 马上提交