แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - isuccess

หน้า: [1]
2
เป็นเหมือนกันครับ ผมก็เลยลองไม่ทำ Primary Key ดูแต่ก็ยังไม่ได้

3
ขอคำแนะนำเรื่องเพิ่ม Table เข้าไปใน queries ไม่ได้ครับ
ไม่รู้เป็นเพราะอะไร ก่อนหน้านี้เคยเพิ่มน่ะครับ ก็เพิ่มเข้าได้ปรกติ
มาวันนี้ผมแก้ไข Table ใหม่ โดยแยกข้อมูล company ออกจาก User
จึงได้ไปลบ ใน Table User ออก แล้วสร้าง Table company ขึ้นมาใหม่
แล้วพอมาเพิ่มใน Queries กลับเพิ่มไม่ได้ อาการที่ไม่ได้เป็นตามรูปที่แนบมาด้วยครับ

ขอบพระคุณครับ


4
ขอบพระคุณอย่างสูงครับที่ได้มอบความรู้ใหม่ๆให้คนที่ยังไม่รู้เช่นกระผม


5
ตั้งกระทู้อันแรกแล้วหาย งง ว่าตัวเองกดผิดหรือเกิดอะไรขึ้น เลยลองตั้งใหม่น่ะครับ ถ้าซ้ำก็ขออภัยอย่างแรงน่ะครับ

ขอออกตัวก่อนน่ะครับ ว่าผมมือใหม่มากใน access เพราะปรกติก็ทำใน excel ครับคิดว่าง่ายดี จนมาวันนี้คิดๆอยู่ว่า
การทำงานของผมขั้นตอนมันซ้ำๆกัน แต่รายละเอียดอาจจะต่างกัน เวลาทำงานที่ต้องเปิดไล้หาข้อมูลต่างๆ เสียเวลามาก
ถึงแม้มี file excel เก่าที่ทำของแต่งานไว้ เวลาจะหาข้อมูลเก่าเนี้ยไม่รู้ว่ามันอยู่ใน เพราะใน excel ก็จะมีหลาย tap มาก
จนคิดได้ว่าถ้าไม่ต้องการหาข้อมูลเก่าๆล่ะแค่อยากได้ เช่น A แต่มันก็จะมี A1 A2 A3 มาให้เลือกเองล่ะ ไม่ต้องไปเปิดข้อมูลหาให้เสียเวลา
ยิ่งนับวันข้อมูลใหม่ๆก็จะมีมาเรื่อย วันข้างหน้ายิ่งทำงานง่ายขึ้น ดังนั้นเลยตั้งใจจะเรียนทำ access ให้ได้ก่อนปีใกม่ เพราะหลังปีใหม่มีงานประจำต้องไปทำแล้ว

ทีนี้ขอเข้าเรื่องเลยน่ะครับ นอกเรื่องที่จะขอคำแนะนำมาตั้งไกล้

1.ใน Form ผมหาผลรวมของ ชุด1 ได้แล้ว แต่ผมรวมมันโดยใช้ text box แต่ไม่รู้ว่าค่าตัวนี้มันไปบันทึกไว้ที่ไหน งง มากครับ เพราะต้องการจะดึงค่าในมาใน report ตามรูปที่แนบมาด้วยเลยน่ะครับ

2. ที่report อยากให้มี drop down list ให้เลือกว่าเราจะเลือกตัวไหนมา report ต้องทำอย่างไรครับ

อนึ่งผมคิดว่าผมยังยึดติดกับหลักการของ excel แน่เลย เลยทำให้ผมยังงงอยู่
ตอนนี้ความเข้าใจของผมคือ
1.table คือสำหรับสร้างฐานข้อมูล input data
2. qry เอา input มาจัดเรียงและสร้างการคำนวนผลของ input data เพื่อทำ form
3. form เพื่อให้หน้าตาในการ input data ง่ายและสะดวกในการใช้งาน
4. report เพื่อแสดงรายการที่ต้องให้แสดงและ print
ไม่รู้ผมเข้าใจตามนี้ถูกต้องหรือเปล่าครับ ถ้า ขาดตกไปหรือ ไม่ถูกต้อง รบกวนช่วยแนะนำผมด้วยน่ะครับ

ขอบพระคุณที่แนะนำครับ

ทั้งนี้ได้แนบรูปและfile มาด้วยนะครับ




6
เปิดฟอร์มใน Design View > กด F4 เพื่อเปิด Property Sheet > เลือก Form ในช่อง Selection Type > คลิกที่แทป Event > เลือก [Event Procedure] ในบรรทัด On Current > คลิปปุ่ม ... ที่อยู่ท้ายบรรทัด > จะเห็น VBA Editor > เอาโค้ดตั้งแต่บรรทัด Dim ... จนถึง End If บรรทัดสุดท้ายใส่ลงใน Private Sub Form_Current()

-
นำไปใช้ได้ผล(เพิ่มเติมตรงหากมีการใส่ค่าลำดับให้ส่งค่ามา)ขอบคุณครับผม :love:



ขอโทษด้วยน่ะครับ ผมมือใหม่มากกกครับ
คือไม่ทราบว่า โค้ดชุดนี้เอาไปวางไว้ตรงไหน ของ Form_Current event procedure ครับ
ขอบพระคุณครับ

ภาพตัวอย่างตาม อ.สันติสุข เลยครับ



ขอบพระคุณครับ

7
หลักการคือ พอขึ้นเรคอร์ดใหม่ปั๊ป ก็เอา "กล่องเป้าหมาย" ของบรรทัดสุดท้ายมาใส่พร้อมบันทึกเรคอร์ดครับ ก็ใส่โค้ดนี้ลงไปใน Form_Current event procedure

โค๊ด: [Select]
Private Sub Form_Current()

    Dim RS As DAO.Recordset
   
    If Me.NewRecord Then
        Set RS = Me.RecordsetClone
        If RS.RecordCount > 0 Then
            RS.MoveLast
            If Not IsNull(RS("ชื่อฟิลด์กล่องเป้าหมาย")) Then
                Me.ชื่อเท็กซ์บ็อกซ์กล่องเป้าหมาย = RS("ชื่อฟิลด์กล่องเป้าหมาย")
                DoCmd.RunCommand acCmdSaveRecord
            End If
        End If
        RS.Close
    End If
           
End Sub

ขอโทษด้วยน่ะครับ ผมมือใหม่มากกกครับ
คือไม่ทราบว่า โค้ดชุดนี้เอาไปวางไว้ตรงไหน ของ Form_Current event procedure ครับ
ขอบพระคุณครับ

หน้า: [1]