• ベストアンサー

コマンドボタンをクリックでシートからシートに移動させたい

sheet1にコマンドボタンをつくり、これをクリックすると sheet2に移動するという風にしたいです。 sheet1は名前が 入力画面 sheet2は名前が 合計 となっています。 この時のコードをどう入力すべきか教えていただきたいです。 Private Sub CommandButton1_Click()と End Sub の間に何を入力するべきか正確に教えてください。 よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • n-jun
  • ベストアンサー率33% (959/2873)
回答No.1

シート【合計】をアクティブにするのなら Private Sub CommandButton1_Click() Worksheets("合計").Activate End Sub とか?

hirosinx
質問者

お礼

ありがとうございます!! まさにこれです。 助かりました。

すると、全ての回答が全文表示されます。

その他の回答 (2)

  • fujillin
  • ベストアンサー率61% (1594/2576)
回答No.3

わざわざマクロを使用しなくてもできますよ。 オートシェイプなどでボタンを作って、ハイパーリンクで表示したいシートへのリンクを設定しておけば、まったく同様のことが可能です。 ブックを開くときの「マクロを~~」の警告がうざいので、利用せずに済むものは、利用しないと思うのは私だけかな?

すると、全ての回答が全文表示されます。
  • imogasi
  • ベストアンサー率27% (4737/17070)
回答No.2

こんなのは質問するまでも無い。 また質問者は、マクロの記録(で出来るかどうか)を思い出してない(こういう質問が多い)。初心者はまずこれを思い出すべし。 シート1で、マクロ記録モードにして、「合計」シートのタブをクリックして(合計シートでの、何処か望みの)セルをクリックすればよい。 Sub Macro1() Sheets("Sheet3").Select Range("B2").Select End Sub になった(質問者の場合Sheet3は「合計」) これを Private Sub CommandButton1_Click()と End Sub の間に挟めば(コピペすれば)よいだけ。

すると、全ての回答が全文表示されます。

関連するQ&A