Kathy sử dụng một số sổ làm việc Excel hàng ngày. Trong một số, cô ấy muốn con trỏ di chuyển xuống sau khi nhập dữ liệu và trong một số khác, cô ấy muốn con trỏ di chuyển sang phải. Cô ấy tự hỏi liệu có cách nào để lưu hướng con trỏ với từng sổ làm việc riêng lẻ không.

Hướng di chuyển của ô đã chọn sau khi bạn nhấn Enter được xác định ở cấp ứng dụng bằng cách làm theo các bước sau:

  1. Hiển thị hộp thoại Tùy chọn Excel. (Trong Excel 2007, hãy nhấp vào nút Office, sau đó nhấp vào Tùy chọn Excel. Trong Excel 2010 hoặc phiên bản mới hơn, hiển thị tab Tệp của dải băng và sau đó nhấp vào Tùy chọn.)

  2. Ở bên trái của hộp thoại, nhấp vào Nâng cao. (Xem Hình 1.)

  3. Trong Tùy chọn chỉnh sửa, đảm bảo rằng hộp kiểm “Sau khi nhấn Enter, di chuyển lựa chọn” được chọn (theo mặc định).

  4. Sử dụng danh sách thả xuống Hướng, thay đổi hướng theo ý muốn.

Thay đổi hướng ảnh hưởng đến cách Excel hoạt động trong tất cả các sổ làm việc.

  1. Nhấp vào OK.

Vì nó được xử lý ở cấp ứng dụng, cài đặt không được lưu trữ với các sổ làm việc riêng lẻ. Tuy nhiên, bạn có thể tạo một macro có thể được lưu trữ cùng với sổ làm việc và macro có thể sửa đổi hướng.

Lý tưởng nhất, macro sẽ sửa đổi hướng khi sổ làm việc được kích hoạt và khôi phục hướng khi sổ làm việc bị vô hiệu hóa — nghĩa là, khi một sổ làm việc khác được kích hoạt hoặc chương trình đã thoát.

Public MouseDirection As Long

Private Sub Workbook_Activate()

MouseDirection = Application.MoveAfterReturnDirection     Application.MoveAfterReturnDirection = xlToRight End Sub
Private Sub Workbook_Deactivate()

Application.MoveAfterReturnDirection = MouseDirection End Sub

Đây thực sự là hai macro và chúng sẽ được thêm vào đối tượng ThisWorkbook trong VBA Editor. Như được hiển thị, macro theWorkbook_Activate đặt hướng về bên phải sau khi nhấn Enter.

Nếu muốn, bạn có thể thay thế xlToRight bằng bất kỳ cái nào sau đây: xlDown, xlUp hoặc xlToLeft.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (13073) áp dụng cho Microsoft Excel 2007, 2010, 2013, 2016, 2019 và Excel trong Office 365.