==> กระทู้เก่าบอร์ด อ.สุภาพ ไชยา   | ==> กระทู้บอร์ด อ.Yeadram
สมัครสมาชิก | 

แสดงกระทู้

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 - UnKnown

หน้า: [1]
1
ห้อง MS Access / : ช่วยแนะนำการเขียนคำสั่ง VBA ใน Acess
« เมื่อ: 19 ธ.ค. 61 , 14:48:24 »
อ้างถึง
ไม่ให้ช่องภูมิภาคเป็นช่องหลัก , เลือกจังหวัดเสร็จ > ช่องภูมิภาคขึ้นมาให้เลย
ผมขออนุญาตนำไฟล์ของ อ.ปิ่นณรงค์ ไปแก้นะครับ โดย
• เปลี่ยนช่องเลือกภาค(Cb_geography) เป็น TextBox
• จังหวัด
  - column count = 3 , column widths = 0cm;2cm;0cm
  - Data > Row Source =
โค๊ด: [Select]
SELECT tb_province.province_id, tb_province.Province_th, tb_geography.GEO_NAME FROM tb_province INNER JOIN tb_geography ON tb_province.geo_id = tb_geography.GEO_ID;
  - VB ในส่วนของ cb_province_AfterUpdate เพิ่ม     
โค๊ด: [Select]
Me.Cb_geography = cb_province.Column(2)
ปล.ผมก็...เอาอ่านะลองดูจากไฟล์เลยครับ :prettiness:
โพสต์นี้ได้รับคำขอบคุณจาก: ปิ่นณรงค์, buakird

2
ห้อง MS Access / : การใช้คำสั่ง iifซ้อน iif
« เมื่อ: 09 ธ.ค. 61 , 13:21:46 »
ต้องใส่ลูกน้ำคั่นวงเล็บปิดด้วยใหมครับนั้น ตย.ที่ผมใช้ =IIf([do_T15]=True,IIf([15_ราคา2]<>"",[15_ราคา2]+[15_ราคา],"0"),"0")
ปล.ถ้าใช้ ),),),),),),),),),),) คือมันไม่มีอะไรอยู่ข้างในมันจะแปลงร่างให้เป็น ))))))))))) ตามเดิมอยู่ดี ลองเป็น ,[%Efficiancy]),[%Efficiancy]),... แทนดูได้ใหมครับ :sweat:

