Page 1 of 1
การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 4:05 pm
by jilux
มีปัญหาดังนี้ค่ะ
เมื่อเลือกค่าใน combo box แล้ว
เมื่อกด enter ต้องการให้มัน active ใน cell ถัดไปตามปกติ
แต่ทำไม่ได้ค่ะ เพราะเมื่อเลือกค่าในcombo box แล้วจะต้องใช้ mouse click เลือก cell ถัดไปเอง
มีท่านใดทราบวิธีแก้ไขไหมคะ หรือต้องกำหนดเปลี่ยนค่า properties ตัวไหนใน combo box คะ
Re: การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 5:43 pm
by snasui
แนบไฟล์ตัวอย่างมาด้วยจะได้ช่วยทดสอบให้ได้ครับ
Re: การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 6:13 pm
by jilux
จากตัวอย่างนะคะ สมมติถ้าเอาmouse ไปclick ใน combobox เพื่อพิมพ์รายการที่ต้องการใน list แล้ว
เมื่อกด enter ให้มันเลือกข้อมูลที่ต้องการ แล้วไป select อยู่ที่ cell ไหนก็ได้ค่ะใน excel
แต่ปัญหาคือไม่สามารถกด enter ได้ มันจะต้องใช้ mouse click เท่านั้น แล้วใช้ mouse ไปclick เลือกcell ที่ต้องการต่อไป
Re: การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 7:22 pm
by snasui
การทำเช่นนั้นต้องอาศัย VBA โดยใช้ Event KeyDown ลองเขียนมาเองก่อนตามกฎการใช้บอร์ดข้อ 5 ด้านบนครับ
Re: การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 7:30 pm
by jilux
Re: การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 8:19 pm
by jilux
ทำได้แล้วค่ะ ขอบคุณมากนะคะ เพิ่งรู้จัก event key down ก็วันนี้เลยค่ะ
Code: Select all
Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
Range("g6").Select
End If
End Sub
แบบนี้ก็พอใช้ได้ค่ะ หรือว่ามีแบบอื่นแนะนำไหมคะ^^
Re: การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 8:25 pm
by snasui
ตามกระทู้นี้ไม่มี Event อื่นที่เหมาะเท่ากับ KeyDown ครับ
Re: การกำหนดค่าใน combo boxค่ะ
Posted: Sat Aug 29, 2015 8:29 pm
by jilux
