My app is not working as stable. Very often it cannot be
opened and I need to recover it from backup.
I'm getting the error message like this:
"Excel.exe has generated error and will be closed by
Windows. You will need to restart the program. An error
log is being created." (I don't know where this file is
located.)

I suspect the following code I'm using for combobox.

Private Sub ComboBox1_Change()

On Error GoTo ComboBox1_Change_Err
Me.ComboBox1.ListFillRange = "R3:R97"
With Worksheets("Legend").Range("a3:a448")
.Borders.LineStyle = xlLineStyleNone
.Borders.ColorIndex = 2
.Borders.Weight = xlThin
Set c = .Find(ComboBox1.Value,
LookIn:=xlValues)

c.Borders.LineStyle = xlDouble
c.Borders.Weight = xlThick
c.Borders.Color = RGB(255, 0, 0)
c.Activate

End With
Application.ScreenUpdating = True


ComboBox1_Change_exit:
Exit Sub
ComboBox1_Change_Err:
MsgBox Error
Resume ComboBox1_Change_exit

End Sub

Could anybody advise anything?

Thanks