สั่งปิด Userform ทั้งหมด

[b5930304629]

สวัสดีค่ะ ปกติเวลาปิดเเค่ Userform เดียวสามารถปิดได้ค่ะแต่ในกรณีนี้คือ ต้องการปิด userform ทั้งหมดที่เปิดมาค่ะ รบกวนช่วยดู code ว่าผิดตรงไหนบ้างคะ

Code: Select all

Private Sub CommandButton2_Click()
Unload UserForm1
Unload UserForm2
Unload UserForm3
End Sub

[snasui]

กรุณาแจ้งค่าที่จะใช้ในการทดสอบ ลำดับการคลิก จะได้ช่วยทดสอบและแนะนำได้ครับ

[b5930304629]

รับทราบค่ะ
1. อันดับแรกผู้ใช้ต้องเลือกค่าใน userfom1
2.จากนั้นเมื่อกดปุ่ม next แล้วจะไปที่หน้า userform2
3. ผู้ใช้ต้องกรอกค่าลงใน userform2 (ต้องกรอกทุก textbox ค่าที่ใช่ทดสอบต้องมากกว่า 1 ค่ะ)
4. เมื่อกรอกค่าเสร็จแล้วให้ผู้ใช้กดปุ่ม call weight
5. ผลที่ได้จะแสดงออกมาในหน้า userform3 (โดยที่ userfom1 และ 2 ยังเปิดอยู่)

เมื่อกดปุ่ม exit แล้ว userform ทุกตัวจะปิดลงค่ะ

[snasui]

ตัวอย่างการปรับ Code ครับ

Code: Select all

Private Sub CommandButton2_Click()
    Unload Me
    Unload UserForm2
    Unload UserForm1
End Sub

[b5930304629]

ทำได้แล้ว ขอบคุณค่ะ