ค้นหาจากฟอร์มแล้วจึงทำการแก้ไขแต่ทำไม่ได้
Posted: Mon Sep 26, 2011 10:12 am
ค้นหาจากฟอร์มแล้วจึงทำการแก้ไขแต่ทำไม่ได้
เรียนอาจาร์ยครับ
คือผมสร้างฟอร์มค้นหาขึ้นมา หลังจากทำการค้นหาแล้วต้องการแก้ไข แต่ทำไม่ได้
สาเหตุเพราะ ในฟอร์มไป เชื่อมโยงกับ excle
อยากถามว่า ให้มันสั่งค้นหาไปก่อนได้ไหม จากนั้นถ้าคลิกบ๊อกไหนก็ให้บ๊อกนั้นทำงานไป
หรืออาจาร์ยมีข้อแนะนำอย่างอื่น
ผมได้แนบไฟล์มาให้ดูด้วยครับ
ขั้นตอนคือ
1.คลิกค้นหาในหน้า "ฐานข้อมูลล่วงเวลา" ฟอร์มจะแสดงออกมา
2.จากนั้นคลิกเลือกลำดับที่ ข้อมูลจะแสดงออกมา ปกติ
แต่ถ้าเพิ่มโค้ดนี้เข้า ข้อมูลที่ออกมาจะไม่ครบ
เรียนอาจาร์ยครับ
คือผมสร้างฟอร์มค้นหาขึ้นมา หลังจากทำการค้นหาแล้วต้องการแก้ไข แต่ทำไม่ได้
สาเหตุเพราะ ในฟอร์มไป เชื่อมโยงกับ excle
อยากถามว่า ให้มันสั่งค้นหาไปก่อนได้ไหม จากนั้นถ้าคลิกบ๊อกไหนก็ให้บ๊อกนั้นทำงานไป
หรืออาจาร์ยมีข้อแนะนำอย่างอื่น
ผมได้แนบไฟล์มาให้ดูด้วยครับ
ขั้นตอนคือ
1.คลิกค้นหาในหน้า "ฐานข้อมูลล่วงเวลา" ฟอร์มจะแสดงออกมา
2.จากนั้นคลิกเลือกลำดับที่ ข้อมูลจะแสดงออกมา ปกติ
แต่ถ้าเพิ่มโค้ดนี้เข้า ข้อมูลที่ออกมาจะไม่ครบ
Code: Select all
Private Sub CobBox15_Change()
Sheets("ฐานข้อมูลล่วงเวลา").Select
Range("K6").Select
Do While Not IsEmpty(ActiveCell.Value)
CobBox15.AddItem ActiveCell.Value
ActiveCell.Offset(1, 0).Select
Loop
End Sub