- Đầu tiên mở file Excel muốn in ra, nhấn Alt+F8, nhập Marco name vào (PrintDoubleSided), xong nhấn nút Create:. - Dán đoạn code này vào rồi save lại Sub PrintDoubleSided()[r]
(1)In trang chẵn lẻ Excel Tuesday, July 2008, 04:21:09
Thủ thuật
"Có gái ngồi xõa tóc bên mèo" hỏi tui: "Sao in trang chẵn lẻ Excel anh?" Ngớ người! Mị chút thấy file doc in trang chẵn lẻ dễ dàng File pdf phần lớn bà dùng Acrobat Reader để xem, chương trình khơng hỗ trợ in chẵn lẻ Khắc phục cách dùng Foxit Reader để xem in tạm ổn Riêng file excel chịu Mới google cách bọn nước ngoài, thấy Bà đọc thấy hay comment cho em phát
- Đầu tiên mở file Excel muốn in ra, nhấn Alt+F8, nhập Marco name vào (PrintDoubleSided), xong nhấn nút Create:
- Dán đoạn code vào save lại Sub PrintDoubleSided()
Dim Totalpages As Long Dim pg As Long
Dim oddoreven As Integer On Error GoTo enditt
Totalpages = ExecuteExcel4Macro("Get.Document(50)") oddoreven = InputBox("Enter for Odd, for Even") For pg = oddoreven To Totalpages Step
ActiveWindow.SelectedSheets.PrintOut from:=pg, To:=pg Next pg
(2)- Chạy marco tạo
- Trong hộp thoại hiển thị, nhấn để in trang lẻ in trang chẵn:
Thủ thuật