déplacement automatisé

wazzebu

XLDnaute Occasionnel

• 20 Août 2007

• #2

Re : déplacement automatisé

Bonjour,

je crois qu'en protégeant la feuille tu peux y arriver:

Tu protège tout sauf A1 et B10 et quand tu feras TAB sur A1 le curseur iras automatiquement sur B10.

Voila une solution

@+

 

Vote positif 0 Vote négatif

Spitnolan08

XLDnaute Barbatruc

• 20 Août 2007

• #3

Re : déplacement automatisé

Bonjour à tous,

Une solution VBA avec un code à mettre dans le module de la feuille concernée que la feuille soit protégée ou non :

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("A1")) Is Nothing Or Range("A1") = "" Then Exit Sub
    Range("B10").Select
End Sub

Cordialement

 

Dernière édition: 20 Août 2007

Vote positif 0 Vote négatif

D

darib52

XLDnaute Junior

• 20 Août 2007

• #4

Re : déplacement automatisé

merci.
c'est exactement ce que je cherchais.

amicalement

 

Vote positif 0 Vote négatif

Spitnolan08

XLDnaute Barbatruc

• 22 Août 2007

• #5

Re : déplacement automatisé

Bonjour le fil,
Merci pour ton mp.
Cependant, pour ton information Darib52, c'est sur le forum qu'il faut poser les questions pas en mp... sauf cas particulier. Cela te permet d'ailleurs d'avoir un panel beaucoup plus grand de forumeurs pour te répondre.

bonjour,
merci encore pour ta macro.
je souhaite faire celà plusieurs fois sur la même feuille ( exemple: qd B11 est complété, le curseur va sur C10,...)
mais si je recopie simplement plusieurs fois la fonction If, ça ne marche pas.
j'ai essayé un tas de truc sans résultat.
peux-tu venir à mon aide ?
merci d'avance

Cliquez pour agrandir...

Tu trouveras ci dessous une réponse à ta question, si j'ai bien compris :

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1")) Is Nothing And Range("A1") <> "" Then Range("B10").Select
    If Not Intersect(Target, Range("B11")) Is Nothing And Range("B11") <> "" Then Range("C10").Select
End Sub

Cordialement

 

Vote positif 0 Vote négatif

D

darib52

XLDnaute Junior

• 22 Août 2007

• #6

Re : déplacement automatisé

merci beaucoup pour ta réponse.

je n'ai pas pensé à "mal" pour le mp.

tu as raison, la réponse peut intéreser tout un chacun.

amicalement.

 

Vote positif 0 Vote négatif