XL 2010 Transfert de quantité

[issam salem]

Bonjour;

Alors j'ai un projet de gestion du stock, je veux faire une option de transfert du stock entre magasin (voir photo userforme transfert) à partir de tableau inventaire (photo inventaire)
J’ai commencé a programmé le userforme transfert par exemple le remplit de combobox le recherche par magasin (code article+prévenance) etc...
Actuellement je veux programmé le commandeboutton transfert du stock (voir photo userforme transfert) pour le but de transfert la quantité transférée saisie sur le textbox de prévenance sélectionner vers la destination sélectionnes avec bien sur le mise à jour du quantité

Exemple sur photo userforme transfert:

J’ai le code article SM004.0032 de prévenance TE01 avec un stock prévenance de 200 kg, et la destination KH01
Alors je veux transferer la quantité 25 kg sur la destination KH01 avec la mise ajour sur le tableau inventaire
Alors le résultat fini c'est
Le stock actuel d'article SM004.0032 de magasin TE01 sera 200-25=175
Et le stock actuel d'article SM004.0032 de magasin kh01 sera 25 (la quantité transférée)

 

[issam salem]

Alors bonjour @soan
je crois que parfaitement tu compris mon projet du stock,et ce que je veux faire (c'est simplement faire maîtriser les entrées sorties des articles de société a fin de maîtriser informatiquement le stock actuel de chaque article) et pour le stock initial c'est pour le début de commencement de l'application.
pour le transfert n a 04 autres magasins (KH01-JO01...) plus magasin centrale (TE01)
alors le magasin centrale peu faire un transfert des articles au quelques magasins selon le besoin demandé "KH01 ou JO01..." et c'est pratiquer pour les autres magasins entre eux.

réponse pour post 59
Oui bien sur je préfères qu'on enlève le test de limite de tableau plein pour les tableaux.car franchement je sais pas combien d'article se trouve dans la société ( Nous saurons quand nous aurons fini le premier inventaire 'Nombre total de stock initial').
Autre chose Je m'excuse de ne pas indiqué le code sur ligne 154,Parce que je ne savais pas que tu en avais besoin
et si tu veux de t'envoyer le fichier avec les dernières modification et qui contient les feuilles inventaires entrées et sorties,Je vais vous l'envoyer sur email ou mon-partage.

 

[ChTi160]

Bonjour iassam
En attendant soan Lol
Tu pourrais effectivement joindre la dernière mouture (modifiée) de ton Fichier !
jean marie

 

[soan]

Bonjour issam, Jean-Marie,

pour ton post #50 : dans le code du UF Transfer, sub GetLig(),
au lieu de For i = 1 To n met For i = 2 To n ; tu auras :

Private Sub GetLig(Mag$, n&, lg2&)
  Dim i&
  For i = 2 To n
    If TblInv(i, 1) = CB_Pièce Then
      If TblInv(i, 12) = Mag Then lg2 = i + 2: Exit For
    End If
  Next i
End Sub

c'est une erreur de ma part : oubli d'une adaptation ; c'est arrivé quand j'avais optimisé
en utilisant une seule variable tableau TblInv(), initialisée dans UserForm_Initialize() :

TblInv = .Range("A3:L" & dlg)

au départ, j'avais mis A4, et là le 1 était bon ; mais quand j'ai remplacé par A3,
j'aurais dû changer le 1 en 2 ; c'est nécessaire de mettre la ligne d'en-têtes 3
dans le tableau TblInv() car on en a besoin pour les 2 premières listes, ici :

essaye avec le changement For i = 2 To n ; il ne devrait plus y avoir "Seuil d'alerte"
sur une nouvelle ligne ajoutée dans le tableau de la feuille "Inventaire" ; peux-tu
me le confirmer ?

pour la suite, oui, ça serait mieux que tu envoies ton fichier plus récent :
mets-le sur le site mon-partage.fr.

j'enlèverai les limites pour les 2 tableaux, donc aussi la sub UndoOpInv() :
elle sera devenue inutile, car une opération de transfert ne pourra pas
ne pas pouvoir être écrite à cause d'un tableau plein.

soan

 

[issam salem]

Bonjour a tt
alors je fait la modification que tu me donné ms le problème est encours
je croix que lorsque on fait le transfert sur le premier article de tableau inventaire (par exemple ici SM004.0032) voir image on avoir toujour le "seuil d'alerte" pour les autres aussi je crois qu'il saisie automatiquement le 2éme variable ici c'est 2

 

[issam salem]

voila le lien de nouveau fichier :
le mode passe pour telecharger le fichier sur mon partage est: soan

pour le fichier -->j'ai fait quelque modification sur l’arrière plan ( bien sur+les modifications que tu m'a donné )
le mode passe de fichier vba c'est : 1111
ustilisateur--> ADMIN
pour ces boutons en haut

