Mình nghĩ rằng bạn phải nêu rõ cách nhập dữ liệu của bạn chẳng hạn như:cho hỏi phải dùng hàm nào khi mình gỏ chử tháng thì nó đổi thành số ( ex: gỏ chử january thì nó đổi thành 1 )
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A99")) Is Nothing Then
If UCase$(Target) = "JANUARY" Then
Target.Offset(, 2) = 1: Target = ""
End If: End If
End Sub
Cách nhanh nhất và để có thể áp dụng luôn cho toàn bộ dử liệu, bạn làm như sau:cho hỏi phải dùng hàm nào khi mình gỏ chử tháng thì nó đổi thành số ( ex: gỏ chử january thì nó đổi thành 1 )
Thang={"January";"February";"March";"April";"May";"June";"July";"August";"September";"October";"November";"December"}
=MATCH(A1,Thang,0)