แสดงกระทู้

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 - 001Jetnipit

หน้า: 1 ... 5 6 7 [8] 9 10
127
สามารถดึงตารางที่มี Field เพศ หรือ Field กรุ๊ปเลือด มานับจำนวนโดยสร้างคิวรี่ใหม่ขึ้นมาแล้ว ใส่ sql แบบนี้

SELECT [เพศ], Count([เพศ]) AS จำนวน FROM [ชื่อตารางหรือคิวรี่]  GROUP BY [เพศ];

และถ้าจะนับจำนวน กรุ๊ปเลือด ทำแบบเดียวกัน

SELECT [กรุ๊ปเลือด], Count([กรุ๊ปเลือด]) AS จำนวน FROM [ชื่อตารางหรือคิวรี่]  GROUP BY [กรุ๊ปเลือด];

ขอบคุณครับ

128
คือก่อนหน้านั้นพยายามจะ Save ไฟล์ .mdb แยก



แต่ว่า Save ไม่ได้ครับขึ้นแบบนี้



ก็เลยช่างมัน จะทำงานต่อ จากนั้นคำสั่งการค้นหาใช้ไม่ได้ทันทีเลยครับ






129
ไม่ทราบว่าต้องทำ VBA ยังไงครับ


130
ที่คิวรี่ ให้ดึงฟิลล์ไอดี เข้ามาด้วย แต่ให้กดติ๊กถูกออกไปเพื่อไม่ให้แสดงบนฟอร์ม
และให้เรียงลำดับจากน้อยไปหามาก ที่ฟิลล์ ID นี้

คือมันเรียงตาม ID น้อยไปหามากอยู่ครับตอนนี้ ผมต้องการให้มันเรียงตามที่เราติ๊กล่าสุดครับ

131
คือผมมีฟอร์ม ที่มี Checkbox แต่เวลาติ๊กมันจะเรียงตาม ID ลงใน Query ที่เก็บ ไม่ทราบว่ามันพอจะมีวิธีที่จะทำให้ Checkbox มันเรียงค่าตามค่าที่เีราติ๊กล่าสุดไหมครับ




132
ถ้าเขียนโปรแกรมเสร็จแล้ว ต้อง Export หรืออะไรก่อนไหมครับก่อนจะนำไปใช้ หรือเปิด Access มาใช้ได้เลยปกติ  :slow:

133
ตอนแรก Icon มันก็ปกติครับ พอทำงานไปสร้างนู้นนี้มันกลายเป็นสไลต์เก่าๆ ไม่ทราบว่าผมกดโดนอะไรหรือเปล่าครับ


134
โปรแกรมผมใช้หลายคนครับ เข้าผ่านไฟล์กลาง(Map drive) โปรแกรมผมรวใ 2 ฝ่ายเข้าในโปรแกรมเดียว จึงอยากทราบว่าเวลาเปิดไฟล์ถ้าหากอีกคนเปิดอยู่มันจะฟ้องว่า Read only เหมือน Word, Excel ไหมครับ


135
ตอบ ข้อความผมด้วยครับ ผมส่ง ID LINE ไปให้แล้ว

Inbox  ไปแล้วครับ

136
พี่่ครับคือมันยังติดปัญหาอยู่ครับ ที่เราทำได้คือมันจะมาตามที่เรากรองข้อมูล แต่มันมาทุกฟิลครับผมต้องการแค่บางฟิล

- ผมอยากได้แค่บางฟิลเลยสร้าง Query ใหม่เอาแค่ฟิลที่ต้องการ (ID, Name, Ptt1_Start, Ptt1_Exp, Department)
- ใน Sub ที่ใช้ไว้ค้นหา ให้ดึงการค้นมามาจาก Table แทน (วิธีนี้จะช่วยให้โค้ดไม่ Error ไปทับกับโค้ด Export)






ปัญหาคือ
1.พอผมกด Export รายชื่อมันมาตามที่เรากรองครับ แต่ Query ผมถูกเขียนทับเหมือนเป็น Table เลย คือหลังจากกด Export เอามาทุกฟิลมาใส่ใน Query ผมเองเลยครับ
2.เมื่อ Sub ดึงข้อมูลมาจาก Table ในการค้นหาผมจึงไม่สามารถค้นหาอายุได้ครับ เพราะผมมาทำใน Query โดยการสร้างฟิลอายุขึ้นมาใหม่ ปัญหาคือมันอาจถูกเขียนทับจากโค้ด Export กับเวลากด Clear การค้นหาใน Query มันไม่ Clear การกรองให้ครับ มันจะยึดตามการ Export ล่าสุด(เช่น Export การตลาด ใน Query ก็จะมีแค่ Department การตลาด) จึงทำให้ถ้าหากเราเอา Combobox อายุไปอิงกับข้อมูลในQuery ข้อมูลมันก็จะมาแค่ที่มีใน Query เพราะมันไม่ได้ Clear การกรองออกครับ



