• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:ExcelのListObjectについて(VBA))

ExcelのListObjectについて(VBA)

このQ&Aのポイント
  • Excel2003のVBAで、ListObjectを使用して表示されているリストの絞り込み結果を別のセルに複写する方法を教えてください。
  • ListObjectのDataBodyRangeでは、リスト全体が選択されてしまうため、表示されているリストのみを対象としたいです。
  • 例えば、年齢が3歳のデータのみを抽出して別のシートに複写したいです。どのようにすればいいでしょうか?

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

  • ベストアンサー
  • Wendy02
  • ベストアンサー率57% (3570/6232)
回答No.1

こんにちは。 そのまま、ListObject の範囲(Range) をコピーすればよいのではありませんか?  With Worksheets("Sheet1")  If .ListObjects.Count = 0 Then Exit Sub    .ListObjects(1).Range.Select    .ListObjects(1).Range.Copy Worksheets("Sheet2").Range("A1")  End With

vba_minarai
質問者

お礼

回答ありがとうございます。 何度も試してみた上で質問したつもりでしたが、根本的に何か間違っていたようで・・!! 仰るとおり、単純にできました。 泥沼にはまっていたようで助かりました。 ありがとうございます。

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

関連するQ&A

  • エクセルのリストについて

    先ほど、このカテゴで質問させて頂いた内容の続きです。 下記のリストを作成して、年齢の部分をクリックすると▼印が出てクリックすると、2歳、3歳と要素の一覧が表示されます。 この、表示のコレクションを取得する方法ってあるのでしょうか? それとも、年齢の列から自分で、重複セルを除いてコレクション化する必要があるのでしょうか? 見出し行:種別、名前、年齢      犬、ポチ、3歳      犬、ジョン、3歳      猫、タマ、2歳      猫、ジョセフ、3歳 よろしくお願いいたします。

  • エクセルでこんなことできますか?

    あいまいな質問タイトルでごめんなさい。 つまりこういうことなんです。データが次のように入っています。 <問い>   A列(名前)   B列(種類)           ポチ       犬             タマ       猫        シロ       猫        ジョン      犬        …        …   となっていて、 (1)種類が犬ならばC列にその犬の名前を表示し、猫ならばD 列にその猫の名前を表示する。    つまり、こんな感じ…。    C列(犬)     D列(猫)     ポチ                   タマ                   シロ           ジョン          ……      …… このように種類によって名前分けってできますか? (2)もしくは、種類が犬の場合には、その該当するA列の名 前のセル(または文字)を赤色などで見やすくする。  つまり、<問い>ではA列のポチ、ジョンのセル(または文字)が赤く表示されるようにしたいわけです。 私はエクセル初心者なので、何となくIF関数かな?と思い、調べては見るものの うまくいきません。 どちらかだけでもいいので、どなたか教えてください。お願いします。    

  • アクセス2000でデータ抽出できない

    アクセス2000でデータ抽出できない サブフォーム上でコンボリストを使用して入力し、その条件にあったものだけを別のコンボボックスに表示したい。 フォーム:[取引名][種別][資材名] ※全てコンボリスト 取引先を選択し、種別を選択し、その2つの条件を満たすものだけテーブルから抽出し、資材名のリストに表示したいのですが、どうしたらできるかわかりません。

  • エクセルのリストで表示されてるものだけの集計

    エクセルのリストを使ってフィールドで表示を選択して絞り込んだ時に表示されているものだけのの集計って出来ますか?出来れば、ユーザー定義関数(VBA)でもかまいません! 例 いぬ  5 ねこ  3 とり  2 いぬ  3 かえる 1 いぬ  2 と、リストがある場合にいぬだけを表示させて合計10を得たいとおもいます。 どなたか詳しい方いらっしゃいましたら教えてください。 宜しくお願いいたします。

  • 下記のようにExcelのSheet1にデータが入力されているとします。

    下記のようにExcelのSheet1にデータが入力されているとします。 (セルは「」で区切ります。)※添付ファイル参照 ----------------------------- A、あ、1、a、2300 A、あ、2、b、2500 A、い、3、c、2300 B、あ、4、d、2900 B、い、5、e、3100 ----------------------------- ※左から、列名:種別1、種別2、製品コード、製品名、価格とします。 このリストを使用して、別シートに下記のような仕組みを作成したいです。 ---------------------------- 種別1選択、種別2選択、製品名選択 ■■この行にはリストボックスを作成し、     それぞれをリストから選択できるようにします。(添付ファイル参照)■■ ■■その下に、製品コードと価格を表示させたいです。■■ ----------------------------- 実現可能でしょうか。。。 すみません、教えてください。

  • エクセル リストの質問

    エクセルの表で、日付の欄を 12/5 と表記するよう設定しています。 これをリスト化した時、12月のデータだけ抽出して表示するよう選択したかったのですが、リストの選択の値が、「12/1」「12/2」と一日ずつになってしまっていて、出来ません。 日付の入った表で、月毎に抽出する場合は月と日を別で入れるしかないのでしょうか。 意味分かりづらくてすいません。 教えてください。

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

    お世話になります。 Excelにて管理表を作成しています。 オートフィルタにて項目毎に抽出するのですが、その抽出したテーマなどを別のセルに表示する事は出来ないでしょうか。 計算結果は[subtotal]でできたのですが、何かいい方法か関数はないでしょうか。 ご教授お願いします。

  • エクセルのVLOOK関数について

    VLOOK関数で、 B1に123456と入力した際、5桁目の5を抽出(MID)し、 A3~D3に次の結果が表示されるようにしたいです。 VLOOK、VALUE、IF、MID等が必要だとは思うのですが、組み立てがわかりません。 A B    C  D 1 123456 2 鳥  猫     犬    猿  3 51 52 53 54 4 ※B1に123446と入力した場合は以下です A B    C  D 1 123446 2 鳥  猫     犬    猿  3 41 42 43 44 4 ・データリスト    鳥  猫  犬   猿  1 11 12 13 14 2 21 22 23 24 3 31 33 33 34 4 41 42 43 44 5 51 52 53 54 6 61 62 63 64 よろしくお願いします<(_ _)>

  • エクセルで指定した数字以下の数字を抽出して抜き出す

    エクセルで指定した数字以下の数字を抽出して抜き出したいです 例としては A列 B列 いぬ 1 ねこ 2 うし 3 とら 1 はと 2 この表から空いているセルに任意の数字を入力して それ以下の数字を別のセルに抽出したいです たとえば2を入力したら いぬ 1 ねこ 2 とら 1 はと 2 このような結果を別のセルに抽出したいです オートフィルターとマクロは使わない方向でお願いします 似たような質問としては下のURLでしたが http://okwave.jp/qa/q3200952.html?from=recommend これでは指定した数字と同じものしか抽出出来なかったので質問させていただきました

  • Excel VBA の質問です

    ユーザーフォームの中のコンボボックスの値をリストから呼び出して選択したとき、テキストボックスの値を同じリストの別の列から表示させたいです 会社の仕事で品番と品名がありますが、必ず品番は一つの固定の品名を持っています。 なので、品番を製品のマスタからひろってきてるのでわざわざ品名を入力するのは面倒です 製品マスタは例えばA列の2行目に ある品番があればその品名がB列の2行目に必ずあります よろしくお願いします

専門家に質問してみよう