automatisation changement cellule

[lm87]

Bonjour à tous,
je n'arrive pas à trouver de réponses et pourtant j'ai chercher.
Voilà mon soucis. Je viens de créer une feuille "paramètres" avec des cellules séparées. J'ai restreint dans ces cellules, la saisie à 1 chiffre et changer le sens du déplacement, vers la droite. J'aimerais maintenant automatiser le passage d'une cellule à la suivante sans pour cela avoir à taper ou sur TAB ou ENTREE ou utiliser les flèches directionnelles.

A1(saisie) passage auto sur B1

Une bonne âme aurait elle la solution à mon problème.
Je débute en VBA, mais je pense que la solution passe par là.

remerciements

 

[Bertrange35]

Re : automatisation changement cellule

Si j'ai bien compris...

Dans Outils-Options et onglet Modification
Tu change le sens du déplacement de la sélection après validation...

 

[Pierrot93]

Re : automatisation changement cellule

Bonjour lm, Bertrange

regarde le code ci dessous, à placer dans le module de la feuille concernée (click droit sur l'onglet, visualiser le code et tu colles) :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Len(Target.Value) = 1 Then
    If Target.Column < 256 Then
        Target.Offset(0, 1).Select
    Else
        Target.Offset(1, -255).Select
    End If
End If
End Sub

bonne soirée
@+

 

[lm87]

Re : automatisation changement cellule

oui , tout a fait mais la validation est un surplus, surtout que je ne suis pas seul à me servir de cette mise en forme

 

[lm87]

Re : automatisation changement cellule

ok merci. Je teste demain sans faute

 

[Pierrot93]

Re : automatisation changement cellule

Re

attention, il faut tout de même faire au minimum ENTER pour sortir de la cellule, donc.... perso pas d'autre solution....

@+

 

[lm87]

Re : automatisation changement cellule

justement, c'est cette opération ENTER que j'aimerais automatiser.
on va bien réussir à trouver en grattant un peu.

@+ bonne soirée et merci