แจกไฟล์ตัวอย่างการบันทึกข้อมูลลงฐานข้อมูล

[snasui]

เป็นไฟล์ตัวอย่างการบันทึกข้อมูลลงฐานข้อมูลพร้อมให้หมายเลขกำกับข้อมูลด้วย VBA ลองดาวน์โหลดไปศึกษากันตามสะดวกครับ

ก่อนใช้ไฟล์ต้องกำหนดให้ใช้งาน Macro ได้ก่อนตามโพสต์นี้ครับ viewtopic.php?f=9&t=2010#p12997

[วังวู ช่ง]

เป็นไฟล์ตัวอย่างการบันทึกข้อมูลลงฐานข้อมูลพร้อมให้หมายเลขกำกับข้อมูลด้วย VBA ลองดาวน์โหลดไปศึกษากันตามสะดวกครับ

ก่อนใช้ไฟล์ต้องกำหนดให้ใช้งาน Macro ได้ก่อนตามโพสต์นี้ครับ viewtopic.php?f=9&t=2010#p12997

very Good

[jaruek]

ขอบคุณมากครับ

[joo]

ขอบคุณครับ

[BTR]

ถ้าทำไม่ถูกกฎ ช่วยแจ้งแนะนำด้วยนะครับ
ผมได้นำตัวอย่างไปใช้งานจริง และต้องการใช้ ปุ่ม End บนคีย์บอร์ด run macro สำหรับชิ้นงานนี้
ผมลองเพิ่มง code เข้าไป ปรากฎว่าไม่สำเร็จครับ
หลังป้อนข้อมูล กดปุ่ม End ไม่เกิดผลใดๆ ข้อมูลไม่จัดเก็บให้ด้วย
เมือคลิกที่ปุ่มบนหน้า sheet ขึ้น complie error: expect end sub

ผมควรแก้ไขตรงไหนบ้างครับ

ขอบคุณล่วงหน้า

assign_fn_key_end_2run_macro_vba.jpg (42.81 KiB) Viewed 15785 times

[DhitiBank]

ขอบคุณอาจารย์มากครับ ขอเอาไปศึกษาครับ

[raweeroge]

ขอบคุณครับ

[maekhun]

ขอบคุณค่ะ

[supattra.s]

ขอบคุณค่ะ

[freedomkira]

สวัดดีครับ ท่านอาจารย์
ผมมีคำถามครับ ผมอยากจะกำหนดให้มันไปโชว์ที่คอลัมม์ อื่นๆโดยให้มันเริ่มนับจาก1แล้ว+1ไปเรื่อยๆได้ไหมครับ พมลองแก้ดูแล้วมันไปชึ้นที่ คอลัมอื่นจริงแต่ไม่ได้นับเลขตั้งแต่1และหลังจากกดบันทึกค่าอีกครั้งมันก็ไม่แสดงต่าต่อจากค่าล่าสุดด้วยครับ ผมได้แนบไฟล์ตัวอย่างมาให้ด้วยนะครับ ขอบคุณล่วงหน้า

[snasui]

ทบทวนประกาศตัวแปร lastRow ให้ถูกต้องตรงกับการใช้ตัวแปรเสียก่อน ซึ่งตัวแปรต้องตรงกันทุกอักขระ หากยังติดปัญหาใดค่อยถามมาใหม่ครับ

[che]

ขอบคุณครับอาจารย์

[slasher]

thank you ครับ

[Parisma]

ขอบคุณมากค่ะ

[nanata]

ขอบคุณมากคับ

[khewty]

สวัสดีครับ อาจารย์

เรียนถาม ว่า จากไฟล์ตัวอย่างนี้ ผมสามารถเพิ่ม คอลัมน์ ดัดแปลงเองได้ไหมครับ เช่น เพิ่มคอลัมน์ รหัสตัวแทน, รหัสลูกค้า หรือ ช่องหมายเหตุ เพิ่ม

[snasui]

เพิ่มได้ตามที่ต้องการ จากนั้นเข้าไปปรับ Code ใหม่เพื่อให้ครอบคลุมถึงคอลัมน์ที่เพิ่มเข้ามาครับ

[saoishi]

ขอบคุณครับ ขอไปลองหน่อยนะครับ

[newyou]

ขอบคุณมากคร้าบ

[Taweelap]

ขอบคุณครับ