déplacerle curseur à gauche

[clautu]

Bonsoir à tous,
J'utilise une macro qui agit comme un toggle button.
je voudrais qu'a la fin il y ait une commande qui dise au curseur de se positionner dans la cellule a gauche de la cellule active. Voici la macro et qu'elle serait ma dernière ligne qui lui dirait de déplacer le curseur dans la cellule à gauche de celle dans laquelle il est

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(ActiveCell, Range("c2:c112")) Is Nothing Then
'***détermine si la cellule sélectionnée appartient à la cible...
Static TB As Boolean
TB = Not TB
ActiveCell.Value = IIf(TB, "A", "I")


End If
End Sub

Merci !!

 

[excalibur]

Re : déplacerle curseur à gauche

bonjour clautu le forum essaie comme cela derniere ligne
ActiveCell.Offset(0, -1).Select
salutations

 

[wilfried_42]

Re : déplacerle curseur à gauche

Bonjour à tous

Un offset(0,-1) si l'on se trouve en colonne A plantera

SendKeys "+{tab}"

simule un shift tab

 

[clautu]

Re : déplacerle curseur à gauche

Merci à tous c'est en plein ça