บ่อยครั้ง ฟอร์มผู้ใช้ เราสร้างได้ค่อนข้างใหญ่และมีข้อมูลจำนวนมากในที่เล็กๆ การมีทั้งหมดไว้ในที่แคบอาจขัดขวางความชัดเจนของแบบฟอร์มผู้ใช้ . หากคุณอยากรู้ว่าจะแสดง ฟอร์มผู้ใช้ . ได้อย่างไร แบบเต็มหน้าจอใน Excel โดยใช้ VBA บทความนี้อาจมีประโยชน์สำหรับคุณ ในบทความนี้ เราจะพูดถึงวิธีแสดง ฟอร์มผู้ใช้ แบบเต็มหน้าจอใน Excel โดยใช้ VBA พร้อมคำอธิบายอย่างละเอียด
ดาวน์โหลดสมุดแบบฝึกหัดด้านล่างนี้
4 วิธีง่ายๆ ในการแสดง Userform แบบเต็มหน้าจอโดยใช้ VBA ใน Excel
เราจะใช้ชุดข้อมูลด้านล่างเพื่อสาธิตวิธีแสดง แบบฟอร์มผู้ใช้ แบบเต็มหน้าจอโดยใช้ Excel VBA ไฟล์ต้องถูกบันทึกใน xlsm รูปแบบแทน xlsx . ปกติ รูปแบบ
1. การใช้ xlMaximized
เราจะใช้ VBA . ด้านล่าง รหัสที่จะ แสดง แบบฟอร์มผู้ใช้ ใน เต็มหน้าจอ โดยไม่ต้องยุ่งยาก
ขั้นตอน
- เริ่มต้นโดยคลิกที่ นักพัฒนา แท็บ จากนั้นเลือก Visual Basic .
- เมื่อคุณเปิด Visual Basic . แล้ว หน้าต่าง ให้คลิกที่ แทรก .
- ในขั้นตอนถัดไป เลือก แบบฟอร์มผู้ใช้ จากเมนูแบบเลื่อนลง
- กล่องหน้าต่างสี่เหลี่ยมจะปรากฏขึ้นหลังจากนั้น
- ใน คุณสมบัติ คุณสามารถเปลี่ยนชื่อและคำบรรยายของหน้าต่างนั้นได้
- และนี่คือช่องสำหรับใช้ Userform คุณสามารถเพิ่มรูปร่าง ปุ่ม ช่องทำเครื่องหมาย ฯลฯ และเชื่อมโยงกับแผ่นงานได้
- จากนั้นดับเบิลคลิกที่ช่องนั้น
- และคุณจะสังเกตเห็นว่ามีหน้าต่างตัวแก้ไข ในหน้าต่างตัวแก้ไขนั้น ให้วางโค้ดด้านล่าง
Private Sub UserForm_Activate()
Application.WindowState = xlMaximized
With Application
Me.Top = .Top
Me.Left = .Left
Me.Height = .Height
Me.Width = .Width
End With
End Sub
- ทันทีที่คุณป้อนรหัส คลิก บันทึก ไอคอนแล้วคลิกสองครั้งที่ ฟอร์มผู้ใช้
- จะพาคุณไปที่ ฟอร์มผู้ใช้ main หลัก กล่องอีกครั้ง
- ตอนนี้เพื่อจุดประสงค์ในการอธิบาย ให้เพิ่มองค์ประกอบบางอย่างใน แบบฟอร์มผู้ใช้
- เราได้เพิ่ม กล่องข้อความ และปุ่มคำสั่ง พร้อมช่องใส่ของ
- จากนั้นคลิกที่ เรียกใช้ ปุ่มที่แสดงในภาพ
- คลิกที่ เรียกใช้ คำสั่ง เราจะเห็น Userform
- หลัง ฟอร์มผู้ใช้ ถูกดำเนินการ เราจะเห็นได้ว่า ฟอร์มผู้ใช้ ตอนนี้ใช้พื้นที่เต็มของหน้าจอ ดังแสดงในภาพด้านล่าง
🔎 รายละเอียดโค้ด VBA
- ขั้นแรก เราเลือก แบบฟอร์มผู้ใช้ เป็นวัตถุและ เปิดใช้งาน ตามขั้นตอน
- ในบรรทัดถัดไป WindowState จะแสดงสภาพหน้าต่างของแอปพลิเคชันที่กำลังทำงานอยู่ในขณะนี้ การตั้งค่าเงื่อนไขของบรรทัดคำสั่งนี้เป็น xlMaximized จะขยายหน้าต่างแอปพลิเคชันให้ใหญ่สุด
- ในบรรทัดถัดไป เราเลือกหน้าต่างแอปพลิเคชัน
- จากนั้นเราป้อน 4 บรรทัดแยกกัน ซึ่งทั้งหมดนี้จะทำให้หน้าต่างขยายใหญ่สุดในทิศทางบน ล่าง ซ้าย และขวา
- สุดท้าย สิ้นสุดขั้นตอนย่อยของโค้ด
2. การปรับความสูงและความกว้าง
เราจะใช้ VBA . ด้านล่าง รหัสที่จะ แสดง แบบฟอร์มผู้ใช้ ใน เต็มหน้าจอ โดยไม่ต้องยุ่งยาก
ขั้นตอน
- เริ่มต้นโดยคลิกที่ นักพัฒนา แท็บ จากนั้นเลือก Visual Basic .
- เมื่อคุณเปิด Visual Basic . แล้ว หน้าต่าง ให้คลิกที่ แทรก .
- ในขั้นตอนถัดไป เลือก แบบฟอร์มผู้ใช้ จากเมนูแบบเลื่อนลง
- กล่องหน้าต่างสี่เหลี่ยมจะปรากฏขึ้นหลังจากนั้น
- ใน คุณสมบัติ คุณสามารถเปลี่ยนชื่อและคำบรรยายของหน้าต่างนั้นได้
- และนี่คือช่องสำหรับใช้ Userform คุณสามารถเพิ่มรูปร่าง ปุ่ม ช่องทำเครื่องหมาย ฯลฯ และเชื่อมโยงกับแผ่นงานได้
- จากนั้นดับเบิลคลิกที่ช่องนั้น
- และคุณจะสังเกตเห็นว่ามีหน้าต่างตัวแก้ไข ในหน้าต่างตัวแก้ไขนั้น ให้วางโค้ดด้านล่าง
Private Sub UserForm_Activate()
Me.Height = Application.Height
Me.Width = Application.Width
Me.Left = Application.Left
Me.Top = Application.Top
End Sub
Private Sub UserForm_Click()
End Sub
Private Sub UserForm_Initialize()
Application.WindowState = xlMaximized
End Sub
- ทันทีที่คุณป้อนรหัส คลิก บันทึก ไอคอนแล้วคลิกสองครั้งที่ ฟอร์มผู้ใช้
- จะพาคุณไปที่ ฟอร์มผู้ใช้ main หลัก กล่องอีกครั้ง
- ตอนนี้เพื่อจุดประสงค์ในการอธิบาย ให้เพิ่มองค์ประกอบบางอย่างใน แบบฟอร์มผู้ใช้ หน้าต่าง เราได้เพิ่ม กล่องข้อความ และปุ่มคำสั่ง พร้อมช่องใส่ของ
- จากนั้นคลิกที่ เรียกใช้ ปุ่มที่แสดงในภาพ
- คลิกที่ เรียกใช้ คำสั่ง เราจะเห็น Userform
- หลัง ฟอร์มผู้ใช้ ถูกดำเนินการ เราจะเห็นได้ว่า ฟอร์มผู้ใช้ ตอนนี้ใช้พื้นที่เต็มของหน้าจอ ดังแสดงใน ภาพ ด้านล่าง
🔎 รายละเอียดโค้ด VBA
- ขั้นแรก เราเลือก แบบฟอร์มผู้ใช้ เป็นวัตถุและ เปิดใช้งาน ตามขั้นตอน
- ใน 4 บรรทัดถัดไป จะใช้ความสูง ความกว้าง ด้านซ้าย และด้านขวาของหน้าต่าง และเก็บไว้เป็น ความสูง , Me.Width , ฉันซ้าย , Me.Top
- จากนั้นเราจะสิ้นสุดขั้นตอนย่อยของโค้ด
- ขั้นแรก เราเลือก แบบฟอร์มผู้ใช้ เป็นวัตถุและ เริ่มต้น ตามขั้นตอน
- จากนั้นบรรทัดถัดไปจะเพิ่มค่าที่เก็บไว้ของหน้าต่างให้สูงสุดในทุกทิศทาง ซึ่งจะส่งผลให้หน้าต่างขยายใหญ่สุดแบบเต็มหน้าจอ ทั้งหมดนี้จะทำให้หน้าต่างขยายใหญ่สุดในทิศทางบน ล่าง ซ้าย และขวา .
- สุดท้าย เราสิ้นสุดขั้นตอนย่อยของโค้ด
3. การใช้กับคำชี้แจง
รหัส VBA ที่แสดงด้านล่างจะเปลี่ยน ฟอร์มผู้ใช้ . ขนาดเล็ก หน้าต่างเป็น เต็มหน้าจอ หน้าต่าง
ขั้นตอน
- เริ่มต้นโดยคลิกที่ นักพัฒนา แท็บ จากนั้นเลือก Visual Basic .
- เมื่อคุณเปิด Visual Basic . แล้ว หน้าต่าง ให้คลิกที่ แทรก .
- ในขั้นตอนถัดไป เลือก แบบฟอร์มผู้ใช้ จากเมนูแบบเลื่อนลง
- กล่องหน้าต่างสี่เหลี่ยมจะปรากฏขึ้นหลังจากนั้น
- ใน คุณสมบัติ คุณสามารถเปลี่ยนชื่อและคำบรรยายของหน้าต่างนั้นได้
- และนี่คือช่องสำหรับใช้ Userform คุณสามารถเพิ่มรูปร่าง ปุ่ม ช่องทำเครื่องหมาย ฯลฯ และเชื่อมโยงกับแผ่นงานได้
- จากนั้นดับเบิลคลิกที่ช่องนั้น
- และคุณจะสังเกตเห็นว่ามีหน้าต่างตัวแก้ไข ในหน้าต่างตัวแก้ไขนั้น ให้วางโค้ดด้านล่าง
Private Sub UserForm_Initialize()
With Fullscreen_form_3
.Height = Application.Height
.Width = Application.Width
End With
End Sub
- ทันทีที่คุณป้อนรหัส คลิก บันทึก ไอคอนแล้วคลิกสองครั้งที่ ฟอร์มผู้ใช้
- จะพาคุณไปที่ ฟอร์มผู้ใช้ main หลัก กล่องอีกครั้ง
- ตอนนี้เพื่อจุดประสงค์ในการอธิบาย ให้เพิ่มองค์ประกอบบางอย่างใน ฟอร์มผู้ใช้
- เราได้เพิ่ม กล่องข้อความ และปุ่มคำสั่ง ด้วย กล่องอินพุต .
- จากนั้นคลิกที่ เรียกใช้ ปุ่มที่แสดงในภาพ
- คลิกที่ เรียกใช้ คำสั่ง เราจะเห็น Userform
- หลัง ฟอร์มผู้ใช้ ถูกดำเนินการ เราจะเห็นได้ว่า ฟอร์มผู้ใช้ ตอนนี้ใช้พื้นที่เต็มของหน้าจอ ตามที่แสดงใน ภาพ
🔎 รายละเอียดโค้ด VBA
- ขั้นแรก เราเลือก แบบฟอร์มผู้ใช้ เป็นวัตถุและ เริ่มต้น ตามขั้นตอน
- เราจะเลือกหน้าต่างแอปพลิเคชัน Userform ในบรรทัดถัดไป
- จากนั้นเราบันทึกความสูงและความกว้างของแอปพลิเคชันใน .Height และ ความกว้าง
- สุดท้าย เราสิ้นสุดขั้นตอนย่อยของโค้ด
4. การใช้ตัวแปร
VBAต่อไปนี้ รหัสขยาย ฟอร์มผู้ใช้ . ขนาดเล็ก แผงเพื่อครอบครองเต็มหน้าจอ .
ขั้นตอน
- เริ่มต้นโดยคลิกที่ นักพัฒนา แท็บ จากนั้นเลือก Visual Basic .
- เมื่อคุณเปิด Visual Basic . แล้ว หน้าต่าง ให้คลิกที่ แทรก .
- ในขั้นตอนถัดไป เลือก แบบฟอร์มผู้ใช้ จากเมนูแบบเลื่อนลง
- กล่องหน้าต่างสี่เหลี่ยมจะปรากฏขึ้นหลังจากนั้น
- ใน คุณสมบัติ คุณสามารถเปลี่ยนชื่อและคำบรรยายของหน้าต่างนั้นได้
- และนี่คือช่องสำหรับใช้ Userform คุณสามารถเพิ่มรูปร่าง ปุ่ม ช่องทำเครื่องหมาย ฯลฯ และเชื่อมโยงกับแผ่นงานได้
- จากนั้นดับเบิลคลิกที่ช่องนั้น
- และคุณจะสังเกตเห็นว่ามีหน้าต่างตัวแก้ไข ในหน้าต่างตัวแก้ไขนั้น ให้วางโค้ดด้านล่าง
Private Sub UserForm_Initialize()
Dim xlws As XlWindowState
xlws = Application.WindowState
Application.WindowState = xlMaximized
With Fullscreen_form_4
.Top = Application.Top
.Left = Application.Left
.Width = Application.Width
.Height = Application.Height
.Show
End With
Application.WindowState = xlws
End Sub
- ทันทีที่คุณป้อนรหัส คลิก บันทึก ไอคอนแล้วคลิกสองครั้งที่ ฟอร์มผู้ใช้
- จะพาคุณไปที่ ฟอร์มผู้ใช้ main หลัก กล่องอีกครั้ง
- ตอนนี้เพื่อจุดประสงค์ในการอธิบาย ให้เพิ่มองค์ประกอบบางอย่างใน แบบฟอร์มผู้ใช้
- เราได้เพิ่ม กล่องข้อความ และปุ่มคำสั่ง ด้วย กล่องอินพุต .
- จากนั้นคลิกที่ เรียกใช้ ปุ่มที่แสดงในภาพ
- คลิกที่ เรียกใช้ คำสั่ง เราจะเห็น Userform กำลังดำเนินการ
- หลัง ฟอร์มผู้ใช้ ถูกดำเนินการ เราจะเห็นได้ว่า ฟอร์มผู้ใช้ ตอนนี้ใช้พื้นที่เต็มของหน้าจอ ตามที่แสดงใน ภาพ
🔎 รายละเอียดโค้ด VBA
- ขั้นแรก เราเลือก แบบฟอร์มผู้ใช้ เป็นวัตถุและ เริ่มต้น ตามขั้นตอน
- ในบรรทัดถัดไป เราจะประกาศ xlws เป็นตัวแปรสำหรับ XlWindowState ชนิด
- ในบรรทัดถัดไป WindowState จะแสดงสภาพหน้าต่างของแอปพลิเคชันที่กำลังทำงานอยู่ในขณะนี้ และเราใส่ xlws เป็นเงื่อนไขของหน้าต่างปัจจุบัน
- การตั้งค่าเงื่อนไขของ WindowState บรรทัดคำสั่งเป็น xlMaximized จะขยายหน้าต่างแอปพลิเคชันให้ใหญ่สุด
- ในบรรทัดถัดไป เราเลือกหน้าต่างแอปพลิเคชัน
- จากนั้นเราป้อน 4 บรรทัดแยกกัน ซึ่งทั้งหมดนี้จะทำให้หน้าต่างขยายใหญ่สุดในทิศทางบน ล่าง ซ้าย และขวา
- สุดท้าย สิ้นสุดขั้นตอนย่อยของโค้ด
บทสรุป
โดยสรุปแล้ว ประเด็นที่ว่าเราจะแสดง Userform . ได้อย่างไร เต็มหน้าจอมีคำตอบที่นี่โดย VBA Macro 4 แบบที่แตกต่างกัน ตัวอย่างโค้ด แม้ว่ารหัสจะค่อนข้างมีประสิทธิภาพเวลา VBA Macro เมธอดต้องใช้ที่เกี่ยวข้องกับ VBA . ก่อนหน้า ความรู้ที่จะเข้าใจตั้งแต่เริ่มต้น
สำหรับปัญหานี้ มีการแนบสมุดงานที่เปิดใช้งานมาโครซึ่งคุณสามารถฝึกวิธีการเหล่านี้ได้
อย่าลังเลที่จะถามคำถามหรือข้อเสนอแนะใด ๆ ผ่านส่วนความคิดเห็น ข้อเสนอแนะใด ๆ สำหรับการปรับปรุง Exceldemy ชุมชนจะได้รับการชื่นชมอย่างมาก