รบกวนสอบถาม VBA ใน excel หน่อยค่ะ ไม่แน่ใจว่าพิมพ์อะไรผิดพลาดไปตรงไหนรึป่าวค่ะ
r = cd.FindRow(tblinformation, "A:A", Textpapertyp.Value)
Call cd.update(tblinformation, "tblinformation", "date", Textdate, r)
Call cd.update(tblinformation, "tblinformation", "ponumber", Textponumber, r)
Call cd.update(tblinformation, "tblinformation", "ton", Textton, r)
แต่ว่ารอรันแล้วขึ้นว่า error เป็นสีเหลือตรงโค้ดบรรทัดแรกสุดค่ะ
ขอบคุณมากนะคะ
รบกวนสอบถาม VBA ใน Excel หน่อยค่ะ
r = cd.FindRow(tblinformation, "A:A", Textpapertyp.Value)
Call cd.update(tblinformation, "tblinformation", "date", Textdate, r)
Call cd.update(tblinformation, "tblinformation", "ponumber", Textponumber, r)
Call cd.update(tblinformation, "tblinformation", "ton", Textton, r)
แต่ว่ารอรันแล้วขึ้นว่า error เป็นสีเหลือตรงโค้ดบรรทัดแรกสุดค่ะ
ขอบคุณมากนะคะ