Skip to content

Instantly share code, notes, and snippets.

@DuongAQ
Created Apr 5, 2019
Embed
What would you like to do?
Sub KiemTra()
Dim CheckMa As Integer
Dim SoDong As Long
CheckMa = Range("E4").Value
SoDong = Range("E5").Value
If CheckMa = 0 Then
MsgBox "Ma khong ton tai"
Exit Sub
Else
Sheet1.Range("C" & SoDong).Value = "X"
MsgBox "Thanh cong"
End If
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment