移動ボタンを右クリックして、マクロの登録を開くと [Sheet移動2] が、登録されている事が分かる。
ボタンをクリックすると、Sub Sheet移動2が実行される。

----------------------------------------------------------
Sub Sheet 移動 1( ) 
 Call シート見出し OFF        ' サブマクロの実行構文で、[シート見出し OFF] を実行する。
 Sheets("Sheet2").Select
 Range("B2").Select
End Sub
----------------------------------------------------------
Sub Sheet 移動 1 ( )
 Sheets("Sheet1").Select
 Range("B2).Select
 Call シート見出し ON        ' サブマクロの実行構文で、[シート見出し ON] を実行する。
End Sub
----------------------------------------------------------
Sub シート見出し OFF( )
 SctiveWindow.Display WorkbookTabs = False  ' False は "しない"
End Sub
----------------------------------------------------------
Sub シート見出し ON ( )
 SctiveWindow.Display WorkbookTabs = True   ' Trueは "する"
End Sub
 
Sheet1 から Sheet2 に移動するマクロボタン
 
基本的なマクロの習得
 サブマクロの実行とシート間の移動


実際に使っているシステムの内容で解説
  EXCEL VBA 講座