У меня есть следующий код, который копирует значения с одного листа на другой при нажатии B2. У меня есть 20 различных ячеек, по которым я хочу щелкнуть, и на которых будут отображаться различные тексты с разных вкладок. Я изо всех сил пытаюсь найти хорошее решение этой проблемы. Любая помощь будет оценена

If Selection.Count = 1 Then
    If Not Intersect(Target, Range("B2")) Is Nothing Then
        Worksheets("B").Range("A:J").Copy Worksheets("A").Range("M:V")

    End If
End If

0