• ベストアンサー

excelのオートフィルターのリストの選択値を取得したいのですが

VBにてエクセルファイルを編集する処理を組んでいます。 オートフィルタの絞り込みをするリストの値はどうやって取得するんでしょうか? 同じことをしようとするとかなり時間がかかってしまいます。 行数は6万行ぐらいあります

質問者が選んだベストアンサー

  • ベストアンサー
  • papayuka
  • ベストアンサー率45% (1388/3066)
回答No.2

オートフィルタのリストは確かに速いですね。 取得する方法は私も知りたいです。 ただ、オートフィルタのドロップで表示されるのは1000件なので、対象レコード数を考えると用途に合うのかなと思いました。 かなりの時間がかかってしまうとの事ですがどんなコードで書かれているのでしょうか? コードを提示すれば改善案が出るかも。 (私が答えられるかは解りませんが、、、)

noname#68570
質問者

お礼

返事が遅くなり申し訳ございません。 結局、手動でやることになりました。 >かなりの時間がかかってしまうとの事ですがどんなコードで書かれているのでしょうか? COUNTIFなどのワークシート関数で何番目にあるか?みたいな感じです。 ありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • hana-hana3
  • ベストアンサー率31% (4940/15541)
回答No.1

>同じことをしようとするとかなり時間がかかってしまいます。 質問の意図が良く解りませんが・・・。 フィルタ以外の方法を模索しているという事でしょうか? それなら、どのようなコードを書いてもエクセルの機能並の速度は出せません。 VBA高速化テクニック(目次) http://officetanaka.net/excel/vba/speed/index.htm

noname#68570
質問者

お礼

回答ありがとうございました。

noname#68570
質問者

補足

エクセルの機能のオートフィルタを利用しますけど、 条件であるユニーク(重複しない)な値を取得したいんです。 リンク先のサイトは参考になりました。ありがとうございます

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • Excel オートフィルタのリストを取得したい

    ExcelのVBAです。 オートフィルタの▼をクリックすると、 重複していないリストが出ます。 このリストを列ごと(指定列)取得したいです。 できれば、Functionで組み、 配列に格納し、使いたいと思っています。 戻り値で配列は出来なかった気がしますが、 どうでしょうか… やりたいことをまとめます。 ---------------------- Call オートフィルタリスト("A") 配列をリストボックスに表示 選択し、上下の配置などを変更できるように (Excelも連動し、2行目と3行目の位置を変更したりすることができる) 新規追加 そのリスト最終行に新規データを入力 そして、それをExcelにも反映 ------------------------ Function オートフィルタリスト(指定列) 配列定義 指定列の範囲選択 オートフィルタのリストを配列に格納 (重複は削除します) 配列を返します。 End Function ------------------------------ まとめるどころか余計ぐちゃぐちゃした気もしますが、 回答よろしくお願い致します。

  • Excelオートフィルターで絞り込んだ行数を数える

    こんにちは。 Excel2003で作成した数千行(個数)、数十列(項目)のファイルがあります。 オートフィルターである項目を「○○以上」と指定しフィルターに掛けて 数百行(個)に絞り込みました。 この行数(個数)がいくつあるが数える良い方法はありませんか? ご存じの方お教えください。 よろしくお願いいたします

  • EXCELのオートフィルターにて、何を選択したかを取得したい

    EXCELのオートフィルターにて、何を選択したかを取得したい 例えば、ユーザーがオートフィルターにて、店番=1を選択した場合に、 コメントとして「店番=1」と表示したいのです。 どのようにしたら、VBAから取得できるのでしょうか? ヒントをお願いします

  • エクセルvlookup関数で値を取得したいリストの行数が多すぎてエクセ

    エクセルvlookup関数で値を取得したいリストの行数が多すぎてエクセルで表示できない 単純にa列をキーにしてb列の値を取得したいですがリストの行数が65***行以上でエクセルで開くと欠落します。リストはcsvでオープンしないで値を取得することはできますか? 宜しくお願いいたします。

  • エクセル2000のオートフィルタ

    エクセル2000でオートフィルタを使う場合、処理できるのは1,000行までですか? それ以上、数を増やすことはできないのでしょうか? 教えていただけたら幸いです。

  • エクセルのオートフィルタについて

    エクセルのオートフィルターをかけて、違う行のオートフィルターをかけようとすると前のオートフィルターが消えてしまいます!どうすればいいでしょうか???

  • エクセルのオートフィルタについて

    エクセルのオートフィルタについてですが、一番取り扱いに困っている所は、社員の給与リストとかで、ある特定のデータ、例として事務員(一つの行の例えば一つのセルに名前、一つ横のセルに給与の数字(数値データ)がはいっている)を抽出した場合(事務員の記号がどこか同じ行にはいっているとして)数値の列を開いているセルで関数処理したい場合、表示されている数字だけを処理する場合と隠れている(多分)データも処理してしまう場合があり大変戸惑っています。なんとかどちらかに統一したいのですが、自分なりに調べましたが分かりません。どなたかご存知ないでしょうか。また、このオートフィルタで特定の数字や文字を抽出しようとしてもうまくいく時とそうでない時があります。なぜなのでしょうか。これはバグと考えても?

  • エクセルのオートフィルタで、あるデータにオートフィルタをかけたあとに他

    エクセルのオートフィルタで、あるデータにオートフィルタをかけたあとに他のエクセルデータから データを貼り付けようとするとうまくいきません。 たとえば、オートフィルタをして30行あったものが10行に選択されたとき、その10行に他のエクセルデータから10行のデータを貼り付けたら4行くらいしか貼り付け出来ませんでした。 これはどうしてですか?わかる方がいれば教えてください。

  • Excelオートフィルタについて

    WindowsXPでExcel2000を使用しています。 Excelで管理している顧客リストがあるのですが、 検索するときにオートフィルタに引っかかってこないものが あります。 顧客会社名、担当者名などのカナ文字でフィルタにかけるのですが、 例えば「ハナコ」という担当者がセル上に存在しているにもかかわらず フィルタの選択肢に出てきません。 (「データ」→「フィルタ」→「オートフィルタ」の機能) キーボードで「ctrl」+「f」で検索するときちんと引っかかります。 どうしてでしょうか。 このファイルは18項目×3000件くらいのデータです。 また、全く別のファイルでも同じようなことがあります。 こちらはカナでフィルタにかけたときに、「ア」から「ナ」までの選択肢しか表示されません。 もちろんリストには「ニ」から「ワ」までの名称も並んでいます。 こちらのファイルは同じExcel2000で、三項目×1500件です。

  • EXCEL オートフィルタについて

    EXCELの2003と2002を使っています。 オートフィルターで抽出したものを行ごとコピーして違うファイルに 貼り付けた時、同じように操作しているつもりですが、 ときどきオートフィルタがかかった状態で全てのファイル (隠れているデータが隠れた形、再表示するといらないデータまである)張り付いています。 抽出したものだけ貼り付けたいのですが、どの操作が原因で、違いが出るのでしょうか。