เลยอยากสอบถามพี่ว่า ปัญหามันอยู่ที่อะไรแล้วเราต้องแก้ยังไงหรอครับ ตอนนี้โหดร้ายสุดคือมันเอาข้อมูลตาม Table มาเขียนทับใน Query ครับ   :dizzy: :dizzy:

137
ส่ง รหัส anydesk มาทางข้อความหน่อยครับ
ผมรีโมทไปแก้ให้

ส่งข้อความไปแล้วครับ

138
ลองเช็ค ไปทาง Floder testProject แล้วใช่ไหมครับ ว่าไม่มีไฟล์ excel ที่ export มา

เพิ่งลบไปตะกี้ครับ แล้วพอเปิด Form ใหม่มันขึ้นแบบนี้ครับ


139
โดย ผมได้นำ ข้อมูลจากตาราง PTT ทั้งหมด มาสร้าง Query ชื่อ QryPTT แล้วใช้ QueryDefs

คือ Form นี้ผมใช้ Query ดึงข้อมูลมาจาก Ptt แต่เอามาแค่บางฟิล แล้วก็สร้างฟิลใหม่ใน Query เพิ่มที่จะคำนวณเวลามาโชว์ครับ

ผมลองทำตามโค้ดพี่พอกดปุ่ม มันไม่มีอะไนเกิดขึ้นครับ ไม่ทราบว่าเป็นเพราะว่าผมไม่ได้เอาข้อมูลทุกฟิลจาก Ptt มาใส่ ใน Query หรือเปล่าครับ






140
ผมสร้างปุ่ม Export to excel จากคนที่สอนใน Youtube  แต่มันสามารถดึงมาจากตารางหรือคิวรี่เท่านั้นซึ่งมันจะมาทั้งหมดเลยครับ เลยอยากสอบถามว่า ถ้าเราจะ Export จากข้อมูลที่เราค้นหามา ไม่ทราบว่าต้องทำอย่างไรครับ




โค้ดปุ่ม Export ครับ

141
โค้ดผิดครับ
แก้เป็น

Set rsc = Forms!......................Form.RecordsetClone

ขอบคุณครับ

142
สวัสดีครับ Form ผมเป็น continuous form ที่เป็น Sub form ใน Navigation form โค้ดนี้ผมใช้กับ form เดี่ยวๆ ไม่เกิด Error อะไรครับ แต่พอใช้กับ Navigation form มันขึ้น Error แแบบนี้รบกวนช่วยดูให้ทีครับ


์Navigation form



เมื่อกด ปริ้น


ใน Sub ค้นหาผมก็อิง Form แบบนี้ก็ไม่มีปัญหา แต่พอใช้กับปริ้นก็เกิด Error

143
สวัสดีครับ ผมทำช่องค้นหาและ Combobox ดังรูปข้างล่าง



แต่อยากให้ช่องค้นหา สามารถค้นหาได้หลายค่า ตอนแรกโค้ดแบบนี้ครับ
Code : sql = "SELECT * FROM Q_PI WHERE [ID_Card] like '*" & Nz(Me.TextSearch, "*") & "*' AND [Position] like '" & Nz(Me.CmdPosi, "*") & "' AND [Section] like '" & Nz(Me.CmdSec, "*") & "'"
ใช้ได้ปกติตามต้องการครับ

แต่พอเพิ่มตัวนี้มาอีกตัว
sql = "SELECT * FROM Q_PI WHERE [ID_Card] like '*" & Nz(Me.TextSearch, "*") & "*' OR [NameTH] like '*" & Nz(Me.TextSearch, "*") & "*'  AND [Position] like '" & Nz(Me.CmdPosi, "*") & "' AND [Section] like '" & Nz(Me.CmdSec, "*") & "'"
มันทำให้ค้นหาอะไรไม่ได้เลยครับมันเหมือนคำสั่งใช้ไม่ได้ค้นแล้วไม่แสดงค่าที่ค้น ไม่ทราบว่าผมเข้าใจอะไรผิดหรือเปล่าครับ ขอบคุณครับ

144
เรียกรูปภาษาอังกฤษได้ปกติครับ แต่ถ้าเรียกรูปที่เป็นภาษาไทยจะไม่ขึ้น รบกวนชี้แนะหน่อยครับ ขอบคุณครับ




หน้า: 1 ... 5 6 7 [8] 9 10