|
kanabunさま
うううう、、、出来ました。。
本当にありがとうございます。
今までは入力後のセルの移動を右にしても、たな卸し時にバーコードをスキャン
すると自動で下にいってしまうカーソルを右に手動でずらし個数を入れていました。
これで残業が減りそうです。
ありがとうございました。。
▼kanabun さん:
>▼ねい さん:
>
>複数のBookを開いていて、このBookだけ Enterのときの移動方向を
><右へ>としたい(他のBookは デフォルトの <下へ> とする)のなら、
>先ほどのを 以下に差し替えてください。
>
>Private Sub Workbook_Open()
> Application.MoveAfterReturnDirection = xlToRight
> Dim ws As Worksheet
> For Each ws In Worksheets
> ws.ScrollArea = "A:E"
> Next
>End Sub
>
>Private Sub Workbook_Activate()
> Application.MoveAfterReturnDirection = xlToRight
>
>End Sub
>Private Sub Workbook_Deactivate()
> Application.MoveAfterReturnDirection = xlDown
>End Sub
|
|