I've got this code:

Sub TimeCTSProcess()
Dim sglStartTime As Single
Dim sglEndTime As Single
Dim sglDuration As Single

sglStartTime = Timer
Call ProcessCTSWorkbooks
sglEndTime = Timer
sglDuration = Round(((sglEndTime - sglStartTime) / 60), 2)

MsgBox "CTS Eplanning Excel files processed in " & sglDuration & "
minutes!", _
vbInformation, "Processing Status"

End Sub

There is an error handler within ProcessCTSWorkbooks that works fine,
however I would prefer than when an error is encountered it would display the
msgbox associated with the error handler in ProcessCTSWorbooks and exit the
sub. Currently, I get the error message associated with ProcessCTSWorkbooks,
AND the message box associated with TimeCTSProcess.