Page 1 of 1
สอบถามสัญลักษณ์การ Pivot Filter ด้วย Slicer
Posted: Mon Jul 16, 2018 3:54 pm
by primeval
ใน Pivot Filter ได้การมีการสร้าง Heading และ สัญลักษณ์เพื่อทำการ Filter ในหน้า Output ติดปัญหาตรงประเภทใบอนุญาต พอเลือกแล้วประเภท แล้วกด ปุ่ม Macro Get Data Data ไม่ทำการ Filter กรณีมีการเลือก ประเภทใบอนุญาต 2 ประเภท
ขอบคุณครับ
Re: สอบถามสัญลักษณ์การ Pivot Filter ด้วย Slicer
Posted: Mon Jul 16, 2018 9:08 pm
by snasui

อ่านแล้วไม่เข้าใจครับ
Macro Get Data เป็นการทำ Advanced Filter โดยใช้ Criteria ในชีต Pivot_Filters ซึ่งกำหนดให้แสดงค่าตามคอลัมน์ B ซึ่งมีรายการเดียว จึงเป็นปกติที่จะดึงมาได้เพียงรายการเดียวครับ
Re: สอบถามสัญลักษณ์การ Pivot Filter ด้วย Slicer
Posted: Tue Jul 17, 2018 12:36 pm
by primeval
snasui wrote: Mon Jul 16, 2018 9:08 pm

อ่านแล้วไม่เข้าใจครับ
Macro Get Data เป็นการทำ Advanced Filter โดยใช้ Criteria ในชีต Pivot_Filters ซึ่งกำหนดให้แสดงค่าตามคอลัมน์ B ซึ่งมีรายการเดียว จึงเป็นปกติที่จะดึงมาได้เพียงรายการเดียวครับ
อ้อ เข้าใจล่ะครับ จะมีวิธีไหนให้ค่า Criteria Range for Filters แสดงออกมาทั้งหมดตามที่เราเลือกใน Slicer ครับ
Re: สอบถามสัญลักษณ์การ Pivot Filter ด้วย Slicer
Posted: Tue Jul 17, 2018 7:25 pm
by snasui

การใช้ Slicer หมายถึงว่าได้นำข้อมูลที่ได้ทำ PivotTable มาแสดงเท่าที่ต้องการตามเงื่อนไขที่เลือกใน Slicer
ตัว Slicer คือการกรองข้อมูล ถ้าทำ Slicer แล้วก็ไม่จำเป็นต้องไปดึงข้อมูลใหม่ด้วย Advanced Filter อีก เพราะไม่ใช่ขั้นตอนที่จำเป็น สามารถตัดทิ้งไปได้เลย
ไม่ทราบว่ากำลังจะทำอะไร ด้วยเหตุผลใดจึงทำเช่นนั้น จะได้ตอบได้ตรงประเด็นครับครับ
Re: สอบถามสัญลักษณ์การ Pivot Filter ด้วย Slicer
Posted: Tue Jul 17, 2018 11:37 pm
by primeval
กำลังอยากจะหาวิธี Filter โดยใช้ Slicer ไปออกหน้า Output โดยไม่ต้องยุ่งกับหน้าฐานข้อมูล SalesData ครับ
Re: สอบถามสัญลักษณ์การ Pivot Filter ด้วย Slicer
Posted: Wed Jul 18, 2018 7:31 pm
by snasui

ปรับ PivotTable โดยให้เปลี่ยนมุมมองเป็นตามภาพครับ

- Row Area
- RowArea.png (17.94 KiB) Viewed 41 times
ปรับ Range Name ที่ชื่อ CriSlicer โดยกำหนด Refrence เป็นด้านล่าง
=OFFSET(Pivot_Filters!$A$7,0,0,COUNTA(Pivot_Filters!$A$7:$A$1000),3)
ปรับ Code เป็นด้านล่าง
Code: Select all
'Other code...
If Sheets("Pivot_Filters").Range("a8").Value = "" Then Exit Sub
Set wsPF = Sheets("Pivot_Filters")
Set wsSD = Sheets("SalesData")
Set wsOP = Sheets("Output")
'Other code...
Re: สอบถามสัญลักษณ์การ Pivot Filter ด้วย Slicer
Posted: Wed Jul 18, 2018 10:36 pm
by primeval