Microsoft 365 Affichage sur List Box et retranscrire donnée sur cellule

Roger26

XLDnaute Nouveau
Bonjour à tous

Connaissant très peu le VBA. je me permets de vous solliciter pour savoir s'il est possible d'afficher une information sur une listbox et textbox selon des conditions de vérification et de transposer l'information quand elle est OK.

Je m'explique :
J'aimerai quand je bip le code barre (à l'aide mon ma douchette) pour mettre la valeur sur Textbox1
1- Sur textbox2, afficher la donnée selon valeur inscrite en textbox1 (voir lien avec Onglet Machines)
2 - Si Non existant alors msgbox "Non existant", si Existant alors afficher données textbox2 et sur la listbox1 afficher les informations (voir en-tête).
Pour ce qui est de la listbox1
- Afficher les informations si et seulement si il n'y a pas de clôturer sur la même ligne (voir onglet Relevé)

En somme fonctionnalité que doit faire le fichier :
L'userform s'ouvre.
Je bipe mon code barre, les informations apparaissent sur l'onglet Relevé colonne A a E.
Et quand je bipe a nouveau le meme code barre les données en F et H de l'onglet Relevé apparaissent.

Le 1er bip pour dire que j'ouvre le problème, le deuxième clôture le problème.

En espérant que mes explications ont été claires.

Je vous remercie par avance de votre aide

Roger26
 

Pièces jointes

  • Scan Machine_1.xlsm
    19.9 KB · Affichages: 4

Roger26

XLDnaute Nouveau
Bonjour Sousou

Premièrement je te remercie pour ton aide et de te pencher sur mon problème.

Je t'ai fait une explication en illustrant les choses.
J'espère que cela te convient et que les explications seront plus claires.

1ère page = Première action
Page 2 à 4 = Les différentes conditions ( 1 page = 1 condition décrite)
Page 5 = Concernant l'info de la Listbox1

Un grand merci en avance pour ton aide.

Le fichier Excel est le même que mon premier post

A+

Roger26
 

Pièces jointes

  • Explication VBA.pdf
    165.9 KB · Affichages: 2

sousou

XLDnaute Barbatruc
Bonjour.
Pas certain d'avoir bien assimilé ta question, mais voilà ce que j'ai essayé de faire.
Si la machine n'existe pas : Numéro de machines?
Si elle existe mais pas d'opération: Nouvelle ligne en ouverture.
Si elle existe et qu'une opération est ouverte : Cloture la ligne
 

Pièces jointes

  • Scan Machine_1.xlsm
    25.6 KB · Affichages: 4

Roger26

XLDnaute Nouveau
Bonjour.
Pas certain d'avoir bien assimilé ta question, mais voilà ce que j'ai essayé de faire.
Si la machine n'existe pas : Numéro de machines?
Si elle existe mais pas d'opération: Nouvelle ligne en ouverture.
Si elle existe et qu'une opération est ouverte : Cloture la ligne
Hello SouSou
Si elle existe mais pas d'opération: Nouvelle ligne en ouverture.
Oui c'est ça !! Mais si je retape le numéro machine, et qu'il n'a pas d'opération en ouverture et pas clôture alors m'ajouter une nouvelle ligne aussi.
Sur l'onglet Relevé, il peut m'ajouter plusieurs fois l'opération portant le même numéro de machine si et seulement si, il ne trouve pas de ligne d'opération avec ce même numéro machine en ouverture et vide en colonne H

L'idée c'est de pouvoir ouvrir un opération et la clôturer. s'il n'existe pas de numéro à clôturer. Alors en créer une autre et la clôturer quand physiquement c'est fait.

Est-ce que c'est plus clair ?

Sinon c'est magnifique ce que tu as fait merci ^^

Roger26
 

sousou

XLDnaute Barbatruc
Voilà une solution me semble t-il
si machine n'existe pas alors numéro de machine?
si non
si, dans relevé, machine n'existe pas alors création nouvelle ligne
sinon cherche la ligne non clôturer de cette machine et clôture la ligne
si toutes les lignes de cette machine clôturées alors nouvelle ligne
 

Pièces jointes

  • Scan Machine_1.xlsm
    28.9 KB · Affichages: 5

Roger26

XLDnaute Nouveau
Hello Sousou

Merci beaucoup pour ton aide. Il est top top top !!!!

Maintenant je pense que cela ne doit pas être compliqué de d'afficher sur ma listbox les lignes non clôturées.

Je pense que je peux m'en sortir hihihi.

Merci mille fois pour ton job !!!!!!

Roger26
 

Discussions similaires