Snasui Excel Forum

Posted: **Tue Mar 05, 2013 2:33 pm**

คือผมติดปัญหาตรงที่ไม่สามารถ Copy ข้อมูลมาได้ทั้งหมด
ความต้องการคือต้องการสูตร VBA โดยคำนวนช่อง NO.(B2:B11). ถ้ามีรายการในช่อง NO.(B2:B11) ให้ Copy ไปไว้ใน Database ทั้งหมด ตั้งแต่ช่องเซลล์ (B:M)
เเละในส่วน การลบข้อมูล ไม่สามารถนำมาใส่ใน Texbox ClearFrom ได้
รบกวนอาจารย์ด้วยนะครับ

Posted: **Tue Mar 05, 2013 3:45 pm**

เปลี่ยนจาก

Code: Select all

Set rs = Worksheets("Default").Range("A2:M2")

เป็น

Code: Select all

Set rs = Worksheets("Default").Range("A2:M" & Range("B65536").End(xlUp).Row())

ส่วน Clearข้อมูล
ให้ insert command buttonจาก Active X controls แทน button จาก form controls
แล้วเปลี่ยนชื่อเป็น cmdCLEAR

หรือถ้าจะใช้ button จาก form controls ให้copy code ไปไว้ใน Module

Posted: **Wed Mar 06, 2013 9:04 am**

ได้อย่างที่ต้องการเเล้ว
ขอบคุณมากครับ

Snasui Excel Forum

การบันทึกข้อมูล VBA

การบันทึกข้อมูล VBA

Re: การบันทึกข้อมูล VBA

Re: การบันทึกข้อมูล VBA