Excel VBA質問箱 IV

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

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


611 / 76735 ←次へ | 前へ→

【81789】Re:助けてください(配列での抽出について)
発言  γ  - 21/5/24(月) 8:33 -

引用なし
パスワード
   ■フィルタオプションの件。
AdvancedFilterメソッドで引数などにしている情報を見れば、
いずれもワークシート上に情報を置き、それを利用することが前提になっています。
ですから、マクロを使って、そういう状況を作ればよいだけの話です。
・見出しは当然必要です。それがなければ、項目の特定ができません。
 itm1,itm2,・・・の如き見出しを機械的につければいいだけで、
 これはワークシート上で、「連続データ」機能を使ってもいいし、簡単なマクロ
 で可能です。
・検索条件範囲の値設定も、そこにマクロで値をセットすればよいだけの話です。

こうしたことを理解しようとせず、ご自分のやり方(見出し省略。別の情報入力
形態?)を開拓しようとしても徒労に終わるだけです。
いやいやされようとしている印象が、文章からにじみ出ていますが、
強制する積もりはありません(こちらには何の益もありませんから)。
当然ながら選択はご自由です。

■3件おきコピーに時間を要しているという、最大の課題と目されている点に
 ついて。
(1)35万行ですか、多数のようですが、計算式も一度作成してしまえば繰り返し
  作成する必要もない、という考え方が一つ。
(2)仮に、繰り返し実行するとしたときの、時間短縮方策の有無。
  3行おき、ということで、もしその間は何もないという前提なら、
  以下の方法があります。
 ・空白行を含む3行をまとめて、広い行数に一度にコピーペイストすれば、
  一行毎にコピーペイストするよりも効率は上がります。
 ・その際、「空白セルを無視する」オプションを利用するのがキモ。 
 ・ただし、一度に実行すると、リソース不足となるかもしれないので、
  その際は、小分けにして貼り付けるとよいと思われます。
 ・少なくとも、一行毎に貼り付けるよりも、時間短縮にはなります。

7 hits

【81778】助けてください(配列での抽出について) とりとる 21/5/19(水) 3:16 質問[未読]
【81779】Re:助けてください(配列での抽出について) γ 21/5/19(水) 8:38 回答[未読]
【81780】Re:助けてください(配列での抽出について) TDS 21/5/19(水) 10:44 回答[未読]
【81781】Re:助けてください(配列での抽出について) とりとる 21/5/19(水) 11:54 発言[未読]
【81782】Re:助けてください(配列での抽出について) マナ 21/5/19(水) 18:33 発言[未読]
【81784】Re:助けてください(配列での抽出について) とりとる 21/5/20(木) 1:08 発言[未読]
【81783】Re:助けてください(配列での抽出について) マナ 21/5/19(水) 18:45 発言[未読]
【81785】Re:助けてください(配列での抽出について) とりとる 21/5/20(木) 1:20 質問[未読]
【81786】Re:助けてください(配列での抽出について) TDS 21/5/20(木) 17:13 発言[未読]
【81787】Re:助けてください(配列での抽出について) とりとる 21/5/20(木) 18:12 お礼[未読]
【81788】Re:助けてください(配列での抽出について) TDS 21/5/20(木) 19:45 発言[未読]
【81789】Re:助けてください(配列での抽出について) γ 21/5/24(月) 8:33 発言[未読]
【81790】Re:助けてください(配列での抽出について) とりとる 21/5/24(月) 19:24 お礼[未読]
【81791】Re:助けてください(配列での抽出について) γ 21/5/25(火) 9:45 発言[未読]
【81792】Re:助けてください(配列での抽出について) 通りすがり 21/5/26(水) 16:39 発言[未読]
【81793】Re:助けてください(配列での抽出について) 通りすがり 21/5/26(水) 16:42 発言[未読]

611 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free