Page 1 of 1

ขอความกรุณาให้อาจารย์แก้ไขปัญหาครับ

Posted: Mon Feb 14, 2011 11:19 pm
by Panuwat
เรียนท่านอาจารย์ช่วยแก้ไขปัญหาด้านการใช้ปุ่ม commandbutton เกี่ยวกับ การ Enabled และ visible ทั้งนี้ได้แนบไฟล์ มาเพื่อประกอบการพิจารณา ด้วยครับ

Re: ขอความกรุณาให้อาจารย์แก้ไขปัญหาครับ

Posted: Tue Feb 15, 2011 7:06 am
by snasui
:D ช่วยเขียนหัวข้อตามประเด็นปัญหาด้วยนะครับ เช่น การ Enable, Disable CommandButton เป็นต้น ทั้งนี้เพื่ออำนวยความสะดวกในการค้นหาของเพื่อน ๆ ครับ และหากว่าเป็นคำถามที่ต่อเนื่องมาจากคำถามเดิม สามารถเขียนที่กระทู้เดิมได้เลยครับ ระบบจะยกมาเป็นกระทู้ล่าสุดให้อัตโนมัติตามเวลาที่ Update

สำหรับที่ถามมา สามารถดูตัวอย่างการเขียน Code ตามด้านล่างครับ

Code: Select all

Sub CheckCell()
With Worksheets("Sheet1").CommandButton2
    If Worksheets("Sheet2").Range("B2") = "" Then
    .Enabled = False
    Else
    .Enabled = True
    End If
End With
End Sub
แต่การที่ Code จะทำงานได้นั้น อาจจะนำไปเขียนพ่วงไว้ใน Code อื่นเพื่อให้เรียกใช้ Code นี้ หรือกำหนดว่าต้องการให้เหตุการณ์ใดเกิดขึ้นก่อนแล้วให้ Run Code นี้ สำหรับกรณีหลังเรียกว่า Events เช่นเมื่อคลิก Sheet1 เป็นต้น

Re: ขอความกรุณาให้อาจารย์แก้ไขปัญหาครับ

Posted: Tue Feb 15, 2011 11:55 am
by Panuwat
ทำได้แล้วครับ ขอบคุณมากครับท่านอาจารย์