Excel VBA質問箱 IV

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

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


58606 / 76732 ←次へ | 前へ→

【22850】再度おねがいできませんか?
質問  じん  - 05/3/4(金) 22:10 -

引用なし
パスワード
   こんばんは
>Me.AutoFilter.Range.SpecialCells(xlCellTypeVisible).Copy
>Worksheets("Sheet2").Range("B1").PasteSpecial
>さしあたって間違えてそうなのは、Me
>これは、データシート上での記述なので、フォームに記述する時は、
データシート上に記述したので変更しておりません。
>Worksheets("Sheet1")とかに置き換えないと、取得できませんよ。
置き換えも大丈夫と思います。
実際にオートフィルタで条件を指定してもSheet2にはコピーされません。
マクロの実行を押すとコピーはされますが、コピー元のシートの
コピーする範囲?が点滅したままです。
できれば、
1)条件を指定するたび自動にコピーされる
2)現状、繰り返すとsheet2のコピーされたものの上から
上書きされるのですが、前の条件で指定したデータにヒット
した件数が多いと次に条件を指定した場合、少なければ
以前の抽出されたデータが残ったままになります。
以前のデータは都度消したいのですが・・・
勝手なのは承知の上です。
お付き合い願えませんか?
宜しくお願いします。

0 hits

【22796】頑張る予定が・・・・(抽出データの移動) じん 05/3/3(木) 15:52 質問
【22797】Re:頑張る予定が・・・・(抽出データの移... G-Luck 05/3/3(木) 16:02 回答
【22798】Re:頑張る予定が・・・・(抽出データの移... じん 05/3/3(木) 17:26 お礼
【22800】無能なのは承知の上です。ごめんなさい。お... じん 05/3/3(木) 18:32 質問
【22801】Re:無能なのは承知の上です。ごめんなさい... G-Luck 05/3/3(木) 18:57 発言
【22803】Re:無能なのは承知の上です。ごめんなさい... じん 05/3/3(木) 19:45 発言
【22850】再度おねがいできませんか? じん 05/3/4(金) 22:10 質問
【22856】Re:再度おねがいできませんか? G-Luck 05/3/5(土) 8:26 回答
【22886】Re:再度おねがいできませんか? じん 05/3/5(土) 22:18 お礼

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