Cell luôn ở chế độ Edit

[chibi]

Để sửa chữa dữ liệu trong các cell ta phải thực hiện thao tác để con trỏ nhấp nháy trong ô - khi đó cell trong trạng thái Edit.
Xin hỏi các bạn, có cách nào để cell luôn ở trạng thái edit?

 

[Mr Okebab]

Không có, chỉ có cách là nhấn F2 (bằng tay hoặc = VBA), hay một cái gì đó tương tự.
Thân!

 

[chibi]

Không có, chỉ có cách là nhấn F2 (bằng tay hoặc = VBA), hay một cái gì đó tương tự.
Thân!

Cảm ơn, dùng bằng VBA như thế nào nhỉ?

 

[tedaynui]

Cảm ơn, dùng bằng VBA như thế nào nhỉ?

Gởi Chibi,
Chibi dùng cái này thử xem có được không :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    SendKeys "{F2}"
End Sub

Thân!

 

[Trần Văn Bình]

Tiện thể cho tôi hỏi luôn nếu dùng phím kết hợp thì viết thế nào
ví dụ: Ctrl+C, Ctrl+V
Biết răng không nên các chế độ này thường trực trong cells nhưng tôi muốn biết cách làm như thế nào

 

[digita]

Tiện thể cho tôi hỏi luôn nếu dùng phím kết hợp thì viết thế nào
ví dụ: Ctrl+C, Ctrl+V
Biết răng không nên các chế độ này thường trực trong cells nhưng tôi muốn biết cách làm như thế nào

Đây là 1 thí dụ đơn giàn. Qua đây bạn sẽ có thể tự viết lấy code cho nút Ctrl + V.

[FONT=Arial][SIZE=3]Sub CtrlC()[/SIZE][/FONT]
[FONT=Arial][SIZE=3]Application.OnKey "^C", "Test"[/SIZE][/FONT]
[FONT=Arial][SIZE=3]End sub[/SIZE][/FONT]

[FONT=Arial][SIZE=3]Sub Test()[/SIZE][/FONT]
[FONT=Arial][SIZE=3]Msgbox “Ban moi bam Ctrl + C”[/SIZE][/FONT]
[FONT=Arial][SIZE=3]End sub[/SIZE][/FONT]

Mến chào

 

[tedaynui]

Đây là 1 thí dụ đơn giàn. Qua đây bạn sẽ có thể tự viết lấy code cho nút Ctrl + V.

[FONT=Arial][SIZE=3]Sub CtrlC()[/SIZE]
[/FONT] [FONT=Arial][SIZE=3]Application.OnKey "^C", "Test"[/SIZE]
[/FONT] [FONT=Arial][SIZE=3]End sub[/SIZE]
[/FONT]

[FONT=Arial][SIZE=3]Sub Test()[/SIZE]
[/FONT] [FONT=Arial][SIZE=3]Msgbox “Ban moi bam Ctrl + C”[/SIZE]
[/FONT] [FONT=Arial][SIZE=3]End sub[/SIZE][/FONT]

Tuy nhiên lệnh Application.Onkey này hình như không có "ép phê" với bàn phím số (Numpad).

Thân!

 

[digita]

Tuy nhiên lệnh Application.Onkey này hình như không có "ép phê" với bàn phím số (Numpad).

Thân!

Dùng nút số cũng "áp phê" luôn. Lưu ý cần xài số mã ASCII cho các số và số mã ASCII phải trong ngoặc {}. Các số mã ASCII là như sau:

0 96
1 97
2 98
3 99
4 100
5 101
6 102
7 103
8 104
9 105

Bạn thử các đoạn mã sau nhá.

Cái này mở onkey với ctrl + 0

[FONT=Arial][SIZE=3]Sub Enable()[/SIZE][/FONT]
[SIZE=3][FONT=Arial] Application.OnKey "^{96}", "Test"[/FONT][/SIZE]
[FONT=Arial][SIZE=3]End Sub[/SIZE][/FONT]

[FONT=Arial][SIZE=3]Sub Test()[/SIZE][/FONT]
[SIZE=3][FONT=Arial] MsgBox "Ban bam Ctrl + 0"[/FONT][/SIZE]
[FONT=Arial][SIZE=3]End Sub[/SIZE][/FONT]

Tắt onkey

[FONT=Arial][SIZE=3]Sub Disable()[/SIZE][/FONT]
[SIZE=3][FONT=Arial] Application.OnKey "^{96}"[/FONT][/SIZE]
[FONT=Arial][SIZE=3]End Sub[/SIZE][/FONT]

Ta nên dùng Onkey với ctrl + nút 1 con số vì nó không có trùng với những hotkey mặc định (thí dụ Ctrl + c = copy, Ctrl + v = paste).

Mến

 

[tedaynui]

Thì ra phải dùng mã ASCII, vậy mà lâu nay tưởng đây là hạn chế của Excel. Hi hi..., thì ra là hạn chế của mình.
Cám ơn Digita nhiều.

Thân !

 

[digita]

Không có chi Tedaynui ạ. Học lẩn nhau mà.

 

[Trần Văn Bình]

Gởi Chibi,
Chibi dùng cái này thử xem có được không :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    SendKeys "{F2}"
End Sub

Thân!

thế nào ?Tiện thể cho em hỏi với trường hơp trên nhưng em cần edit vùng dữ liệu từ G10:H2000 theo thứ tự từng xen thì làm