Câu hỏi của bạn mình không có cách làm, nhưng mình có thể làm theo cách khác. Nếu sau khi nhập xong quá 2 ký tự và nhấn enter thì bang tinh không cho phép.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Len(ActiveCell.Offset(-1)) > 2 Then
ActiveCell.Offset(-1).Select
End If
End Sub