Tip 2^nd : วิธีเปลี่ยนขนาดกระดาษที่แผ่นงานแบบครั้งเดียว

   หากเราต้องการเปลี่ยนขนาดของกระดาษที่แผ่นงานของเราสำหรับการพิมพ์ ก็อาจจะดูน่าเบื่อที่จะต้องมาเปลี่ยนแปลงขนาดในแต่ละแผ่นงาน นี่เป็นวิธีการทำการเปลี่ยนแปลงในสมุดงานทั้งหมดเพียงครั้งเดียว ไม่ว่างานของเราจะมีกี่แผ่นก็ตาม

ตัวอย่าง : คุณมีแผ่นงานทั้งหมด 15 แผ่น และต้องการเปลี่ยนรูปแบบหน้าทุกแผ่น ให้เป็นขนาด
A4 มีวิธีที่รวดเร็วเพื่อให้การเปลี่ยนแปลงตามขั้นตอนเหล่านี้ คือ:

 1. คลิกขวาที่แท็บแผ่นงานใดก็ได้ คุณจะเห็นกรอบรายการคำสั่งปรากฏขึ้น

 2. เลือกไปที่คำสั่ง "เลือกแผ่นงานทั้งหมด (Select All Sheets)" ดังรูป

 3. จากนั้นไปที่แถบเมนูคำสั่ง เลือก "เค้าโครงหน้ากระดาษ (Page Layout)"
 4. เลือก "ขนาด (Size)" (ในที่นี้จะเลือกใช้ขนาดกระดาษ A4)





 5. ในกรณีที่เราต้องการเปลี่ยนขนาดกระดาษ ก็เพียงคลิกขวาที่แท็บแผ่นงานใดก็ได้อีกครั้ง
จะเห็นกรอบรายการคำสั่งปรากฏขึ้น

 6. จากนั้นเลือกคำสั่ง "ยกเลิกจัดกลุ่ม (Ungroup Sheets)"



ทำนองเดียวกัน ขนาดกระดาษที่ตั้งขณะนี้สำหรับแผ่นงานทั้งหมด. มีข้อเสียเปรียบในวิธีนี้เป็นแต่หากแผ่นงานบุคคลมีแตกต่างกันการตั้งค่าการตั้งค่าหน้า (orientations อื่นขอบ, หัว footers, ฯลฯ) จากนั้นทำตามขั้นตอนเหล่านี้จะตั้งพวกเขาทั้งหมดเดียวกัน. ถ้าคุณเพียงต้องการเปลี่ยนขนาดกระดาษ และไม่ต้องการเปลี่ยนการตั้งค่าอื่นๆ

การใช้แมโคร

Sub AllSheetsA4()
Dim sht As Variant

For Each sht In ActiveWorkbook.Sheets
sht.PageSetup.PaperSize = xlPaperA4
Next

End Sub

หมายเหตุ : เคล็ดลับนี้ทำงานร่วมกับ Microsoft Excel 97, Excel 2000, Excel 2002, Excel 2003 และ Excel 2007

 สื่อการสอนออนไลน์ เพื่อการศึกษายุคเทคโนโลยี เรียนรู้แบบไร้ขีดจำกัด
โดย..นายอวิรุทธ์ เหมานุรักษ์ (ครูต่าย) โรงเรียนดรุณานุกูลหัวถนน อ.พรานกระต่าย จ.กำแพงเพชร 62110