Excel VBA質問箱 IV

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

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


4610 / 76734 ←次へ | 前へ→

【77742】Re:特定条件の行に他シートの行を貼り付け&シート分け保存
発言  γ  - 15/12/13(日) 8:54 -

引用なし
パスワード
   これから出掛けてしまうので、時間がとれませんがコメント追加しておきます。

オートフィルタだけを使って操作するには以下のようにします。
「項目」をキーワードにしてオートフィルタを掛けた段階で
A列の可視セルを変数にセットしておきます。

・オートフィルタを解除します。
・For each で以下の操作を繰り返します。
・その行に見出しをコピーペイストします。
・そのセルのCurrentRegionをとれば、そのブロックだけが選択できます。
 それをシートにコピーペイストしてください。
・シート名にすべき文字列は、そのセルのOffset(-1)に入っていますから、
 シー名を修正します。

こんな方針でいかがでしょうか。
2 hits

【77738】特定条件の行に他シートの行を貼り付け&シート分け保存 さいとう 15/12/12(土) 20:17 質問[未読]
【77739】Re:特定条件の行に他シートの行を貼り付け... γ 15/12/12(土) 21:07 発言[未読]
【77740】Re:特定条件の行に他シートの行を貼り付け... さいとう 15/12/12(土) 22:21 発言[未読]
【77741】Re:特定条件の行に他シートの行を貼り付け... γ 15/12/12(土) 22:40 発言[未読]
【77742】Re:特定条件の行に他シートの行を貼り付け... γ 15/12/13(日) 8:54 発言[未読]
【77743】Re:特定条件の行に他シートの行を貼り付け... さいとう 15/12/14(月) 5:24 お礼[未読]
【77745】Re:特定条件の行に他シートの行を貼り付け... γ 15/12/14(月) 20:39 発言[未読]
【77751】Re:特定条件の行に他シートの行を貼り付け... さいとう 15/12/15(火) 7:09 お礼[未読]
【77752】Re:特定条件の行に他シートの行を貼り付け... γ 15/12/15(火) 7:16 発言[未読]
【77753】Re:特定条件の行に他シートの行を貼り付け... さいとう 15/12/15(火) 18:20 お礼[未読]

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