saut de lignes

[a10]

bonjour

est il possible lorsque je fais une saisie de pouvoir sauter une ligne

aller de la cellule b2 à b4 sans passer par la cellule b3?

a+

 

[Robert]

Re : saut de lignes

Bonjour A10, bonjour le forum,

Peut-être comme ça :

Private Sub Worksheet_Change(ByVal Target As Range) 'au changement dans une cellule
'si le changement a lieu dans la colonne 2 (=B), sélectionne la cellule au dessous de la cellule active
If Target.Column = 2 Then ActiveCell.Offset(1, 0).Select
End Sub

 

[a10]

Re : saut de lignes

bonjour,

j'ai essayé mais cela ne change rien


a+

 

[Robert]

Re : saut de lignes

Bonjour A10, bonjour le forum,

Tu dois avoir raison...

 

[a10]

Re : saut de lignes

Bonjour,

Est il possible d aller de la cellule a2 appuyer sur entrée et d aller en a4 directement
A +

 

[JCGL]

Re : saut de lignes

Bonjour à tous,

Dans le module de la feuille concernée :

Option ExplicitPrivate Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then ActiveCell.Offset(1, 0).Select
End Sub

A+ à tous

 

[job75]

Re : saut de lignes

Bonjour a10, salut Robert, Jean-Claude 🙂

Il y a aussi cette possibilité :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Row > 1 Then If IsEmpty(ActiveCell) _
  And Not IsEmpty(ActiveCell(0)) Then ActiveCell(2).Select
End Sub

Alors a10 vous marinez depuis 3 mois alors que la solution de Robert va très bien ?

Mais tout dépend de ce que vous voulez faire...

A+

 

[job75]

Re : saut de lignes

Re,

On peut aussi ne permettre la sélection que sur les lignes paires :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count = 1 And Target.Row > 1 And Target.Row Mod 2 Then Target(2).Select
End Sub

A+