Sub temp_A()
‘shortcut:ctlr/shift/a
End Sub
Sub temp_C()
‘shortcut:ctlr/shift/x
End Sub
Sub temp_F()
End Sub
Sub temp_q()
‘shortcut:ctlr/q
End sub
Sub temp__Q()
‘shortcut:ctlr/shift/q
‘スクロールアップ
ActiveWindow.SmallScroll up:=1
End sub
Sub temp__W()
‘shortcut:ctlr/shift/w
ActiveWindow.SmallScroll down:=1
End sub
Sub temp_V()
End Sub
Sub temp_X()
‘shortcut:ctlr/shift/x
’左のシートに移動
ActiveSheet.Next.Activate
End sub
Sub temp_Z()
‘shortcut:ctlr/shift/z
‘右のシートに移動
ActiveSheet.Previous.Activate
End Sub
コメントを残す