Activation d'une cellule

[jean23]

Bonjour,

Après avoir remplis la cellule (0,2), est il possible d'activer automatiquement une autre cellule

Voila le code actuel

Private Sub CommandButton1_Click()
ActiveCell.Offset(0, 0).Value = ListBox1
ActiveCell.Offset(0, 1).Value = Label1
Unload Me
ActiveCell.Offset(0, 2).Activate 'active la cellule
End Sub

Merci de vos réponses

 

[Staple1600]

Re : Activation d'une cellule

Bonsoir

Private Sub CommandButton1_Click()
ActiveCell.Offset(0, 0).Value = ListBox1
ActiveCell.Offset(0, 1).Value = Label1
Unload Me
ActiveCell.Offset(0, 2).Activate 'active la cellule
ActiveCell.Offset(0+1, 2+1).Activate ' en fait +n
End Sub


C'est ce qu tu veux faire,

 

[jean23]

Re : Activation d'une cellule

Bonsoir Staple1600 et le forum,

Merci de la réponse que je viens de tester, mais petit problème.
J'explique:

ActiveCell.Offset(0, 2).Activate 'active la cellule C1
Quand la cellule C1 est remplie je souhaite que la cellule J1 soit activée automatiquement

Or avec le code

ActiveCell.Offset(0+1, 2+1).Activate ' en fait +n

ma cellule c1 n'est plus activée car l' activation passe directement a la cellule H2

 

[Staple1600]

Re : Activation d'une cellule

C'était juste un exemple

Mais tu ne peux avoir deux cellules actives en meme temps?

pour activer H2

Cells(2,8).Select