Bonjour
Une solution est de sélectionner une autre cellule lorsque la souris click dessus, avec cette macro par exemple:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If ActiveCell.Address = "$A$1" Then Range("B1").Select
End Sub
Cela fonctionne aussi si on essaie d'y accéder avec les touches de direction.