Cách dùng hàm If kết hợp On Error GoTo (1 người xem)

[minhtuan55]

Mình mới dùng hàm này. không biết đúng cú pháp không nữa. Mong mọi người chỉ giáo

 

[SA_DQ]

Sub KinhDienLoi()
Dim ABC, GPE
On Error GoTo LoiCT

1 MsgBox ABC
2 MsgBox GPE, , "Tri Trong Tham Biên GPE Là: :" & GPE
3 MsgBox "Chúc Mùng Ban!", , "Ḷòi Chào Tù GPE.COM!"

Err_:               Exit Sub
LoiCT:
If Err <> 13 Then
    Resume Err_
Else
    MsgBox Erl, , "Dang Sai Tai Ḍng Lênh " & Erl()
    Resume Next
End If
End Sub