Automatiser déplacement saisie dans des cellules non adjacentes Fermé

Question

Bonjour,

J'ai fait un tableau excel dont certaines cellules sont le résultat de formules.
 Je les ai verrouillées, j'ai programmé avec les options avancées le sens de déplacement.
En revanche, lorsque je suis dans une cellule, pour saisir un nombre dans une autre cellule non adjacente (type 2 cellules en dessous) je voudrais pouvoir programmer mon déplacement automatiquement. Est-ce possible ?

Merci de vos réponses

Boisgontierjacques · Answer

Bonjour,

dans le classeur, il y a 4 exemples de saisie guidée.

http://boisgontierjacques.free.fr/fichiers/jb-worksheetchange.zip

On définit l'ordre dans lequel les cellules doivent être parcourues 
Faire une sélection multiple des cellules dans l'ordre souhaité et nommer le champ

Private Sub Worksheet_Activate()
    ActiveSheet.EnableSelection = xlUnlockedCells
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
  For i = 1 To Range("champ").Count
    If Range("champ").Areas(i) = Target.Value Then
       If i = Range("champ").Count Then p = 1 Else p = i + 1
       Range("champ").Areas(p).Select
    End If
  Next i
End Sub


JB

beotien78 · Answer

Re bonjour,

Je suis désolée mais n'ayant pas une connaissance pointue de programmation, d'où mon pseudo, et cherchant une solution accessible à un "béotien", je ne comprends hélas rien.

Pouvez-vous m'expliquez ce que vous me proposez et où trouver les formules ?

Automatiser déplacement saisie dans des cellules non adjacentes

2 réponses

Discussions similaires