Error Statement

kingy

New Member
Joined
Sep 14, 2002
Messages
14
How do you go about writing an error statement in VBA??? So when an error occurs it will run a set piece of code?

Kingy
 

Excel Facts

What does custom number format of ;;; mean?
Three semi-colons will hide the value in the cell. Although most people use white font instead.
on error goto errorhandler



where errorhandler is a marked line in your code (I stick mine at the end)

then you can use the select case command to tell VBA what to do in each case of errors
 
Upvote 0
thanks, havent done much VB coding in a long time, am a bit scratchy, couldnt for the life of me rememeber the code, thats ne way for the help...

Kingy
 
Upvote 0
Hi Kingy,

A large part of how you handle errors comes down to personal choice. You could try to modify the following code to suit your needs.

<pre>
Sub AnyRoutine()
Dim MyArray() As Integer
Dim VBCompName As String, ProcName As String

'Module is already in progress

On Error GoTo ErrHandler
'Tell VBA to use trapping routine

MyArray(8) = 234
'This will cause Error 9 - Subscript out of range
'The number of elements in an array must be explicitly stated
'Module continues then

Exit Sub
'You must exit the sub or the Error Handler is invoked
'everytime you come to the end of the macro

ErrHandler:
' Module to handle errors

VBCompName = Application.VBE.SelectedVBComponent.Name
ProcName = "AnyRoutine" 'change for each routine

MsgBox "The following error has arisen :" & _
Chr(13) & Chr(13) & "Number : " & Err.Number & _
Chr(13) & Chr(13) & "Description : " & Err.Description & _
Chr(13) & Chr(13) & "Project Source : " & Err.Source & _
Chr(13) & Chr(13) & "Module Source : " & VBCompName & _
Chr(13) & Chr(13) & "Procedure Source : " & ProcName


Resume Next
' Return control to next statement after error

End Sub

</pre>

HTH
 
Upvote 0

Forum statistics

Threads
1,218,501
Messages
6,142,836
Members
450,450
Latest member
Rachel_D

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top