สร้างคีย์ลัด การนำเข้าที่บันทึกไว้
กระทู้เก่าบอร์ด อ.Yeadram

 1,349   4
URL.หัวข้อ / URL
สร้างคีย์ลัด การนำเข้าที่บันทึกไว้

รบกวนอีกแล้วครับ ต้องขออภัยอย่างสูง ที่ไม่พยายามทำเอง
ผมสร้างการนำเข้าที่บันทึกไว้ ใน access แล้ว เป็นการนำเข้าจาก excel
ทีนี้ อยากจะทำคีย์ลัด หรือปุ่มเรียก เพื่อเก็บใว้หน้าฟอร์มแรก
user จะได้เปิดเฉพาะ ฟอร์มแรก ในการทำงาน

รบกวนขอโค้ด สร้างปุ่มลัดด้วยครับ

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

1 @R21523
อ่านแล้วค่อยข้างจะไม่เข้าใจนะครับ ที่ผมเข้าใจคือสร้าง command button บนฟอร์ม พอคลิกแล้วก็ให้ทำการ import จาก Excel ... ถ้าผมเข้าใจถูกต้อง ก็แปะ command button บนฟอร์ม    กด F4 เพื่อเปิด Property Sheet   ไปที่ tab Event    เลือก [Event Procedure] ในช่อง On Click   แล้วคลิกปุ่ม ... ที่อยู่ท้ายช่อง Access จะเปิด VBA Editor พร้อมชื่อ Procedure   คุณก็เติมคำสั่งที่ใช้ในการ Import ข้อมูลเข้ามาเท่านั้นเองครับ

Private Sub xxx_Click()
   คำสั่ง Import ข้อมูล
End Sub
2 @R21525
ต้องขอโทษ อาจารย์ ด้วยครับ ที่ลงคำถามกำกวม
ที่อาจารย์ อธิบายมาถูกต้องแล้วครับ
อยากสร้าง command button บนฟอร์ม เมื่อคลิกให้ import จาก excel
ทีนี้ ผมได้บันทึกการนำเข้านี้ไว้แล้ว เวลาเรียก กดเมนู "ข้อมูลภายนอก" > "การนำเข้าที่บันทึกไว้" > "เรียกใช้"

ผมลองสร้างจากโค้ดนี้
============================
Private Sub Command22_Click()
On Error GoTo Err_Command22_Click


    DoCmd.TransferText acImportDelim, "StandardInput", "TableItem", "\\ชื่อโฟลเดอร์\ชื่อไฟล์", False

Exit_Command22_Click:
    Exit Sub

Err_Command22_Click:
    MsgBox Err.Description
    Resume Exit_Command22_Click
    
End Sub
========================

ปรากฎว่า ขึ้นเตือนว่า "ไม่มีสเปคข้อความ "StandardInput""
ผมต้องแก้ StandardInput เป็นอะไรดีครับ
3 @R21526
ถ้าเรากด Ctrl-G เพื่อเปิด Immediate Windows แล้วพิมพ์คำสั่ง
DoCmd.TransferText acImportDelim, "StandardInput", "TableItem", "\\ชื่อโฟลเดอร์\ชื่อไฟล์", False
จะขึ้นข้อความที่ว่าไหมครับ

พารามิเตอร์ตัวที่ 2 ของคำสั่งนี้ (ที่คุณใส่ "StandardInput" นั่นแหล่ะครับ) มันต้องการ Import/Export Specification ซึ่งเป็นชื่อที่เราเก็บรายละเอียดที่บ่งบอกว่าจะ Import/Export จากฟิลด์ไหนจากต้นทางไปยังฟิลด์ไหนในปลายทาง ตอนที่เราทำด้วยแมนวล เราจะเห็นหน้าจอสำหรับการกำหนดที่ว่านี้ แต่ถ้าเราไม่ได้ทำเก็บไว้แล้วมันยังทำงานได้ถูกต้อง ก็ให้ละพารามิเตอร์ตัวที่ 2 นี้ไปเลย คำสั่งจะเป็น

DoCmd.TransferText acImportDelim, , "TableItem", "\\ชื่อโฟลเดอร์\ชื่อไฟล์", False
4 @R21530
ขอบคุณอาจาร์ย มากครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3064s