Option Explicit

Private Sub CommandButton1_Click()  '現金出納簿１　入金ボタン
    ActiveWindow.ScrollRow = 19     'ウインドウの上端の行を19行
    ActiveWindow.ScrollColumn = 1   'ウインドウの左端の列番号をA
    Cells(22, "c").Select           'セルC22を選択する
    
End Sub

Private Sub CommandButton2_Click()  '現金出納簿　２　出金ボタン
    ActiveWindow.ScrollRow = 33     'ウインドウの上端の行を33行
    ActiveWindow.ScrollColumn = 1   'ウインドウの左端の列番号をA
    Cells(36, "c").Select           'セルC36を選択する
End Sub

Private Sub CommandButton3_Click()  '振替口座　３　会費ボタン
    ActiveWindow.ScrollRow = 48     'ウインドウの上端の行を48行
    ActiveWindow.ScrollColumn = 1   'ウインドウの左端の列番号をA
    Cells(51, "c").Select           'セルC51を選択する
End Sub

Private Sub CommandButton4_Click()  '振替口座　４　一般ボタン
    ActiveWindow.ScrollRow = 67     'ウインドウの上端の行を67行
    ActiveWindow.ScrollColumn = 1   'ウインドウの左端の列番号をA
    Cells(70, "c").Select           'セルC70を選択する
End Sub

Private Sub CommandButton5_Click()  '振替口座　５　振替・現金間移動ボタン
    ActiveWindow.ScrollRow = 87     'ウインドウの上端の行を87行
    ActiveWindow.ScrollColumn = 1   'ウインドウの左端の列番号をA
    Cells(89, "c").Select           'セルC89を選択する
End Sub

Private Sub CommandButton6_Click()  '修正　６　入力済みデータの削除ボタン
    ActiveWindow.ScrollRow = 100    'ウインドウの上端の行を100行
    ActiveWindow.ScrollColumn = 1   'ウインドウの左端の列番号をA
    Cells(112, "d").Select          'セルD112を選択する
End Sub