Hỏi cách lập trình thứ tự nhảy ô theo ý muốn khi ấn enter (1 người xem)

[luclamchamtim]

Như tiêu đề mình muốn nhờ các cao thủ lập trình thứ tự nhảy ô theo ý muốn khi ấn enter.
Mọi người xem file đính kèm sẽ dễ hiểu hơn nhé

 

[befaint]

Như tiêu đề mình muốn nhờ các cao thủ lập trình thứ tự nhảy ô theo ý muốn khi ấn enter.
Mọi người xem file đính kèm sẽ dễ hiểu hơn nhé

Cùi bắp thì không cần lập trình, làm như sau:

1/ Excel Options, Advanced, Editing options, check: After pressing Enter, move selection / Direction: Right

2/ Thiết lập bảng tính:
- Lock cell toàn bộ bảng tính, rồi unlock cell hai vùng tô màu
- Protect sheet, mục Allow all users of this worksheet to:
Hủy check dòng: Select locked cells
Check dòng select unlocked cells.
OK.

Kết thúc.

 

[ndu96081631]

Như tiêu đề mình muốn nhờ các cao thủ lập trình thứ tự nhảy ô theo ý muốn khi ấn enter.
Mọi người xem file đính kèm sẽ dễ hiểu hơn nhé

Chỉ bạn cách đơn giản, khỏi lập trình gì luôn:
1> Đầu tiên bạn ẩn cột D và E
2> Tiếp theo vào Excel Options ---> Advanced ---> mục "After pressing enter, move selection", chọn Right trong dropdown list Direction




















3> Giờ chỉ việc quét chọn vùng B4:G13 rồi nhập liệu và Enter thoải mái, activecell sẽ di chuyển đúng ý của bạn luôn

 

[phulien1902]

Như tiêu đề mình muốn nhờ các cao thủ lập trình thứ tự nhảy ô theo ý muốn khi ấn enter.
Mọi người xem file đính kèm sẽ dễ hiểu hơn nhé

Thử với:

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Count > 1 Then Exit Sub  
 If Target.Column = 7 Then Target.Offset(1, -5).Select  
 If Target.Column = 3 Then Target.Offset(, 3).Select 
  If Target.Column = 2 Then Target.Offset(, 1).Select 
  If Target.Column = 6 Then Target.Offset(, 1).Select
End Sub