Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10615 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【20802】VBAを用いてデータを抽出したい ゆうすけ 04/12/20(月) 13:51 質問[未読]
【20803】Re:VBAを用いてデータを抽出したい Asaki 04/12/20(月) 14:30 発言[未読]
【20806】Re:VBAを用いてデータを抽出したい ゆうすけ 04/12/20(月) 16:14 質問[未読]
【20808】Re:VBAを用いてデータを抽出したい Asaki 04/12/20(月) 16:27 発言[未読]
【20809】Re:VBAを用いてデータを抽出したい ゆうすけ 04/12/20(月) 16:48 質問[未読]
【20817】Re:VBAを用いてデータを抽出したい ちゃっぴ 04/12/21(火) 2:41 回答[未読]
【20822】Re:VBAを用いてデータを抽出したい ゆうすけ 04/12/21(火) 14:27 質問[未読]
【20802】VBAを用いてデータを抽出したい
質問  ゆうすけ  - 04/12/20(月) 13:51 -
引用なし
パスワード
   はじめまして。
最近VBAをはじめたものです。
エクセルデータからデータをランダムに抜き取って、そして自動的に新しいセルにデータが空白行なしで貼りつけされるようなことがVBAを用いて簡単にできないかと考えました。
どなたかわかる方教えていただけませんか？
簡単にできるのでしょうか？

よろしくお願い致します。
【20803】Re:VBAを用いてデータを抽出したい
発言  Asaki  - 04/12/20(月) 14:30 -
引用なし
パスワード
   こんにちは。

多分できると思います。
コピーする作業をマクロの記録で記録するところから始められてはどうでしょうか？

それにしても
>ランダムに抜き取って
って、どういう条件でしょうか？
【20806】Re:VBAを用いてデータを抽出したい
質問  ゆうすけ  - 04/12/20(月) 16:14 -
引用なし
パスワード
   お返事ありがとうございます。
私の説明が下手でした。申し訳ございません。
ちなみに、

　 名前　年齢　……　→列（30項目程度）
1　太郎　 25
2　次郎　 35
3　三郎　 45
…
…
↓行（1000位のデータ）

このようなデータが入っているファイルが47個あります。
そこで、ファイル1から5個、ファイル2からデータを3個ぬくという作業を行いたいのです。

いかがでしょうか？
【20808】Re:VBAを用いてデータを抽出したい
発言  Asaki  - 04/12/20(月) 16:27 -
引用なし
パスワード
   お分かりにならないのは、具体的にどこでしょうか？
多分、ブックを開いてデータコピー、を47回ループすればよいと思いますが。

>そこで、ファイル1から5個、ファイル2からデータを3個ぬくという作業を行いたいのです。
上から5行とか、3行とかでよいのですか？
【20809】Re:VBAを用いてデータを抽出したい
質問  ゆうすけ  - 04/12/20(月) 16:48 -
引用なし
パスワード
   またまたすいません。


>>そこで、ファイル1から5個、ファイル2からデータを3個ぬくという作業を行いたいのです。
>上から5行とか、3行とかでよいのですか？

伝え方が悪かったというか説明不足でした。
先ほど少しいっていましたが、ランダムにデータを抜きたいのです。

ファイル1の5個抜きたいというのはどっかの行から5行抜きたいのです。
【20817】Re:VBAを用いてデータを抽出したい
回答  ちゃっぴ  - 04/12/21(火) 2:41 -
引用なし
パスワード
   >先ほど少しいっていましたが、ランダムにデータを抜きたいのです。

ということなので、Rnd関数を使うことはすでにお気づきですよね？

あとは、Data範囲がどこまでか(最終行の取得)がわかれば
それをかけてやればいいのでは？

あとは、そいつを必要回数分Loop

重複を避けたいのであればCollectionとかDictionaryに
格納することもご検討ください。
(過去ログにいろいろあるはずですので検索してください。)
【20822】Re:VBAを用いてデータを抽出したい
質問  ゆうすけ  - 04/12/21(火) 14:27 -
引用なし
パスワード
   どうもありがとうございます。
頭では理解できましたが、まだVBA初心者なので実際はどのような形になるのかがいまいちわかっておりません。
そこで、もしよろしければ例のプログラムを見せていただけませんか？
ご迷惑をおかけしますがよろしくお願い致します。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10615 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free