Guru do Excel e Power BI

Boa tarde.

Solicito a sua ajuda.

Para elaborar um contador com sequência indeterminada, conforme instrução no arquivo anexo.

Na célula A1, consta o número 1, quando clicar com o mouse na célula B1, número da célula A1, adiciona mais um, se clicar na célula C1, o número da célula A1, subtrai 1.

Grato - GENECI.

Inserir o código na Planilha1(se for o caso):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column <> 2 And Target.Column <> 3 Then Exit Sub
If Target.Column = 2 Then
Range("A2") = Range("A2") + 1
Else
Range("A2") = Range("A2") - 1
End If
End Sub

Muito obrigado pelo código.

Acredito que não me fiz entender.

Para adicionar mais 1 clic com o mouse uma vez, duplo clique novamente adiciona mais um.
No código elaborado, tenho que clicar no + ir para outra célula e retornar o sinal de + novamente.

Por favor, pode corrigir o código.

Grato - Geneci.

Tá "meio confuso"; no exemplo em anexo o acréscimo e decréscimo é efetivado com um click ou com duplo click.
Se não for isso, anexe seu arquivo com o resultado esperado...