私と同じようなキーボードを使われている方は一度はこう思うのではないでしょうか。「テンキーのenterキーで改行しないのは使いづらいぞ!」
もちろんリターンキーでは改行するのでそちらを押せば良いとも言えるのですが、数値を連続して入力するような場合にenterキーで改行してくれないのは残念ですね。
そこで、マクロで無理矢理改行させてみました。
Option Explicit
Sub EnterIsDown()
ActiveCell.Offset(1, 0).Activate
End Sub
Sub OnEnterIsDown()
Application.OnKey "{ENTER}", "EnterIsDown"
End Sub
Sub OffEnterIsDown()
Application.OnKey "{ENTER}"
End Sub
OnEnterIsDown()を実行してから、OffEnterIsDown()を実行するまでそうなります。他にも色々と応用できそうですね。