Page 1 of 1
การทำ Option botton โดยใช้เงื่อนไข
Posted: Wed Mar 19, 2014 10:34 am
by aumpajaree
อยากสอบถามการใช้ การทำ Option botton ในแบบฟอร์มหัวข้อ ขึ้นทะเบียน แก้ไข ยกเลิก ควบคุม ไม่ควบคุม ให้มีค่าเท่ากับ 1 และนำค่านั้นใส่ใน Sheet data รบกวนอาจาร์ยช่วยหน่อยค่ะ (มือใหม่)
ขอบคุณค่ะ
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Wed Mar 19, 2014 8:40 pm
by snasui
ช่วยอธิบายมาว่า Code ชื่ออะไร อยู่ Module ใด ติดขัดบรรทัดใด ค่าที่ทดสอบคือค่าใดบ้าง ทดสอบแล้วต้องให้แสดงผลเป็นอยางไร จะได้เข้าใจตรงกันครับ
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Thu Mar 20, 2014 8:02 am
by aumpajaree
code ชื่อ dcc_100 จะให้มีค่าเท่ากับ 1 เมื่อเราคลิกเลือกค่ะ และไปแสดงค่าที่คอลลัมที่ e5 คือหนู จะเขียนสูตรตรง cmdSave แต่เริ่มไม่ถูกค่ะ รบกวนอาจารย์ด้วยค่ะ
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Thu Mar 20, 2014 5:54 pm
by snasui
ช่วยตอบตามที่ผมถามครับ
ค่าทดสอบคืออะไร คลิกปุ่มใด จะได้เข้าถึงปัญหาได้โดยไวครับ
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Thu Mar 20, 2014 8:07 pm
by aumpajaree
ถ้าติ๊ก dcc_100 = 1 โดยบันทึกค่าที่กำหนดลงใน worksheet "data" ที่ คอลัม 5
dcc_200 = 1 โดยบันทึกค่าที่กำหนดลงใน worksheet "data" ที่ คอลัม 6
dcc_300 = 1 โดยบันทึกค่าที่กำหนดลงใน worksheet "data" ที่ คอลัม 7
dcc_400 = 1 โดยบันทึกค่าที่กำหนดลงใน worksheet "data" ที่ คอลัม 8
dcc_500 = 1 โดยบันทึกค่าที่กำหนดลงใน worksheet "data" ที่ คอลัม 9
ต้องรบกวนอาจารย์ชี้แนะด้วยค่ะ ควรเขียนโค๊ดอย่างไรค่ะ
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Thu Mar 20, 2014 8:52 pm
by snasui
ลองดูตัวอย่าง Code ตามด้านล่างครับ
Code: Select all
Private Sub dcc_100_Click()
Dim row As Long
Sheets("data").Select
row = ActiveSheet.Range("a" & Rows.Count).End(xlUp).row + 1
If dcc_100.Value = True Then
ActiveSheet.Cells(row, 5) = "1"
Else
ActiveSheet.Cells(row, 5) = ""
End If
End Sub
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Thu Mar 20, 2014 9:45 pm
by aumpajaree
ขอบคุณมากๆค่ะ
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Fri Mar 21, 2014 8:48 am
by aumpajaree
อาจารย์ค่ะ พอใส่โค๊ดที่อาจารย์แนะนำ เมื่อ ติ๊กมันไม่แสดง 1 ค่ะ ตามเอกสารแนบ รบกวนอาจารย์แนะนำหน่อยค่ะ
Re: การทำ Option botton โดยใช้เงื่อนไข
Posted: Fri Mar 21, 2014 9:20 am
by aumpajaree
อาจารย์ค่ะ ดิฉันลองทำอีกครั้งได้แล้วค่ะ ขอบคุณอีกครั้งค่ะ >.<