ต้องการให้เมนู Run Code ที่เขียนขึ้นมา
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 328   1
URL.หัวข้อ / URL
ต้องการให้เมนู Run Code ที่เขียนขึ้นมา

ผมมีเมนูที่สร้างด้วย Macro ซึ่งประด้วยด้วย

การจัดการข้อมูล ประด้วยด้วยเมนูย่อย
- บันทึกข้อมูลใหม่ (เปิดฟอร์ม)
- ค้นหาแก้ไข ข้อมูลเก่า (เปิดฟอร์ม)
- สำรองข้อมูลใส่แผ่น Disk (แต่ก่อนเป็นปุ่ม Command Button

มี Code ดังนี้
MsgBox "กรุณาใส่แผ่นเพื่อบันทึกข้อมูล "
If MsgBox("คุณต้องการบันทึกข้อมูลใช่หรือไม่ ? ", vbYesNo) = vbYes Then
'DoCmd.TransferDatabase acExport, "Microsoft Access", "D:\UpdatePer2k\UpdatePer2k.mdb", acTable, "tblUpdatePersonal", "baktblUpdatePersonal"
DoCmd.TransferDatabase acExport, "Microsoft Access", "A:\UpdatePer2k.mdb", acTable, "tblUpdatePersonal", "baktblUpdatePersonal"
MsgBox ("บันทึกข้อมูลลงแผ่นเรียบร้อย")
Else
Exit Sub
End If )

คราวนี้ผมต้องการให้เมนูย่อย สำรองข้อมูล Run Code พวกนี้ได้ผมจะต้องทำอย่างไรครับผม *** Edited by Supap Chaiya *** 2/5/2546 9:27:07

1 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R02653
วิธีที่ 1 สามารถใช้ Macro ได้เลยครับ
วิธีที่ 2 เขียนเป็น Function ไว้ใน Module แล้วในเมนูที่สร้างจาก Macro
ก็ใช้ Action Runcode เรียก Function ที่เขียนไว้มาทำงาน
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.1120s