Hi all,
I was just wondering if it is possible to put the code below into a module and then call on the module in error handling? It would save a lot of lines to add to each sub that needed it?
Not sure if its possible or not but seemed like a great idea to me?Code:Private Sub Name() On Error GoTo Err_Handler 'Your Code Exit_Handler: Exit Sub Err_Handler: Select Case Err Case Else MsgBox "Error " & Err & ": " & Error$, vbExclamation, "Name()" Resume Exit_Handler End Select End Sub
Sure would save a lot of lines.....
Thanks
Dave