le premier est pour ajouter (nouveau article,entrées,sorties..)
douzième pour modifier
3éme pour supprimer
4éme pour menu
est en fin c'est pour enregistrer

ci tu fait un test pour ajouter un nouveau article Vous verrez que le stock actuel,les entrées et les sorties sont insérés par formulaire (voir sur écrire pièces) je sais pas est ce que c'est possible de faire la même chose pour le transfert ou de faire une autre modification si'l ya une proposition de vous,bien sur
pour toute question sur le fichier merci de le demandé

 

[soan]

code du UF Transfer, Sub MajInventaire(), enlève le - 3
de lgS - 3 pour la ligne du Seuil d'alerte ; tu auras :

.Offset(, 1) = TblInv(lgS, 5)      'Seuil d'alerte

fais des tests et dis-moi si "Seuil d'alerte" ne s'affiche plus dans les lignes
de données de la colonne E (donc il est seulement en E3, en en-tête).

si oui : OK ; sinon, dis-moi quelle manip tu fais pour que ça s'affiche.

soan

 

[ChTi160]

Bonsoir Issam
Bonsoir soan ,le Forum
Beau travail en perspective!
une question :
Pourquoi dans la feuille Sortie tu as une trace de Qui a fait l'Opération mais pas en feuille Entrée ?
Tout comme dans la feuille "Inventaire" tu n'as pas de date de référence !
il y a surement une explication !
jean marie

 

[soan]

@ChTi160

je crois pouvoir répondre à tes 2 questions :

* dans la feuille "Sorties", il y a une trace de Qui a fait l'Opération (colonne D)
car le Technicien est un ouvrier de l'entrepôt géré par le Chef issam ; donc
c'est normal que lui les contrôle, car c'est lui le Chef !

* dans la feuille "Entrées", il n'y a pas besoin de trace de Qui a fait l'Opération
car c'est forcément le Chef issam qui s'occupe des Entrées : il n'a pas besoin
de se contrôler lui-même !

--------------------------------------------------------------------------------------

