Page 1 of 1
การกรองข้อมูลชั้นสูง
Posted: Thu May 23, 2019 12:44 am
by yodpao.b
การกรองข้อมูลชั้นสูง
ผมลองใช้ ผลรับไม่ได้ตามต้องการ
ต้องการให้กรองตั้งแต่ 01/04/2019 00:05:00 ถึง 01/04/2019 00:40:00
ผลที่ได้ 2 บรรทัดครับตามรูป
ควรจะโชว์ตั้งแต่ 05-40 นาที ทุกนาที ซิครับ
finter1.JPG
ใช้สูตรดังนี้
finter2.JPG
ไม่ทราบว่าทำอย่างไรครับ
Re: การกรองข้อมูลชั้นสูง
Posted: Thu May 23, 2019 2:02 am
by yodpao.b
กรองได้แล้วครับ
แต่ติดปัญหาตรงที่ใช้ Code ทำงาน มันไม่กรองครับ
Code: Select all
Range("A7:G7").Select
Range(Selection, Selection.End(xlDown)).Select
Range("A7:G223").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Range("A3:B4"), Unique:=False
Re: การกรองข้อมูลชั้นสูง
Posted: Thu May 23, 2019 7:14 am
by snasui

กรณีนี้เป็นการบันทึก Macro แล้วทำงานได้แต่นำ Macro นั้นมาใช้ซ้ำไม่ได้ ยังไม่ทราบสาเหตุครับ
คงต้องแก้ไขด้วยการ Loop หรือใช้คอลัมน์เข้ามาช่วยในการเลือกข้อมูลครับ
กรณีใช้คอลัมน์ช่วยในการเลือกข้อมูล
- A4 เปลี่ยนค่าเป็น 1/4/2019 0:05:00 ไม่ต้องครอบด้วยเครื่องหมายใด ๆ
- B4 เปลี่ยนค่าเป็น 1/4/2019 0:13:00 ไม่ต้องครอบด้วยเครื่องหมายใด ๆ
- H7 คีย์คำว่า Select
- H8 คีย์สูตร =AND(G13>=$A$4,G13<=$B$4) > คัดลอกลงด้านล่างเท่ากับจำนวนข้อมูลที่มี
- D3 เป็นเซลล์ว่าง, D4 คีย์สูตร =H8=TRUE
- ปรับ Code เป็น
Code: Select all
Range("a7").CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Range("D3:D4"), Unique:=False
Re: การกรองข้อมูลชั้นสูง
Posted: Thu May 23, 2019 12:55 pm
by Bo_ry
Advanced Filter แบบ And ต้องอยู่แถวเดียวกัน
Re: การกรองข้อมูลชั้นสูง
Posted: Thu May 23, 2019 2:37 pm
by snasui
Bo_ry wrote: Thu May 23, 2019 12:55 pm
Advanced Filter แบบ And ต้องอยู่แถวเดียวกัน

ตามโพสต์ #2 ข้อมูลวันที่อยู่แถวเดียวกันคนละคอลัมน์ บันทึก Macro แล้วไม่สามารถนำ Macro มาใช้ซ้ำได้ครับ
Re: การกรองข้อมูลชั้นสูง
Posted: Thu May 23, 2019 11:15 pm
by yodpao.b
ขอบคุณครับ
ทำตามแล้วก็ได้ตามต้องการครับ
อาจารย์ให้มันไปเช็ค ผิด ถูก ค่าว่าง แล้วก็เอามากรองประมาณนั้น
แต่ผมก็ไม่รู้ว่าเช็ตตำไหน ตัวผมเข้าใจว่า ตรวจสอบคำว่าถูก
แต่ข้อแม้มันบอกว่าตรวจสอบคำว่า ผิดกับต่าว่าง ซึ่งน่าจะหมายถึง or
น่าจะเข้าใจประมาณนี้
ผมแก้ในช่วงเช้าที่ทำงานครับ
แต่ผมทำอีกแบบหนึ่งคือ
ในช่อง G แปลงค่าวันที่เป็นตัวเลข
ในส่วนของข้อแม้ Advanced Filter อยู่แถวเดียวกัน และ แปลงค่าวันที่เป็นตัวเลขใส่เครื่องหมายน้อยกว่ามากกว่า
ไม่มีปัญหาใด Run ได้ตามปกติครับ
ขอบคุณครับ ทั้งสองท่าน
Re: การกรองข้อมูลชั้นสูง
Posted: Fri May 24, 2019 6:02 am
by snasui
yodpao.b wrote: Thu May 23, 2019 11:15 pm
ทำตามแล้วก็ได้ตามต้องการครับ
อาจารย์ให้มันไปเช็ค ผิด ถูก ค่าว่าง แล้วก็เอามากรองประมาณนั้น
แต่ผมก็ไม่รู้ว่าเช็ตตำไหน ตัวผมเข้าใจว่า ตรวจสอบคำว่าถูก
แต่ข้อแม้มันบอกว่าตรวจสอบคำว่า ผิดกับต่าว่าง ซึ่งน่าจะหมายถึง or
น่าจะเข้าใจประมาณนี้

ผมให้เช็คเฉพาะ
วันที่เท่านั้นครับ ไม่มีเช็คกับค่าว่าง การกรองด้วย Advanced Filter
เมื่อใช้สูตรมาช่วยตรง Criteria เราไม่จำเป็นต้องใส่หัวคอลัมน์ของ Criteria ครับ