โค๊ด: [Select]
Eff20Auto:
IIf(Not IsNull([Eff20]),[Eff20],
IIf(Not IsNull([Eff19]),[Eff19],
IIf(Not IsNull([Eff18]),[Eff18],
IIf(Not IsNull([Eff17]),[Eff17],
IIf(Not IsNull([Eff16]),[Eff16],
IIf(Not IsNull([Eff15]),[Eff15],
IIf(Not IsNull([Eff14]),[Eff14],
IIf(Not IsNull([Eff12]),[Eff12],
IIf(Not IsNull([Eff11]),[Eff11],
IIf(Not IsNull([Eff10]),[Eff10],
IIf(Not IsNull([Eff9]),[Eff9],[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
,[%Efficiancy])
โพสต์นี้ได้รับคำขอบคุณจาก: prajak

3
ห้อง MS Access / : เก็บเวลาปรับปรุงข้อมูลอัตโนมัต
« เมื่อ: 15 ก.ย. 61 , 11:23:54 »
ขอแนะนำนอกเรื่องว่า"พยายามไม่ตั้งชื่อกล่องข้อความหรืออะไรก็แล้วแต่เป็นภาษาไทยนะ" :prettiness:

(มือใหม่) อ่านซักนิดถ้าคิดจะใช้ Access ตอนที่ 1- ภาษาไทยใน Access By อ.OddyWriter
โพสต์นี้ได้รับคำขอบคุณจาก: alundc45

4
ห้อง MS Access / : USB Printer พิมพ์ไม่ได้ หลังจาก make accde+เอา object ไป run อีกเครื่องหนึ่ง
« เมื่อ: 04 ก.ย. 61 , 22:13:44 »
ลองเป็นวิธีนี้ใหมครับ > วิธีเลือกเครื่องปริ้นแบบเจาะจง
โพสต์นี้ได้รับคำขอบคุณจาก: pitakchan

5
ห้อง MS Access / : การ run number โดยไม่ใช้ autonumber
« เมื่อ: 28 มิ.ย. 61 , 11:55:49 »
หรือลองดูแนวทางครับ ผลการค้นหา AutoNo = Format
โพสต์นี้ได้รับคำขอบคุณจาก: siri

6
ห้อง MS Access / : กำลังหัดสร้างโปรแกรม ติดปัญหานิดหน่อย ช่วยทีครับ
« เมื่อ: 09 มิ.ย. 61 , 13:19:28 »
Nz คือฟังก์ชั่นในการกำหนดว่าเมื่อค่าในตัวแปลที่1 มีค่าเท่ากับ Null หรือก็คือว่างไม่มีค่าอะไรเลยให้มีค่าเท่ากับตัวแปลที่2

ดังนั้น Nz(Me.Amount, 0) จึงเป็นการกำหนดว่าเมื่อ Me.Amount ว่างให้มีค่าเท่ากับ 0

หมายเหตุ ทุกการคำนวนของโปรแกรมต้องมีค่า จะมา 1+2+Null+4 ไม่ดี,ไม่ควร(หรือจะใช้ไม่ได้ด้วยซ้ำไปครับ) :dizzy: 
            เมื่อใช้ Nz มาช่วยจะกลายเป็น 1+2+0+4 โปรแกรมจึงจะหาผลลัพธ์(=7)ให้ครับ
            หรือจะเอาไปประยุกต์ใช้อย่างอื่นนอกเหนือจากแนวคำนวนก็ได้นะ https://www.techonthenet.com/access/functions/advanced/nz.php link
โพสต์นี้ได้รับคำขอบคุณจาก: ปิ่นณรงค์, Tae Songvut, สุรเกตุ แซ่เอี้ย

7
ห้อง MS Access / : สร้าง runing number บนฟอร์ม
« เมื่อ: 22 พ.ค. 61 , 14:34:15 »
ใน query ที่ดึงออกมาตามรูปนั้นมีข้อมูลอื่นที่เป็นข้อมูลที่ไม่มีค่าซ้ำเช่น เลขที่บิล,เลขที่... อีกใหมถ้ามีในมุมมองออกแบบใส่มันเข้ามาแล้วไม่อยากให้ใครเห็นค่อยไปสั่งซ้อนในมุมมองแผ่นข้อมูลก็ได้
หรือไม่มีข้อมูลอะไรที่ไม่มีค่าซ้ำกันถ้าจะทำตามวิธีนี้ก็ไปทำให้มีครับ

จากนั้นในกล่อง No ตามรูปใส่โค้ด
โค๊ด: [Select]
=GetLineNumber([Form],"Bill_no",[Bill_No])

ก็จะได้เลข No โดยอัตโนมัติ
โพสต์นี้ได้รับคำขอบคุณจาก: prajak

8
ห้อง MS Access / : เปิดไฟล์ครั้งแรกไม่ให้มีการเตือน
« เมื่อ: 19 พ.ค. 61 , 18:21:10 »
เตือนอะไรครับ :question:
ถ้าเตือน ActiveX >> ทำยังไงไม่ให้ถาม Activex ตอนเปิดครับ
หรือ
https://support.office.com/en-us/article/enable-or-disable-activex-settings-in-office-files-f1303e08-a3f8-41c5-a17e-b0b8898743ed#__toc311697501 link
โพสต์นี้ได้รับคำขอบคุณจาก: kitisak

9
ห้อง MS Access / > Print รายงานที่เป็นขนาด A6 ใน ขนาดกระดาษ A4 โดยให้มีเนื้อหา เหมือนกันค่ะ
« เมื่อ: 11 พ.ค. 61 , 13:11:32 »
> ออกแบบรายงาน(Report)บนขนาดกระดาษ A6
> ออกแบบรายงาน(Report)บนขนาดกระดาษ A4 แต่ให้มีเนื้อหาจริงๆแค่ครึ่งของกระดาษ A4 แนวตั้ง (ถ้ามีการทำหัวท้ายด้วยที่จบครับ :ouch:)
> รายงานเดิมสั่งปริ้นเป็น PDF > เปิดไฟล์ PDF สั่งปริ้นบนขนาดกระดาษ A6 (โปรแกรมจะทำเหมือนย่อรูปให้เอง :cool:)

คิดง่ายๆแนวคนไม่เก่งอ่านะ
โพสต์นี้ได้รับคำขอบคุณจาก: mookda16

10
ห้อง MS Access / > > ต้องการสั่งพิมพ์ Report จาก Filter ใน Split Form
« เมื่อ: 08 พ.ค. 61 , 23:28:49 »
อ้างจาก: royaltool ที่ 08 พ.ค. 61 , 22:54:12
ผมขออนุญาตหลังไมค์ไปถามหน่อยได้ไหมครับ
ผมอยากทราบแนวทางการศึกษาต่อด้วยตัวเองนะครับ เพื่อจะได้ไม่เป็นการรบกวนสมาชิกท่านอื่นด้วยครับ

เว็บบอร์ดแห่งนี้มีใว้เพื่อแบ่งปันความรู้,แนวความคิด,ปัญหา,แนวทางแก้ปัญหา,ฯลฯ โพสต์ได้ไม่ต้องเกรงใจครับ :grin:
แค่ว่าโพสต์แล้วคำตอบตรงปัญหา,แก้ปัญหาได้ขนาดไหน ตรงใจหรือเปล่านั้นค่อยว่ากันครับ :shout: :shout: :shout:

@ เขียนคำถามให้ผู้ตอบเข้าใจ จะช่วยให้ผู้ถามได้คำตอบที่ชัดเจน และรวดเร็ว / @ คุณได้คำตอบที่ต้องการแล้วหรือยัง กลับมาอีกสักครั้งเพื่อแจ้ง ผู้ตอบ
โพสต์นี้ได้รับคำขอบคุณจาก: ปิ่นณรงค์, royaltool

11
ห้อง MS Access / > รบกวนสอบถามคิวรี่แบบมีเงื่อนไขครับ
« เมื่อ: 19 เม.ย. 61 , 11:29:30 »
 :vomit: ใจเย็นๆครับผู้ตอบมีไม่กี่ท่าน  :cool:
เมื่อ Status  |  ให้ Final
AA
A,DA
A,C,DA
DD
C,DD
P,DP
อืมเห็น Code - 004 มี Status A กับ P จะให้ Final เป็นอะไรครับ :want:

ปล.แค่มาช่วยถามนะ ไม่ได้ช่วยหาคำตอบ
โพสต์นี้ได้รับคำขอบคุณจาก: Eik Q Sang

12
"เรื่องอื่นๆ"เกี่ยวกับ Access / > อยากรู้ว่า แบบในรูปที่ส่งมาน่ะครับ เค้าเอา access มาเขียนแบบสำเร็จรุปใช่มั้ยครับ
« เมื่อ: 18 เม.ย. 61 , 16:52:40 »
โปรแกรมสำเร็จรูปพร้อมใช้งาน เขาก็เขียนให้ซ้อนเมนูไม่ต้องแสดงออกมาให้คนใช้ไปกดเล่นนะครับ :shout:
โพสต์นี้ได้รับคำขอบคุณจาก: laemthong

13
ห้อง MS Access / > เปลี่ยนแป้นภาษาด้วย VB
« เมื่อ: 26 มี.ค. 61 , 10:13:02 »
> คีย์บอร์ดไม่มีปุ่มเปลี่ยนภาษาเหรอครับ
> ตั้งค่าให้เมื่อมาใช้ textbox1 ให้เปลี่ยนภาษาตั้งต้นเป็นภาษาอังกฤษได้ตามรูป (ถ้าจะพิมพ์ไทยก็กดปุ่มเปลี่ยนภาษา~)


> เขียนฟังก์ชั่นให้ "*" เป็นปุ่มเปลี่ยนภาษาแล้วให้ textbox1 เรียกใช้งานฟังก์ชั่นนั้นอีกที (ได้หรือไม่,ทำอย่างไรรอดูกันต่อไปครับ :smile:)
โพสต์นี้ได้รับคำขอบคุณจาก: kitisak

หน้า: [1]