Projekt oder Bibliothek nicht gefunden

Private Sub Combobox20_Change()
On Error Resume Next
'SPERRT DIE COMBOBOXEN WENN KEIN STANDORT AUSGEWÄHLT IST
ComboBox30.Enabled = Not Combobox20.Value = "Berlin"
End Sub