Почему VBA DoubleClick перестал работать внезапно?

Question

Ниже кусок кода внезапно перестал работать, пожалуйста, помогите?

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

On Error Resume Next
If Target.Column = 2 And Target.Row > 27 And Target.Row < 70 Then
        UserForm1.Show
        Target.Value = returnvalue
        Cancel = True
    End If
End Sub

Answer 1

Спасибо всем за помощь. Я использовал словарь для заполнения списка в блоке инициализации формы. Диапазон, используемый для построения словаря, содержал дубликаты, вызывающие сбой кода. Обновление кода для обработки дубликатов решило мою проблему.