Page 1 of 1

ค้นหาจากฟอร์มแล้วจึงทำการแก้ไขแต่ทำไม่ได้

Posted: Mon Sep 26, 2011 10:12 am
by yodpao.b
ค้นหาจากฟอร์มแล้วจึงทำการแก้ไขแต่ทำไม่ได้
เรียนอาจาร์ยครับ
คือผมสร้างฟอร์มค้นหาขึ้นมา หลังจากทำการค้นหาแล้วต้องการแก้ไข แต่ทำไม่ได้
สาเหตุเพราะ ในฟอร์มไป เชื่อมโยงกับ 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

Re: ค้นหาจากฟอร์มแล้วจึงทำการแก้ไขแต่ทำไม่ได้

Posted: Mon Sep 26, 2011 6:53 pm
by snasui
yodpao.b wrote:ค้นหาจากฟอร์มแล้วจึงทำการแก้ไขแต่ทำไม่ได้เรียนอาจาร์ยครับคือผมสร้างฟอร์มค้นหาขึ้นมา หลังจากทำการค้นหาแล้วต้องการแก้ไข แต่ทำไม่ได้สาเหตุเพราะ ในฟอร์มไป เชื่อมโยงกับ excel อยากถามว่า ให้มันสั่งค้นหาไปก่อนได้ไหม จากนั้นถ้าคลิกบ๊อกไหนก็ให้บ๊อกนั้นทำงานไปหรืออาจาร์ยมีข้อแนะนำอย่างอื่น
:? ไม่เข้าใจครับ ช่วยยกตัวอย่างว่าคลิก Control ตัวใด และต้องการให้ทำงานอย่างไร ปกติการคลิกแต่ละ Control ก็สามารถทำงานได้อิสระจากกันอยู่แล้วครับ ถ้าเขียน Code สั่งให้ Control B ถูก Update โดย Control A และ Control C ถูก Update โดย Control B เช่นนี้ก็ต้อง Update ไปพร้อมกันทั้งหมดครับ