LibreOffice 25.2 Help
āĻāĻāĻāĻŋ āϤā§āϰā§āĻāĻŋ āϏāĻāĻāĻāύā§āϰ āĻĒāϰ⧠āĻāĻāĻāĻŋ āϤā§āϰā§āĻāĻŋ āĻšā§āϝāĻžāύā§āĻĄāϞāĻŋāĻ āϰā§āĻāĻŋāύ āϏāĻā§āϰāĻŋā§ āĻāϰāĻž āĻšā§, āĻ āĻĨāĻŦāĻž āĻĒā§āϰā§āĻā§āϰāĻžāĻŽ āĻāĻžāϞāύāĻž āϏā§āĻĨāĻāĻŋāϤ āĻāϰ⧠āϰāĻžāĻāĻž āĻšā§āĨ¤
On [Local] Error {GoTo Labelname | GoTo 0 | Resume Next}
GoTo Labelname: āϝāĻĻāĻŋ āϤā§āϰā§āĻāĻŋ āϏāĻāĻāĻāĻŋāϤ āĻšā§, āϤāĻžāĻšāϞ⧠"Labelname" āϞāĻžāĻāύ⧠āĻļā§āϰ⧠āĻšā§ āĻāĻŽāύ āϤā§āϰā§āĻāĻŋ āĻšā§āϝāĻžāύā§āĻĄāϞāĻŋāĻ āϰā§āĻāĻŋāύ āϏāĻā§āϰāĻŋā§ āĻāϰāĻž āĻšā§āĨ¤
Resume Next: āϝāĻĻāĻŋ āĻāĻāĻāĻŋ āϤā§āϰā§āĻāĻŋ āϏāĻāĻāĻāĻŋāϤ āĻšā§, āϤāĻžāĻšāϞ⧠āϝ⧠āϏā§āĻā§āĻāĻŽā§āύā§āĻā§ āϤā§āϰā§āĻāĻŋ āϏāĻāĻāĻāĻŋāϤ āĻšā§ā§āĻāĻŋāϞ āϏ⧠āĻ āύā§āϏāĻžāϰāĻŋ āϏā§āĻā§āĻāĻŽā§āύā§āĻ āϏāĻš āĻĒā§āϰā§āĻā§āϰāĻžāĻŽ āĻāĻžāϞāύāĻž āĻŦāĻšāĻžāϞ āϰāĻžāĻāĻž āĻšā§āĨ¤
GoTo 0: Disables the error handler in the current procedure.
Local: Optional. The keyword is a reminder the statement is local to the routine which invokes it; when the routine exits, this error handling is canceled automatically.
Sub ExampleReset
On Error GoTo ErrorHandler
Dim iNumber As Integer
Dim iCount As Integer
Dim sLine As String
Dim aFile As String
aFile = "C:\Users\ThisUser\data.txt"
iNumber = Freefile
Open aFile For Output As #iNumber
Print #iNumber, "This is a line of text"
Close #iNumber
iNumber = Freefile
Open aFile For Input As iNumber
For iCount = 1 To 5
Line Input #iNumber, sLine
If sLine <>"" Then
Rem
End If
Next iCount
Close #iNumber
Exit Sub
ErrorHandler:
Reset
MsgBox "All files will be closed", 0, "Error"
End Sub