Page 1 of 1
สอบถามการเขียน vba ให้ checkbox ไม่แสดงครับ
Posted: Sun Oct 07, 2018 12:23 pm
by tulkavin
สวัสดีครับ ผมรบกวนสอบถามการเขียน vba ให้ checkbox ไม่แสดงครับ
เงื่อนไขคือ เปิดไฟล์มาแล้วให้ check box กับ option button บางอันไม่แสดงเลยครับ เช่นตามไฟล์แนบเปิดมาแล้วจะเห็นด้านล่างมี checkbox option button หลายอัน แสดงอยู่ครับ ต้องการให้เหล่านั้นหายไป
หลังจากกรอกข้อมูลบุคคลครบแล้วกดปุ่มเช็คข้อมูลถูกต้องแล้วถึงจะแสดง check box , option button ออกมาครับ
ขอบคุณครับ
แนบไฟล์มาด้วยแล้วครับ
Re: สอบถามการเขียน vba ให้ checkbox ไม่แสดงครับ
Posted: Sun Oct 07, 2018 12:32 pm
by snasui
Object พวกนั้นอยู่ในชีตไหน กรุณาระบุให้ถึงชีตและเซลล์จะได้เข้าถึงข้อมูลได้ทันทีครับ
ปุ่ม Check ข้อมูลอยู่ตำแหน่งไหน เดิมเขียน Code ไว้ว่าอย่างไร จะได้เขียนต่อไปจากนั้นครับ
Re: สอบถามการเขียน vba ให้ checkbox ไม่แสดงครับ
Posted: Sun Oct 07, 2018 6:49 pm
by tulkavin
Object อยู่ใน Sheet1 ครับ
ปุ่ม Check ข้อมูล อยู่ตำแหน่ง K11 ครับ
เดิมเขียนโค้ดไว้ว่า เปิดไฟล์แล้ว sheet1.activate ครับ
ต่อมา สั่งให้ข้อมูลใบเสนอราคาย่อให้หมด ให้เช็คข้อมูลของลูกค้าก่อนว่ากรอกครบถ้วนรึป่าว ถ้าครบถึงจะแสดงส่วนข้อมูลใบเสนอราคาที่เลือกไว้ให้กรอกครับ หากไม่ครบขึ้น msgbox "กรุณากรอกข้อมูลให้ครบครับ"
Re: สอบถามการเขียน vba ให้ checkbox ไม่แสดงครับ
Posted: Sun Oct 07, 2018 7:42 pm
by snasui
เหมือนไฟล์ที่แนบมาล่าสุดจะมีปัญหา Workbook_Open ไม่ทำงานครับ
Re: สอบถามการเขียน vba ให้ checkbox ไม่แสดงครับ
Posted: Sun Oct 07, 2018 9:51 pm
by tulkavin
ผมลองแนบไฟล์มาให้ใหม่ครับ // ขอบคุณครับ
Re: สอบถามการเขียน vba ให้ checkbox ไม่แสดงครับ
Posted: Sun Oct 07, 2018 10:43 pm
by snasui
ตัวอย่างการปรับ Code ครับ
Code: Select all
Private Sub Workbook_Open()
With Worksheets("Sheet1")
.Activate
Set poolzone = .Range("A14:A80")
poolzone.EntireRow.Hidden = True
End With
End Sub