Xóa bỏ thôg báo khi không tìm thấy file text (2 người xem)

[Tung08.van]

Chào anh chị. Em gặp vấn đề thế này,anh chị giúp em tìm cách với ạ.
Em có 1 file,em dùng macro ghi lại cách Import file text vào trong excel. File text đó lấy từ 1 sever dùng chung. Khi ai đấy dùng file,rút mạng ra sẽ báo lỗi là không thấy file và chỉ tới đường dẫn file text em ẩn đi. Em xin hỏi có cách nào bỏ thông báo lỗi không tìm thấy file text của em đi không ạ. Em cảm ơn.

 

[befaint]

có cách nào

Trả lời: Có!

 

[SA_DQ]

Mỗi lỗi mà bạn được báo đều gắn với 1 mã lỗi (Err); Cái Err này bạn cần biết để thực thi chuyện bẫy lỗi
Mình ví dụ

Sub GPE_COM()
On Error GoTo LoiCT
'  Các Lênh Cua Ban  '
' *    *     * *     *     *  '
Err_ :   Exit Sub
LoiCT:
  If Err=13 Then
      MsgBox "Ban Da Tói Dây!":           Resume Next
  Else
     MsgBox Err:                          Goto Err_
  End If
End Sub