Excel VBA質問箱 IV

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

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


65406 / 76732 ←次へ | 前へ→

【15901】Re:データ抽出について
回答  Hirofumi  - 04/7/11(日) 10:57 -

引用なし
パスワード
   >この現在使用しているシートのみでなく、
>別シートを次々処理したく、
>汎用的にいつでも、使えるようにしたい
>のですが、そのようなことも可能でしょうか?
>後からの質問で申し訳ないです。

マクロの有るBookと転記されるBook("現在シート"が有るBook)を別にしたいならこんなのでも善いかな?

  'コードの有る範囲を設定
  With ThisWorkbook.Worksheets("現在シート")
    Set rngKyes = Range(.Cells(2, "A"), _
            .Cells(lngRowEnd, "A").End(xlUp))
  End With



  'コードの有る範囲を設定
  With ActiveSheet
    Set rngKyes = Range(.Cells(2, "A"), _
            .Cells(lngRowEnd, "A").End(xlUp))
  End With

として、実行する時は、先ず、マクロの有るBookを開き、
次に"現在シート"が有るBookを開きます
次に、"現在シート"をActiveにして、マクロを実行します

尚、
>皆さんが言っておられる通り、現在使用
>しているシートにて、マクロを記入すると
>正常に処理することができました。
>ありがとうございます。
と有りますが、コードを記述するのは、シートのコードモジュールではなくて
必ず、標準モジュールに記述して下さい
4 hits

【15876】データ抽出について 初心者 04/7/9(金) 23:12 質問
【15879】Re:データ抽出について Asaki 04/7/9(金) 23:30 回答
【15886】Re:データ抽出について Asaki 04/7/10(土) 13:31 回答
【15881】Re:データ抽出について Hirofumi 04/7/10(土) 0:42 回答
【15890】Re:データ抽出について 初心者 04/7/10(土) 21:30 質問
【15891】Re:データ抽出について かみちゃん 04/7/10(土) 22:10 回答
【15892】Re:データ抽出について Hirofumi 04/7/10(土) 23:13 回答
【15898】Re:データ抽出について 初心者 04/7/11(日) 9:39 質問
【15901】Re:データ抽出について Hirofumi 04/7/11(日) 10:57 回答
【15902】別シートを次々処理したく Hirofumi 04/7/11(日) 11:31 回答
【15982】Re:別シートを次々処理したく 初心者 04/7/13(火) 21:26 質問
【15984】Re:別シートを次々処理したく Hirofumi 04/7/13(火) 21:59 回答
【16040】Re:別シートを次々処理したく Hirofumi 04/7/14(水) 21:40 回答
【16116】Re:別シートを次々処理したく 初心者 04/7/16(金) 20:48 お礼
【16207】Re:別シートを次々処理したく 以前の続き... 初心者 04/7/20(火) 21:28 質問
【16208】Re:別シートを次々処理したく 以前の続き... Hirofumi 04/7/20(火) 21:59 発言
【16214】Re:別シートを次々処理したく 以前の続き... 初心者 04/7/21(水) 6:30 発言
【16241】Re:別シートを次々処理したく 以前の続き... Hirofumi 04/7/21(水) 21:04 回答
【16309】Re:別シートを次々処理したく 以前の続き... 初心者 04/7/24(土) 22:28 お礼
【15897】Re:データ抽出について @MS1 04/7/11(日) 9:28 発言

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