สอบถามเพิ่มเติมค่ะ




จากรูปได้สร้างบวกค่า Total W/H Service Charge :ซึ่งได้จากแถวGrand Total Charge บวกกัน

แต่เวลาเปิดหน้าReportมาครั้งแรกค่าช่องTotal W/H Service Charจะไม่ถูกต้อง แต่พอรอสัก1-2วิ ค่าที่ถูกก็รันขึ้นมาเอง
ทีนี้จะต้องนำค่า Total W/H Service Charge ไปอ้างอิงในหน้าถัดไป
ซึ่งถ้าเปิดหน้าReportนี้มาและกดไปหน้าถัดไปเลย จะนำเอาข้อมูลที่ไม่ถูกต้องไปคำนวน (คือค่า49,104,693)

อยากทราบวิธีแก้ไขได้ค่ะ

หลังกดปุ่มUpdate แล้วขึ้นแจ้งเตือนแบบนี้ ถ้าต้องการให้เป็น Yesทุกครั้ง ไม่ต้องการให้กล่องแจ้งเตือนขึ้นมา
ต้องเพิ่มโค้ดส่วนไหนคะ

จากรูปต้องการหาค่า Grand Total ใน Report Footer

Total  คำนวนจาก =Sum([Input])
Total Charge คำนวนจาก =Nz(([Total]*[U Price_2 m^3]),0)    **U Price_2 m^3ในรูปตัวอย่างของGroupนี้ คือค่า98
ต้องการหา Grand Total ซึ่งค่ามาจาก Total Charge ของแต่ละกรุ๊ป รวมกันค่ะ

จากตัวอย่างที่สามารถทำได้ในแถวGrand Total Charge  คือ Sumของแต่ละInput ค่ะ นอกนั้นลองแล้วError หรือรวมค่าไม่ได้ค่ะ

1.Total_ActualDayในฟอร์มจะใช้unbound textbox ชื่อว่า Actualday
เกิดจากการ คำนวนจากฟิวSumOfSumOfTotal(m2)ในตาราง บวกกับ unbound textbox ชื่อว่า ShippingArea (ใส่ค่าเองในฟอร์ม)
2. บนฟอร์ม เอาข้อมูลมาจากตาราง Monthly_FG_Imple_Sum ตรงๆเลยใช่หรือไม่ >>> ใช่ค่ะ
3. ดึงจากตารางมาทุกเรคอร์ด เว้น Type2
**มีDateเป็นPKค่ะ

Update ได้ค่ะ
แต่กลายเป็นว่า Updateทุกวันที่เท่ากันหมดเลย ไม่ได้เก็บตามDateค่ะ

Updateได้ค่ะ แต่ตรงFormDetail ถ้าไปโฟกัส recordไหน มันจะUpdate เฉพาะแถวนั้นค่ะ
มีวิธีUpdate ทั้งหมดไหมคะ

ต้องการUpdate field TOTAL_ActualDay
โดยในหน้าฟอร์ม ใส่เป็นunbound textbox  ชื่อว่าActualday เพื่อนำค่าที่ได้ไปupdateลงตาราง ของแต่ละวัน

ตอนนี้Errorค่ะ
ช่วยดูโค้ดให้หน่อยค่ะ

DoCmd.RunSQL "UPDATE Monthly_FG_Imple_Sum SET [Monthly_FG_Imple_Sum].TOTAL_ActualDay ='" & Me.Actualday & "' WHERE [Monthly_FG_Imple_Sum].Date= " & Me.Date, dbFailOnError

เอะ อยู่ๆก็ได้แล้วค่ะ ใช้Not In ("KPTT","PART")


แต่ปัญหาอยู่ที่ตอนรันMake table ข้อมูลโหลดช้ามาก

มีวิธีไหนแก้ไขให้เร็วขึ้นไหมคะ

ทั้งสองวิธีด้านบนไม่ได้เลยค่ะ