Использование значения активной ячейки в метке пользовательской формы

Question

Я открываю пользовательскую форму при двойном щелчке по ячейке;

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

    If Not Intersect(Range("B5:K20"), Target) Is Nothing Then

    Cancel = True
    UserForm1.Show

    End If

End Sub

Я хотел бы добавить значение ячейки из ячейки, которую я дважды щелкнул, к метке 1 в пользовательской форме.

Я пытался UserForm1.Label1.Caption = ActiveCell.Value после UserForm1.Show.При первом двойном щелчке пользовательская форма не показывает значения в Label1, во второй раз, когда я дважды щелкаю по ячейке, Label1 показывает значение ячейки в первой ячейке, по которой я дважды щелкнул.

Как отобразить текущее значение (дважды-кликнул) значение ячейки при открытии пользовательской формы?

Answer 1

Возможно, скажите Excel, что метка должна отображаться перед показом формы.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim s As String
    If Not Intersect(Range("B5:K20"), Target) Is Nothing Then
        s = Target.Value

        UserForm1.Label1.Caption = s
        UserForm1.Show
    End If
    Cancel = True

End Sub