Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9661 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【25980】別シートでのMacroの実行 氷 05/6/20(月) 22:00 質問[未読]
【25982】Re:別シートでのMacroの実行 Nossori 05/6/20(月) 22:05 発言[未読]
【25983】Re:別シートでのMacroの実行 ponpon 05/6/20(月) 22:14 回答[未読]
【26182】Re:別シートでのMacroの実行 氷 05/6/25(土) 22:51 お礼[未読]
【25980】別シートでのMacroの実行
質問  氷  - 05/6/20(月) 22:00 -
引用なし
パスワード
   こんばんわ。
まず、代入というMacroを作りました。そのマクロは、Sheet2で作り、セルA5に１０という値が入るものです。
それを、Sheet1のワークシート上にあるボタンAを押すと、Sheet2のA5に値が入って欲しいのに、Sheet1のA5に値が入ってしまうんです。
ただ単に、
代入
と記述するだけじゃ、ダメなんでしょうか？＞＜
【25982】Re:別シートでのMacroの実行
発言  Nossori  - 05/6/20(月) 22:05 -
引用なし
パスワード
   ▼氷 さん：
>こんばんわ。

シートの指定が必要では。

Sheets(2).Range("A5").Value = 10

これでシート2に入りますが。
【25983】Re:別シートでのMacroの実行
回答  ponpon  - 05/6/20(月) 22:14 -
引用なし
パスワード
   こんばんは。ponponです。
何のボタンかよく分かりませんが、

フォームのボタンならば、マクロの登録で「Sheet2.代入」と自動的にでると思います。

コントロールツールボックスのボタンならば、
　　Private Sub CommandButton1_Click()
　　　Sheet2.代入
　　End Sub
でいけると思います。

標準モジュールに
Sub 代入()
Worksheets("sheet2").Range("A5").Value = 10
End Sub
とすれば、
代入　とだけで記述でいいのではないでしょうか。
【26182】Re:別シートでのMacroの実行
お礼  氷  - 05/6/25(土) 22:51 -
引用なし
パスワード
   Nossoriさん、ponpon さん、お返事くださったのに、
返事が遅れてしまってすみません＞＜

おかげさまで問題解決することが出来ました。
ありがとうございました＜（＿　＿）＞
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9661 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free