advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 2420 for ピボットテーブル (0.004 sec.)
[[20220903154119]]
#score: 4770
@digest: 24147788aaa149cd4c4b9f48cbb583e7
@id: 92200
@mdate: 2022-09-03T18:58:56Z
@size: 2033
@type: text/plain
#keywords: 門") (13911), clearallfilters (13576), bumon (10831), ・ピ (8596), 48585666 (7748), ピポ (6611), ヤス (5890), ドth (5466), pvi (5365), スオ (5180), pivottables (4625), ポッ (4557), 部門 (4266), stackoverflow (4200), pivotitem (3974), labels (3910), using (3817), トテ (3667), arrays (3615), questions (2750), pivotfields (2552), pivotitems (2422), タモ (2266), ピボ (2243), ーブ (2120), テー (2062), pvt (2059), ル1 (1960), pivottable (1835), ト") (1663), ブル (1591), ド: (1582)
『ピポットテーブルのフィルターのかけ方について』(ヤスオ)
質問です。 ピポットテーブルにて、フィルターをかけたいのですが 下記状況・コードでフィルターをかけようとすると 何もフィルターされず、エラーも無く通ってしまいます。 どこを修正したら良いのか、どなたかお教えいただけたらと思います。 よろしくお願いいたします。 ピポットテーブルについて ・シート名:ピボット ・ピポットテーブル名:ピポットテーブル1 ・ピポットテーブル列:「メニュー名」「値」の二つ ・ピポットテーブル行:「部門」「氏名」の二つ ・ピポットテーブル値:「合計金額」「個数」の二つ ・フィルターをかけたいフィールド:「部門」 →var_Bumonという変数に入っている値の完全一致でフィルター ・コード ThisWorkbook.Worksheets("ピボット").PivotTables("ピボットテーブル1").ClearAllFilters ThisWorkbook.Worksheets("ピボット").PivotTables("ピボットテーブル1").PivotFields("部門").PivotFilters.Add2 xlCaptionEquals, , var_Bumon ※ var_Bumonに入っているデータは必ず「部門」行に設定されている旨は確認済みです。 ※ ClearAllFiltersでは、きちんとフィルター解除されてます。 空白が入っている等もありません。 < 使用 Excel:Office365、使用 OS:Windows10 > ---- 対象アイテム以外を非表示 Sub test() Dim dic As Object Dim pvt As PivotTable Dim pvi As PivotItem Set dic = CreateObject("scripting.dictionary") dic("〇〇") = True dic("△△") = True Set pvt = ThisWorkbook.Worksheets("ピボット").PivotTables("ピボットテーブル1") pvt.ClearAllFilters For Each pvi In pvt.PivotFields("部門").PivotItems pvi.Visible = dic.exists(pvi.Name) Next End Sub (マナ) 2022/09/03(土) 19:28 ---- Using arrays to Filter Pivot table labels https://stackoverflow.com/questions/48585666/using-arrays-to-filter-pivot-table-labels 最後に「データモデルに追加する」で云々というコメントがありますが、 わたしのPCでは確認できないので、試していません。 (マナ) 2022/09/03(土) 21:42 ---- マナ様 記載いただいたコードで、無事解決できました! ありがとうございました 。 (ヤスオ) 2022/09/04(日) 03:58 ...
http://www.excel.studio-kazu.jp/wiki/kazuwiki/202209/20220903154119.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97004 documents and 608062 words.

訪問者:カウンタValid HTML 4.01 Transitional