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
:D 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
:D เหมือนไฟล์ที่แนบมาล่าสุดจะมีปัญหา 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
:D ตัวอย่างการปรับ 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