การบันทึกข้อมูลลง Database ด้วย VBA

/ VBA Tips / By

⌨ ผู้ใช้งาน Excel ส่วนใหญ่มักจะมีปัญหาการนำข้อมูลไปจัดเก็บไว้เป็นฐานข้อมูลหรือ Database เพื่อให้เกิดความสะดวกในการนำข้อมูลมาใช้งานในภายหลัง ซึ่งการจัดเก็บข้อมูลลง Database นั้นไม่สามารถทำได้ด้วยสูตร จำเป็นต้องพึ่งพา VBA เข้ามาจัดการ ?

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

Sub RecordData()
    With Sheets("Database")
        With .Range("b" & .Rows.Count).End(xlUp).Offset(1, 0)
            If IsNumeric(.Offset(-1, -1)) Then
                .Offset(0, -1).Value = .Offset(-1, -1).Value + 1
            Else
                .Offset(0, -1).Value = 1
            End If
            .Resize(, 4).Value = Sheets("Form").Range("a2:d2").Value
        End With
    End With
End Sub

📹 Vidio แสดงการบันทึกข้อมูลง Database ด้วย VBA

🧭 Timeline หัวข้อหลัก

  • 00:00:24 ปัญหา: ต้องการบันทึกข้อมูลจากฟอร์มลงฐานข้อมูล
  • 00:00:50 แนวทางแก้ไข: ใช้ VBA แทนสูตรเพื่อจัดเก็บข้อมูล
  • 00:01:07 สร้างปุ่มกดเพื่อเรียกใช้งาน Procedure
  • 00:01:47 เขียนโค้ด VBA เพื่อบันทึกข้อมูลจาก Range A2:D2
  • 00:03:15 ตรวจสอบลำดับรายการก่อนบันทึก: ถ้าเป็นตัวเลข → +1
  • 00:04:10 นำข้อมูลไปวางในชีต “Database” แบบต่อเนื่อง
  • 00:05:00 สรุป: ได้ระบบบันทึกข้อมูลพร้อมลำดับรายการอัตโนมัติ
Scroll to Top