Déplacement selection après validation textbox

[excelman]

Bonjour à tous,

J'ai une petite question sur un fichier que je suis en train de créer :

Voila donc :

Je suis en cellule A2. Une fois le texte entré je valide et il m'ouvre une INPUTBOX qui me met le resultat en cellule B2. Il m'ouvre alors un autre INPUTBOX qui me met le resultat en C2.

Ce que j'aimerai donc c'est que maintenant la cellule active étant A3 je voudrai qu'en ouvrant les INPUTBOX il mette le resultat à la suite des autres (B3 C3) et ainsi de suite....

Un petit fichier joint pour que vous puissiez comprendre ce que je voudrais.....

Merci de bien vouloir me donner un coup de main... Ce n'est pas vital mais ca fait 3 plombes que je cherche... Alors soit je continue à chercher soit je vous demande un coup de main.....

 

[myDearFriend!]

Re : Déplacement selection après validation textbox

Bonjour exelman, le Forum,

En touchant le moins possible à ton code original :

[COLOR=GRAY][B][I]DANS LE MODULE DE CODE DE LA FEUILLE[/I][/B][/COLOR]

[COLOR=NAVY]Private Sub[/COLOR] Worksheet_Change([COLOR=NAVY]ByVal[/COLOR] Target [COLOR=NAVY]As[/COLOR] Range)
    [COLOR=NAVY]If Not[/COLOR] Intersect(Target, Range("A2:A18")) [COLOR=NAVY]Is Nothing Then[/COLOR]
        lancement [B]Target.Row[/B]
    [COLOR=NAVY]End If
End Sub[/COLOR]

[COLOR=GRAY][B][I]DANS LE MODULE DE CODE STANDARD[/I][/B][/COLOR]

[COLOR=NAVY]Sub[/COLOR] lancement([B]L [COLOR=NAVY]As Long[/COLOR][/B])
[COLOR=NAVY]Dim[/COLOR] CLIENT [COLOR=NAVY]As String
Dim[/COLOR] IMEI [COLOR=NAVY]As String[/COLOR]
   CLIENT = InputBox("ENTREZ LE NOM DU CLIENT", "CLIENT", "")
   [B]Cells(L, 2) [/B]= CLIENT
   IMEI = InputBox("ENTREZ L'IMEI OU LE N° DE LA SIM", "IMEI OU SIM", "")
   [B]Cells(L, 3)[/B] = IMEI
[COLOR=NAVY]End Sub[/COLOR]

Cordialement,

 

[excelman]

Re : Déplacement selection après validation textbox

Salut MydearFriend,

Ca marche exactement comme il faut c'est génial... merci beaucoup..

Allez j'ose encore une petite question :
Je souhaite vérouiller la ligne au dessus de la cellule active dans la foulée...