如何在 Excel 中添加 2 个单击函数

如何在 Excel 中添加 2 个单击函数

我有以下代码,当按下 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

相关内容