Fenêtre de saisie de réf. pour inventaire

[elpat]

Bonjour,

Je dois faire un inventaire de pièces portant des n° de séries et j'aimerai pouvoir utiliser une fenêtre de saisie pour ces n° de telle sorte que, après avoir renté le n° de série dans la fenêtre de saisie, en tappant "enter", le curseur vienne directement sur le n° en question dans la grille, si il s'y trouve... et si il ne s'y trouve pas, qu'il soit enregistré dans une case vide de la colonne "numèro de pièce".

J'ai joint un prototype de feuille exel....



Merci à vous.
PP

 

[elpat]

Re : Fenêtre de saisie de réf. pour inventaire

Exact !! en fait j'avais fait des essais avec ton fichier, dans lequel je me suis broutté... sorry !

Mais... possible de brider la bête sur les colonnes C et D seulement ?...car en cas de mauvaise manip... le résultat est irréversible... même avec la fléche retour arrière...

Merci à +

 

[Guest]

Re : Fenêtre de saisie de réf. pour inventaire

RE,

Change cette ligne:

Set plg = Intersect(ActiveSheet.UsedRange, Selection.SpecialCells(xlCellTypeConstants))

Par celle-ci

Set plg = Intersect(ActiveSheet.UsedRange, Range("C:C,D:D").SpecialCells(xlCellTypeConstants))

A+

 

[elpat]

Re : Fenêtre de saisie de réf. pour inventaire

Bonjour Hasco !

Modif faite sur la ligne... ça marche pile poil !!

Cette fois tout y est... je vais conserver précieusement ce fichier...

Merci pour tout... porte toi bien.

Elpat

 

[Guest]

Re : Fenêtre de saisie de réf. pour inventaire

Hello Elpat'ant

Content de te revoir.

Nous y sommes enfin arrivé, c'est une bonne chose!

Profite du temps qui passe.

A+