Cho em hỏi Cách hiển thị dữ liệu khi click chuột (1 người xem)

[ttqt30]

Em có 1 file Excel gồm 2 sheet (danhsach1 và danhsach2)
Sheet danhsach1 có cột Tên nhân viên
Em muốn khi click chuột vào 1 ô bất kỳ của cột tên nhân viên thì dữ liệu ô đó sẻ được hiển thị ở Sheet Danhsach2 tại ô màu vàng
Nhờ Anh chị chỉ dùm cách làm . em Cảm ơn trước!

 

[vu_tuan_manh_linh]

Em có 1 file Excel gồm 2 sheet (danhsach1 và danhsach2)
Sheet danhsach1 có cột Tên nhân viên
Em muốn khi click chuột vào 1 ô bất kỳ của cột tên nhân viên thì dữ liệu ô đó sẻ được hiển thị ở Sheet Danhsach2 tại ô màu vàng
Nhờ Anh chị chỉ dùm cách làm . em Cảm ơn trước!

Dùng 1 đoạn code với thủ tục worksheet_selectionchange() như file sau đây nhé bạn!

 

[ttqt30]

Anh cho em hỏi Tải file về rồi nhưng không biết xem đoạn mã ở đâu nhờ anh chỉ dùm!! camơn anh nhiều
Khi click vào tên trong DSach1 cũng không hển thị ở Ds2

 

[vu_tuan_manh_linh]

Anh cho em hỏi Tải file về rồi nhưng không biết xem đoạn mã ở đâu nhờ anh chỉ dùm!! camơn anh nhiều
Khi click vào tên trong DSach1 cũng không hển thị ở Ds2

Bạn enable macro đã nhé, như thế code mới chạy được. Muốn xem code bấm chuột phải vào 1 tab sheet bất kỳ, chọn viewcode.

 

[khoavu87]

Dùng 1 đoạn code với thủ tục worksheet_selectionchange() như file sau đây nhé bạn!

Thế này làm sao lưu được code? Để đuôi mở rộng *xlsm chứ?

 

[vu_tuan_manh_linh]

Thế này làm sao lưu được code? Để đuôi mở rộng *xlsm chứ?

Oh! Sorry! Mình không để ý đuôi file nên quên mất. Gửi lại file này chắc là được!

 

[khoavu87]

Oh! Sorry! Mình không để ý đuôi file nên quên mất. Gửi lại file này chắc là được!

Nếu theo ý Bác theo em chỉ thế này là đủ:

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("a2", Range("a100").End(xlUp))) Is Nothing Then
Worksheets("danhsach2").Activate
Worksheets("danhsach2").Range("A2").Formula = Target.Value
End If
End Sub

 

[ttqt30]

cảm ơn 2 anh Vu tuan manh Linh và khoa vũ 87 em đã nhận dc file và thủ tục rôi,Nhung có 1 thắc mắc cho em hỏi là : Nếu Dánhsach1 và danhsach2 nằm trên 2 File khác nhau thì mình có cần chỉnh sửa gì ??? để khi click tên ở 1 sheet của file này thì hiển thị tên ở 1 sheet của file kia
Rât mong các anh giúp đỡ!! thanh you alot!