Excel VBA質問箱 IV

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

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


6440 / 13644 ツリー ←次へ | 前へ→

【45216】addしたsheetにVBAを記述することは可能ですか? BEE_GEE 06/12/15(金) 17:18 質問[未読]
【45218】Re:addしたsheetにVBAを記述することは可能... 飛ばない豚 06/12/15(金) 17:41 発言[未読]
【45219】Re:addしたsheetにVBAを記述することは可能... BEE_GEE 06/12/15(金) 18:04 質問[未読]
【45220】Re:addしたsheetにVBAを記述することは可能... 飛ばない豚 06/12/15(金) 18:10 発言[未読]
【45222】Re:addしたsheetにVBAを記述することは可能... BEE_GEE 06/12/15(金) 18:21 発言[未読]
【45223】Re:addしたsheetにVBAを記述することは可能... ichinose 06/12/15(金) 18:38 発言[未読]
【45225】Re:addしたsheetにVBAを記述することは可能... BEE_GEE 06/12/15(金) 18:55 お礼[未読]

【45216】addしたsheetにVBAを記述することは可能...
質問  BEE_GEE  - 06/12/15(金) 17:18 -

引用なし
パスワード
   メインで動くVBAにシートを追加する命令があり、そのシートに例えば次のような記述をしたいのですが、出来るのでしょうか?

やりたい事は、sheet自体にコードを書いて、その追加されたシートをクリックするとメッセージが表示されるようなもので、ThisWorkbookに記述すると他のシートにまで影響が出てしまうので、追加されたシートにのみ適応されるようにしたいのです。
そのシートの名前は、作成した日時が入るために固定されません。


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  MsgBox "セルは " & Target.Row & " 行目の " & Target.Column & " 列目です。"
End Sub

【45218】Re:addしたsheetにVBAを記述することは可...
発言  飛ばない豚  - 06/12/15(金) 17:41 -

引用なし
パスワード
   ▼BEE_GEE さん:
コード付の白紙のシートを1枚作り、
シートの追加の代わりに、そのシートのコピーではダメですか?

(^・ω・^)

【45219】Re:addしたsheetにVBAを記述することは可...
質問  BEE_GEE  - 06/12/15(金) 18:04 -

引用なし
パスワード
   ▼飛ばない豚 さん:

早速ご回答いただきありがとうございます。
やはり、そういった方法しかないのでしょうか・・・

メインのVBAが試行錯誤で作っていて、シートを増やしたり減らしたりと色々やっておりまして、sheet(1)などとシートの順番で指定してある記述があり、出来れば直接、シートを増やしたときに記述できればと考えたのですが・・・。

もしかすると、VBEを起動させて・・・なんて結構大変なのでしょうか?

【45220】Re:addしたsheetにVBAを記述することは可...
発言  飛ばない豚  - 06/12/15(金) 18:10 -

引用なし
パスワード
   ▼BEE_GEE さん:
ごめんなさい、新規シートのVBEに記述する方法は、わかりません。

シートのコピーは、試してみたらコードごとコピーされたので、
代替案として使用できるなら、、、、と思って回答しました。

お役に立てず、すみません。

【45222】Re:addしたsheetにVBAを記述することは可...
発言  BEE_GEE  - 06/12/15(金) 18:21 -

引用なし
パスワード
   ▼飛ばない豚 さん:

>お役に立てず、すみません。
いえいえ、そんなこと無いです。
もしかすると、出来ないことを質問しているのかもしれないですし・・・
ありがとうございました。

引き続き、自分でも調べてみますので、
どなたか、方法がわかるようでしたら教えてください。

よろしくお願い致します。

【45223】Re:addしたsheetにVBAを記述することは可...
発言  ichinose  - 06/12/15(金) 18:38 -

引用なし
パスワード
   こんばんは。

>早速ご回答いただきありがとうございます。
>やはり、そういった方法しかないのでしょうか・・・
>
>メインのVBAが試行錯誤で作っていて、シートを増やしたり減らしたりと色々やっておりまして、sheet(1)などとシートの順番で指定してある記述があり、出来れば直接、シートを増やしたときに記述できればと考えたのですが・・・。
>
>もしかすると、VBEを起動させて・・・なんて結構大変なのでしょうか?
こういう処理を通常のVBAプログラムではやりませんよ!!
また、Excel2002からは、VbProjectへのアクセスは規定値では
禁止されていますしね。

Thisworkbookのイベントに

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
  MsgBox "セルは " & Target.Row & " 行目の " & Target.Column & " 列目です。"
End Sub

という拡大版のイベントがありますから、これを使ったらいかがですか?

【45225】Re:addしたsheetにVBAを記述することは可...
お礼  BEE_GEE  - 06/12/15(金) 18:55 -

引用なし
パスワード
   ▼ichinose さん:
ありがとうございます。

>こういう処理を通常のVBAプログラムではやりませんよ!!
やはり、そうなんですね。
御門違いな質問をしてすいませんでした。

もう一度、メインのVBAを見直してみます。

ありがとうございました。

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