Nhờ sửa code cho phép copy

[adolescent]

Lang thang trên Diễn đàn thấy có đoạn code sau thấy cũng hay hay nên sử dụng thử nhưng kết quả thấy không thực hiện được copy và past trong bảng tính có code này.
Nhờ anh chị sửa code như thế nào hay có cách gì khắc phục tình trạng này. Cảm ơn anh chị.

Sub worksheet_selectionchange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
'Rows(Target.Row).Interior.ColorIndex = 4
Range("A" & Target.Row & ":J" & Target.Row).Interior.ColorIndex = 4

End Sub

 

[SA_DQ]

Nếu bạn dùng đoạn mã này:

Option Explicit
Sub worksheet_selectionchange(ByVal Target As Range)
If Not Intersect(Target, Columns(1)) Is Nothing Then
   Cells.Interior.ColorIndex = xlNone
   Range("A" & Target.Row & ":J" & Target.Row).Interior.ColorIndex = 4
 End If
End Sub

Thì chỉ còn vướng vấn đề Copy đến ô nào đó của cột 'A' là không đặng mà thôi.

 

[adolescent]

Nếu bạn dùng đoạn mã này:

Option Explicit
Sub worksheet_selectionchange(ByVal Target As Range)
If Not Intersect(Target, Columns(1)) Is Nothing Then
   Cells.Interior.ColorIndex = xlNone
   Range("A" & Target.Row & ":J" & Target.Row).Interior.ColorIndex = 4
 End If
End Sub

Thì chỉ còn vướng vấn đề Copy đến ô nào đó của cột 'A' là không đặng mà thôi.

Thông thường thì em copy nguyên cả hàng luôn. Bác Sa nghiên cứu giúp em.

 

[ndu96081631]

Thông thường thì em copy nguyên cả hàng luôn. Bác Sa nghiên cứu giúp em.

Ai lại Highlight kiểu đó chứ! Hóa ra trước đó bạn tô màu gì thì nó xóa sạch à?
Trên GPE có rất nhiều bài nói về vấn đề này, bạn tham khảo nhé:
http://www.giaiphapexcel.com/forum/showthread.php?t=4823
http://www.giaiphapexcel.com/forum/showthread.php?t=7671

 

[adolescent]

Ai lại Highlight kiểu đó chứ! Hóa ra trước đó bạn tô màu gì thì nó xóa sạch à?
Trên GPE có rất nhiều bài nói về vấn đề này, bạn tham khảo nhé:
http://www.giaiphapexcel.com/forum/showthread.php?t=4823
http://www.giaiphapexcel.com/forum/showthread.php?t=7671

Đúng là như thế không tô màu được luôn. sử dụng mã này bất tiện đủ thứ trời đất "lợi bất cập hại" nhưng nói chung chắc tại em không biết. hihi....
rất cảm ơn các anh chị đã quan tâm đến vấn đề này. Em sẽ học hỏi từ từ.