Hỏi về Validation (1 người xem)

[emgaingayngo]

Tôi có 2 cell chứa Validation là A2 và B2 và Row 1:1 chứa công thức để tìm ngày khi Cell A2 thay đổi giá trị. Cell B2 là chứa List ngày của Row 1:1(dùng Validation). Khi thay đổi nội dung của Cell A2 thì Row1:1 thay đổi nội dung ngày(tất nhiên rồi), nhưng tại thời điểm đó thì giá trị hiện hành của cell B2 vẫn chưa thay đổi nội dung theo Row1:1, chỉ khi nào mình click vào validation cell B2 thì nội dung cell B2 mới thay đổi.
Xin cho tôi hỏi có cách nào khi mình thay đổi nội dung Cell A2 thì B2 thay đổi nội dung ngay lập tức(có thể trả về gía trị của Cell A1)?
Nếu dùng câu lệnh trong VBA thì viết như thế nào?
Trong VBA xin hỏi mình dùng hàm nào để lấy được giá trị đầu tiên hoặc một giá trị do mình chỉ định ?

 

[SA_DQ]

Bạn chép đoạn mã sau, cho vô phần code của SheetName xem sao:

[b]Private Sub Worksheet_Change(ByVal Target As Range)[/b]
    If Not Intersect(Target, Range("A2:A9")) Is Nothing Then
      Target.Offset(0, 1) = Range("A1").Value
    End If[b]    
End Sub[/b]

(Nếu chỉ đổi tại A2 & cập nhật tại B2 thì bỏ bớt Range("A2:A9") => Range("A2") )