กระทู้เก่าบอร์ด อ.Yeadram
1,435 4
URL.หัวข้อ /
URL
การหารหัสไปรษณีย์ จากตำบล อำเภอ จังหวัด
ผมคัดลอกการเขียนคำสั่งของ อ.ธัชชัย ที่ตอบคุณศรัญญา เมื่อปี 2558 มาประกอบครับ
Private Sub cb_district_Change()
Me.txt_zipcode = DLookup("post_code", "tb_district", "district_th = '" & Me.cb_district & "'")
End Sub
ผมได้นำตัวอย่างไฟล์ของอาจารย์ไปประกอบการใช้งานแล้วครับ ผมเจอปัญหานิดหนึ่ง คือ ชื่อตำบลในเมืองไทย มีชื่อซ้ำกัน โปรแกรมไปนำค่าแรกมาให้ ซึ่งไม่ตรงกับความจริง เช่น ต.หนองโสน มีในประเทศไทย 6 แห่ง ผมต้องการที่เพชรบุรี แต่โปรแกรมไปเอาของตราดมาแสดง จากคำสั่งที่อาจารย์ให้ไว้ ไม่ทราบว่าต้องเพิ่มเติมคำสั่งอะไรเข้าไปอีกครับ ขอคำแนะนำด้วยครับ ผมยังไม่เก่งเรื่องการเขียน VBA นัก
หรือจะแสดงวิธีทำให้ดูจะเป็นพระคุณยิ่งครับ
Private Sub cb_district_Change()
Me.txt_zipcode = DLookup("post_code", "tb_district", "district_th = '" & Me.cb_district & "'")
End Sub
ผมได้นำตัวอย่างไฟล์ของอาจารย์ไปประกอบการใช้งานแล้วครับ ผมเจอปัญหานิดหนึ่ง คือ ชื่อตำบลในเมืองไทย มีชื่อซ้ำกัน โปรแกรมไปนำค่าแรกมาให้ ซึ่งไม่ตรงกับความจริง เช่น ต.หนองโสน มีในประเทศไทย 6 แห่ง ผมต้องการที่เพชรบุรี แต่โปรแกรมไปเอาของตราดมาแสดง จากคำสั่งที่อาจารย์ให้ไว้ ไม่ทราบว่าต้องเพิ่มเติมคำสั่งอะไรเข้าไปอีกครับ ขอคำแนะนำด้วยครับ ผมยังไม่เก่งเรื่องการเขียน VBA นัก
หรือจะแสดงวิธีทำให้ดูจะเป็นพระคุณยิ่งครับ
4 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R22854
โดยหลักการแล้ว ต้องหาจังหวัดก่อน ตามด้วยอำเภอ แล้วจึงหาตำบลเป็นลำดับสุดท้ายครับ
3 @R22855
คุ้นๆ ว่าเป็นไฟล์ที่ผมทำนะ ถ้าใช่ก็ลองเพิ่มเงื่อนไขเป็นอย่างนี้ดูครับ
Me.txt_zipcode = DLookup("post_code", "tb_district", "district_th= '" & Me.cb_district & "' AND amphur_id = " & Me.cb_amphur.Column(0, Me.cb_amphur.ListIndex))
Me.txt_zipcode = DLookup("post_code", "tb_district", "district_th= '" & Me.cb_district & "' AND amphur_id = " & Me.cb_amphur.Column(0, Me.cb_amphur.ListIndex))
4 @R22875
เรียน อาจารย์ธัชชัย ที่เคารพ
กราบขอบพระคุณคำแนะนำของอาจารย์มากครับ แก้ปัญหาได้หมดเลยครับ ทดลองดูแล้วถูกต้อง 100 %
กราบขอบพระคุณคำแนะนำของอาจารย์มากครับ แก้ปัญหาได้หมดเลยครับ ทดลองดูแล้วถูกต้อง 100 %
Time: 0.4128s
นอกจากต้องระบุจังหวัดด้วย