Como adicionar 2 funções click no excel

0

Eu tenho o seguinte código que copia valores de uma folha para outra ao pressionar B2. Eu tenho 20 células diferentes que eu quero ser capaz de clicar, que devem exibir vários textos de diferentes abas. Eu estou lutando para encontrar uma boa solução para este problema. Qualquer ajuda seria appreaciated

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
    
por Peter 19.04.2018 / 15:27

0 respostas