Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Error code desriptions
- Thread starter plowmon
- Start date
Try the following sub and make Top whatever value you want or make it a parameter of the call.
Public Sub ListErrors()
Dim intCtr As Integer
Const Top As Integer = 100
For intCtr = 1 To Top
If Left(Error(intCtr), 19) <> "Application-defined" Then
Debug.Print Error(intCtr)
End If
Next
End Sub
Steve King Growth follows a healthy professional curiosity
Public Sub ListErrors()
Dim intCtr As Integer
Const Top As Integer = 100
For intCtr = 1 To Top
If Left(Error(intCtr), 19) <> "Application-defined" Then
Debug.Print Error(intCtr)
End If
Next
End Sub
Steve King Growth follows a healthy professional curiosity
- Status
Similar threads
- Locked
- Question