dans la feuille "Inventaire", il n'y a pas de date car pour une ligne d'article :
le Stock initial est au jour de l'inventaire, par exemple le 2 janvier (rappel :
le 1er est jour férié) ; pour les Entrées et Sorties, y'en a plusieurs pour un
article donné, mais comme y'a qu'une seule ligne par article/magasin, on va
pas mettre toutes les dates pour chaque Entrée et Sortie (mais j'suppose que
c'est quand même fait à part, sur une feuille séparée).

soan

 

[ChTi160]

Re
Merci Soan !
Jean marie

 

[salem.b]

code du UF Transfer, Sub MajInventaire(), enlève le - 3
de lgS - 3 pour la ligne du Seuil d'alerte ; tu auras :

.Offset(, 1) = TblInv(lgS, 5)      'Seuil d'alerte

fais des tests et dis-moi si "Seuil d'alerte" ne s'affiche plus dans les lignes
de données de la colonne E (donc il est seulement en E3, en en-tête).

si oui : OK ; sinon, dis-moi quelle manip tu fais pour que ça s'affiche.

soan

alors j'ai fait des tests est exactement le "Seuil d'alerte" ne s'affiche plus dans les lignes, Mais il a saisie le 2 au lieu de 10 voir image ( c'est possible que la boucle dérouler sur cb-pièce seulement et pas pour cb-pièce et magasin???)

la ligne de seuil d'alerte est fait pour attirer l'attention d utilisateur, lorsque le stock actuel= seuil d'alerte la cellule de stock actuel devenu du couleur orange pour lui dire fait une commande lol

 

[salem.b]

@ChTi160

je crois pouvoir répondre à tes 2 questions :

* dans la feuille "Sorties", il y a une trace de Qui a fait l'Opération (colonne D)
car le Technicien est un ouvrier de l'entrepôt géré par le Chef issam ; donc
c'est normal que lui les contrôle, car c'est lui le Chef !

* dans la feuille "Entrées", il n'y a pas besoin de trace de Qui a fait l'Opération
car c'est forcément le Chef issam qui s'occupe des Entrées : il n'a pas besoin
de se contrôler lui-même !

--------------------------------------------------------------------------------------

dans la feuille "Inventaire", il n'y a pas de date car pour une ligne d'article :
le Stock initial est au jour de l'inventaire, par exemple le 2 janvier (rappel :
le 1er est jour férié) ; pour les Entrées et Sorties, y'en a plusieurs pour un
article donné, mais comme y'a qu'une seule ligne par article/magasin, on va
pas mettre toutes les dates pour chaque Entrée et Sortie (mais j'suppose que
c'est quand même fait à part, sur une feuille séparée).

soan

oui @soan c'est la réponse exacte pour les 2 questions de ChTi160
mais nb je suis pas le chef lol

 

[soan]

d'accord, mais même si c'est pas toi le chef, je vais quand même
continuer à te répondre comme avant.

alors pour l'image de ton post #70 : si ça a mis 2 en E12 (et pas 10),
c'est probablement car tu as saisi le magasin Provenance OA1 (qui
a été trouvé en L11), et pas TE01 (qui aurait été trouvé en L4).

si c'est ça : ok ; sinon, dis-moi quel magasin Provenance tu as saisi
(voilà pourquoi ça retourne E11 = 2 ; et pas E4 = 10).

rappel : une ligne est « trouvée » si y'a une correspondance pour
le Code article (en A) et pour le Magasin (en L).

soan

 

[soan]

ajout : si tu fais un transfert avec "SM004.0032" et Provenance "TE01", ça sera trouvé
en ligne 4 avec A4 et L4 ➯ c'est bien E4 = 10 qui sera copié en ligne destination.

soan

 

[salem.b]

d'accord, mais même si c'est pas toi le chef, je vais quand même
continuer à te répondre comme avant.

alors pour l'image de ton post #70 : si ça a mis 2 en E12 (et pas 10),
c'est probablement car tu as saisi le magasin Provenance OA1 (qui
a été trouvé en L11), et pas TE01 (qui aurait été trouvé en L4).

si c'est ça : ok ; sinon, dis-moi quel magasin Provenance tu as saisi
(voilà pourquoi ça retourne E11 = 2 ; et pas E4 = 10).

rappel : une ligne est « trouvée » si y'a une correspondance pour
le Code article (en A) et pour le Magasin (en L).

soan

oui c'est vrais lorsque je fait le transfert au magasin OA01
mais voir la dernière ligne lorsque je fait le transfert au magasin JO01 qui n'a pas existe sur la colonne L ila ma donne encore le 2

 

[salem.b]

ajout : si tu fais un transfert avec "SM004.0032" et Provenance "TE01", ça sera trouvé
en ligne 4 avec A4 et L4 ➯ c'est bien E4 = 10 qui sera copié en ligne destination.

soan

ah ouiiii c'est ca exactement