- 帖子
- 154
- 主題
- 1
- 精華
- 0
- 積分
- 200
- 點名
- 3
- 作業系統
- windwos 7
- 軟體版本
- 64bit
- 閱讀權限
- 20
- 註冊時間
- 2017-5-29
- 最後登錄
- 2026-7-8
|
本帖最後由 quickfixer 於 2018-5-24 00:52 編輯
補充:不好意思,發文後才發現,你的教學裡面就有Err.Description,多發了一篇廢文
這樣就可以用err.number 錯誤代碼
也可以用err.description 錯誤訊息
看是要用什麼msgbox 提示,還是重跑程式- Sub test()
- On Error GoTo checkid
-
- ' 程式碼
-
-
-
- Exit Sub
-
- checkid:
- If Err.Number <> 0 Then
- Debug.Print Err.Description
- Debug.Print Err.Number
- End If
- End Sub
複製代碼 |
|