Excel, En cliquant sur Cellule, le Focus est déplacé vers une autre cellule

Question

En Excel, je veux avoir une cellule (B10) qui en cliquant dessus, le focus changera en une autre cellule (C12).

Cette autre cellule est définie dans une autre cellule (A2).

Une idée?

GorovDude

Answer 1

Utilisez worksheet_selectChange. En substance, le code ressemblera à ceci:

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
    If Target.Address = Range("B10").Address Then 
     Dim rng As Range 
     Set rng = Range("A2") 
     Range(rng.Value).Select 
    End If 
End Sub 

J'ai codé en dur les adresses de gamme pour plus de clarté.

Answer 2

Ce code Cause (A2) à sélectionner à chaque fois que l'utilisateur clique dans la colonne B:

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
If Not Application.Intersect(Range("B:B"), Target) Is Nothing Then 
Range("A2").Select 
End If 
End Sub