Lưu kết quả tìm kiếm khi dữ liệu gốc thay đổi. (1 người xem)

[helloflove]

Tình hình là mình đang gặp bài toán ntn :
Giả sử A1 là ô chứa dữ liệu gốc
Cột B là cột hiển thị kết quả tìm kiếm

Mục đích : khi giá trị ở A1 = 10 , B1 hiển thị 10 .Khi A1 =20, B1 vẫn giữ giá trị 10, B2 hiển thị 20.

Giúp mình với , ăn nhiều bí ngô quá .

 

[Hai Lúa Miền Tây]

Tình hình là mình đang gặp bài toán ntn :
Giả sử A1 là ô chứa dữ liệu gốc
Cột B là cột hiển thị kết quả tìm kiếm

Mục đích : khi giá trị ở A1 = 10 , B1 hiển thị 10 .Khi A1 =20, B1 vẫn giữ giá trị 10, B2 hiển thị 20.

Giúp mình với , ăn nhiều bí ngô quá .

Bạn dùng thử code sau coi phải vậy không nhé.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Range("B" & [b65000].End(xlUp).Row + 1) = Target
  

End Sub

 

[helloflove]

Cảm ơn bạn đã giúp mình, nhưng với macro trên mình thấy chỉ tác dụng khi trực tiếp sửa số liệu trên $a$1 còn thay đổi bằng copy paste thì không tác dụng.
Mục đích của mình là biến công việc nhập liệu dễ nhầm lẫn và mệt mỏi sang copy paste.
Mình up file cụ thể lên bạn xem thử giúp mình nhé.
Mình muốn lấy dữ liệu ở ô b8, 9,10 sang các cột K,L,M . Bạn có thể copy dữ liệu ở sheet 2,3 sang 1 để kiểm tra.
Thx.

 

[helloflove]

update ..............