VBA – Marcação automática de CheckBox

Pergunta adaptada, efectuada por um adepto do site:

“O que pretendo, é fazer com que a CheckBox19 fique marcada sem ser através do click do rato.”

Ou seja,por exemplo, numa célula colocar-se o valor 1 e a checkbox pretendida e associada à célula em causa, aparecer como marcada, como na imagem abaixo:

O código possível para isso, poderá ser este (exemplo):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

‘Coloca a flag na CheckBox19
If Range(“N14”) = 1 Then Worksheets(“entrada1”).CheckBox19.Value = True

‘Remove a flag na CheckBox19
If Range(“N14”) = 0 Then Worksheets(“entrada1”).CheckBox19.Value = False

End Sub