451
ห้องสนทนาทั่วไป / >> รับแจ้งปัญหาเว็บบอร์ดครับ
« เมื่อ: 25 เม.ย. 61 , 17:04:03 »ผมจะตั้งกระทู้ ได้อย่างไงครับ พยายามหาวิธีอยู่น่ะครับ
ไปที่ห้องที่ต้องการ แล้วคลิกปุ่ม "เริ่มหัวข้อใหม่"
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.
ผมจะตั้งกระทู้ ได้อย่างไงครับ พยายามหาวิธีอยู่น่ะครับ
DoCmd.RunSQL "UPDATE Monthly_FG_Imple_Sum SET [Monthly_FG_Imple_Sum].TOTAL_ActualDay = Forms![Monthly_FG_Imple_Sum]!Actualday , dbFailOnError"
เอาออกแล้วError ค่ะ
เงื่อนไขคือวันที่ วันที่ในForm =วันที่ในตามรางค่ะ
Dim xlApp As Object
Dim DB As DAO.Database
Dim RS As DAO.Recordset
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
xlApp.Workbooks.Open "C:\Temp\Example.xlsx"
Set DB = CurrentDb
Set RS = DB.OpenRecordset("select PMU2_StartDT from PMU2")
xlApp.ActiveSheet.Range("C3").CopyFromRecordset RS
RS.Close
ข้อมูลแยกตามItemID ค่ะ และลำดับวันที่ก่อน ไปหลัง
ตามรูปใหม่ด้านล่างค่ะ