[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『ピボットテーブルでオートフィルタを使用したい』(まま)
集計列にオートフィルタができるようにするにはどうしたらよいのでしょうか?
データの個数が1のものはよいのですが、2や3になっているものを取り出したいのです。
(Windows2000 Excel2002)
重複した行は削除しながら上に詰める とりあえずA1:A30の範囲としています 範囲は実情に合わせて変えてください Sub 重複削除並び替え() Range("A1:A30").Select Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _ :=xlPinYin, DataOption1:=xlSortNormal Worksheets("Sheet1").Range("A1").Sort _ Key1:=Worksheets("Sheet1").Range("A1"), Order1:=xlAscending, Header:=xlYes, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _ :=xlPinYin Set currentCell = Worksheets("Sheet1").Range("A1") Do While Not IsEmpty(currentCell) Set nextCell = currentCell.Offset(1, 0) If nextCell.Value = currentCell.Value Then currentCell.EntireRow.Delete End If Set currentCell = nextCell Loop Range("A1").Select End Sub (shota)
どなたか質問者の質問の意味がよく理解できる人が居られましたらよきアドバイスお願いします 見当違いの解答を書いてしまってすみませんでした どなたか宜しくお願いします (shota)
出来ないのでは? ※ピボットテーブルのタイトルを選択しても、オートフィルタが有効になりませんので。
単にそれだけの目的であれば、代替案として ↓ ではダメですか?
1.C2セル =IF(A2="","",N(COUNTIF(A:A,A2)>1)) と入力してフィルダウン
2.オートフィルタで、C列の「1」だけ抽出
→抽出 行 ___A____ _B__ ______C_______ 行 ___A____ _B__ ______C_______ 1 受付番号 姓 ダブりチェック 1 受付番号 姓 ダブりチェック 2 1 野川 0 4 3 鹿嶋 1 3 2 佐久 0 5 3 矢谷 1 4 3 鹿嶋 1 7 5 菅田 1 5 3 矢谷 1 8 5 榎原 1 6 4 青笹 0 7 5 菅田 1 8 5 榎原 1 9 7 秋浦 0 (半平太)
ピボットテーブルを2行目から配置し ○「列」を選んでオートフィルタをかける ○同列1行目のセルをアクティブにしてオートフィルタをかける のでは、ご希望の事にはなりませんかね?
>(受付番号の列はオートフィルタがかかります。) これは、どの様に行って居られるのでしょうか? また、その時のピボットテーブルの状態(シート内配置等) どの様になっているのでしょうか?
(HANA)
大変失礼いたしました。m(__)m
>ピボットテーブルを2行目から配置し これで出来ますね。
(半平太)
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.