Gestion Commande (stock)

pling -  
castours Messages postés 2955 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour ,

j'ai mis en place un fichier excel pour faire le suivi de mon stock et je voudrais maintenant créer un formulaire de commande pour qu'on puisse à chaque fois qu'on rentre une commande de produit x , ressortir les produit en stock correspondants à ce produit à savoir: produit fini / produit semi fini / matière première

en commençant mon formulaire je voudrais introduire une liste déroulante relié au fichier client pour sélectionner le client qui a pris cette commende et ressortir toute les infos correspondante

ensuite

je fais entrer la commande ( un code produit)
et on m'affiche le stock correspondant à celui ci (produit fini) et le reste (produit semi fini / matière première )

j'ai déjà commencer mon formulaire mais je coince au niveau de la mise en place de liste de donnée déroulante partant d'un produit === designation === gamme===format , les donnée sont enregistrer dans la feuil2 du fichier mais ça bloque et je ne sais pas du tout ou se trouve le problème


voici le fichier si quelqu'un a une idée ? http://cjoint.com/?0GFrlJ0zAho

merci d'avance
A voir également:

10 réponses

mcfly10 Messages postés 1098 Statut Membre 239
 
Pour faire ce genre de chose, faut plutot utiliser Microsoft Access que Microsoft Excel.
0
pling
 
oui ça serais peut être plus simple mais j'ai déjà essayer sur le useform 1 et ça marche très bien je ne sais vraiment pas prk ça ne marche pas pour le 2ème formulaire
0
foo
 
Bonjour
j'aime pas ton usf et utilise les codeName ses plus simple

Voila un debut

Private Sub UserForm_Initialize()
With Feuil3
ComboBox_enseigne.Clear
For L = 2 To .Range("A" & Rows.Count).End(xlUp).Row
ComboBox_enseigne.AddItem .Range("A" & L)
Next
End With
End Sub

Private Sub ComboBox_enseigne_Change()
L = ComboBox_enseigne.ListIndex + 2
With Feuil3
TextBox_adresse.Value = .Range("I" & L)
End With
End Sub

A+

Maurice
0
pling
 
bonjour Maurice ,

je sais que mon usf n'ai pas le plus simple mais je ne suis pas très forte en VBA je met ce que je peux comprendre comme script .

la ou je trouve le problème c'est plutôt au niveau de la suite :

combobox_produit / designation/..ect


j'ai essayer d'appliquer ce script pour filtrer les donnée au niv des liste déroulante à partir du choix du produit :

exemple pour le choix de "Limonade" comme produit la liste déroulante en désignation qui doit s'afficher :

With Feuil3
ComboBox_designation.Clear

If ComboBox_produit.Value = "Limonade " Then

For L = 3 To .Range("A" & Rows.Count).End(xlUp).Row
ComboBox_designation.AddItem .Range("A" & L)
Next

End If

End With
End Sub


une idée prk ça ne marche pas ?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
foo
 
Bonjour

Voila un modele de combobox sans If

http://cjoint.com/?3Hbl46KDxQW

mettre au point la feuil Liste

A+

Maurice
0
foo
 
Re

Voila des tests

http://cjoint.com/?3Hbo7H3hIa4

a toi de voir

A+

Maurice
0
pling
 
j'aime les 3 test je garde le 2ème pour ma gestion de commande et le 3ème pour la fiche client

Merci :)
0
foo
 
Bonjour

Pour resoudre ta Limonade Hi

Private Sub ComboBox_produit_Change()
'" Limonade " = ListIndex 0
'" Bière " = ListIndex 1
'" BST " = ListIndex 2
Col = ComboBox_produit.ListIndex + 5
' Feuil6 = CodeName
' (Feuil3) = Non de l'onglet
With Feuil6 ' CodeName
For L = 3 To .Cells(Rows.Count, Col).End(xlUp).Row
ComboBox_designation.AddItem .Cells(L, Col)
Next L
End With
End Sub

A+

Maurice
0
castours Messages postés 2955 Date d'inscription   Statut Membre Dernière intervention   217
 
bonjour
https://www.cjoint.com/?CIlvjCty0Fi
un lien sur une base simple de gestion de stocks.
Si cela peut aider faites le savoir.
merci
0
castours Messages postés 2955 Date d'inscription   Statut Membre Dernière intervention   217
 
Bonjour
As tu resolus ton probleme?
Une reponse pour ceux qui t'aide serait le bien venu?
0
castours Messages postés 2955 Date d'inscription   Statut Membre Dernière intervention   217
 
Bonjour
A mon avis access serait plus approprié pour ce genre de gestion.
-1