Viết Code thay thế công thức trong VBA (1 người xem)

[Vũ Trọng Đạt]

Chào cả nhà, mọi người giúp mình viết đọn code như sau với:
Nếu ô L10 thay đổi thì: nếu ô(i,1)<L10 nhận giá trị "dk"
nếu ô(i,1)<=L11 nhận giá trị "tk"
còn lại là"k"

 

[nhapmon]

đây là đạon code giúp chạy macro khi bạn thay đổi lở cell L10.
còn yêu cầu thứ 2 của bạn mình ko hiểu
nếu Ô (i,1)<L10 là sao
rồi ô (i,1)<L11 là sao có phải là từ ô A1 đến A9 =dk, nói chung là ko hiểu, bạn tự xử vậy



Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Excel.Range)
Static OldVal
If Range("L10").Value <> OldVal Then
' đoạn code bạn ở đây
OldVal = Range("L10").Value
End If
End Sub

 

[hungpecc1]

Chào cả nhà, mọi người giúp mình viết đọn code như sau với:
Nếu ô L10 thay đổi thì: nếu ô(i,1)<L10 nhận giá trị "dk"
nếu ô(i,1)<=L11 nhận giá trị "tk"
còn lại là"k"

Bạn giải thích cụ thể các thuật ngữ sau :

ô (i,1) tức là các ô ở cột A phải không ?

Nếu ô ( i,1) < L10 nhận giá trị "dk" tức là L10= dk hay (i,1) = dk

Thanks