Managing Data with Excel VBA

Managing Data with Excel VBA ตอนที่ 1

วิธีนำรายการใหม่ไปบันทึกเพิ่มต่อท้ายรายการสุดท้ายในตารางฐานข้อมูล

โดยใช้รหัส VBA แค่ 3 บรรทัด
ThisWorkbook.Activate
MyVar = [Source]
[Target] = MyVar

Download ตัวอย่างได้จาก
https://drive.google.com/open?id=0Bxpfgh-rqhIWYXA3VW9GZEtvV0k

=====

Managing Data with Excel VBA ตอนที่ 2

วิธีใช้สูตร Dynamic Range นำรายการใหม่ทั้งหมด กี่รายการก็ได้
ไปบันทึกเพิ่มต่อท้ายรายการสุดท้ายในตารางฐานข้อมูล

โดยใช้รหัส VBA แค่ 3 บรรทัด
ThisWorkbook.Activate
MyVar = [Source]
[Target] = MyVar

Download ตัวอย่างได้จาก
https://drive.google.com/open?id=0Bxpfgh-rqhIWd3U3d1VIc0R6bDg

=====

Managing Data with Excel VBA ตอนที่ 3

วิธีใช้สูตร Dynamic Range แบบ Dynamic Sheet
นำรายการข้อมูลจากแต่ละชีท กี่รายการก็ได้ มารวมไว้เป็นชีทเดียว
โดยบันทึกเพิ่มต่อท้ายรายการสุดท้ายในตารางฐานข้อมูล

คราวนี้มาเพิ่มรหัส MsgBox “Done” เพื่อแสดงผลว่าทำงานเสร็จแล้ว

Download ตัวอย่างได้จาก
https://drive.google.com/open?id=0Bxpfgh-rqhIWN1duSDZ5Wkp3U3c

=====

Managing Data with Excel VBA ตอนที่ 4

วิธีทำให้ Excel สื่อสารบอกให้คุณตัดสินใจก่อนว่า จะทำงานต่อไปหรือไม่
โดยใช้ MsgBox ร่วมกับ IF ใน VBA

Download ตัวอย่างได้จาก
https://drive.google.com/open?id=0Bxpfgh-rqhIWU2JETjJQci1TUkU

=====

Managing Data with Excel VBA ตอนที่ 5

วิธีทำให้ VBA ช่วยตัดสินใจว่าข้อมูลที่บันทึกเป็นรายการใหม่หรือรายการเก่า
ถ้าเป็นรายการใหม่ ให้บันทึกเพิ่มต่อท้ายรายการสุดท้ายในตารางฐานข้อมูล
ถ้าเป็นรายการเก่า ให้บันทึกทับรายการเดิมที่มีอยู่แล้วในตารางฐานข้อมูล
โดยใช้ชื่อ Target ชื่อเดิมชื่อเดียวแต่ย้ายตำแหน่งตามเงื่อนไขได้เอง

หมายเหตุ วิดีโอนี้อัดตอนฝนตกครับ
ขอแก้ตอนที่ 6 เป็นตอนที่ 5 ด้วยครับ ฟังเสียงฝนเพลินไปหน่อย

Download ตัวอย่างได้จาก
https://drive.google.com/open?id=0Bxpfgh-rqhIWVWU2Rnhnb2YzWjQ