I've got following code in the beginning of my procedure:
With Application
.ScreenUpdating = False
.Calculation = xlCalculationManual
.Cursor = xlWait
.DisplayStatusBar = True
End With
but sometimes my function will result in an error. Is it possible to 'restore' the settings...