Gestion stock

C

Compte Supprimé 979

Guest

• 27 Novembre 2010

• #2

Re : Gestion stock

Bonjour Poipoi

Il faut laisser le code ou il doit être 😕

VB:

Private Sub UserForm_Initialize()
'*****************************************************
With Sheets("BD")
  For i = 2 To .Range("C65000").End(xlUp).Row
    If .Cells(i, 4) <> .Cells(i - 1, 4) Then
      CBO_Consfamille.AddItem .Cells(i, 4).Value
    End If
  Next
End With
'*****************************************************
End Sub

Pourquoi vouloir le mettre dans une : Private Sub consult_stock_Initialize()

A+

 

Vote positif 0 Vote négatif

A

Arpette

XLDnaute Impliqué

• 27 Novembre 2010

• #3

Re : Gestion stock

BrunoM45 à dit:

Bonjour Poipoi

Il faut laisser le code ou il doit être 😕

VB:

Private Sub UserForm_Initialize()
'*****************************************************
With Sheets("BD")
  For i = 2 To .Range("C65000").End(xlUp).Row
    If .Cells(i, 4) <> .Cells(i - 1, 4) Then
      CBO_Consfamille.AddItem .Cells(i, 4).Value
    End If
  Next
End With
'*****************************************************
End Sub

Pourquoi vouloir le mettre dans une : Private Sub consult_stock_Initialize()

A+

Cliquez pour agrandir...

Bonsoir Poipoi, Bruno, j'ai fait un USF pour adepte du forum. Dedans il y a la gestion des stocks, je pense que celà pourra t'aider (feuille Alimentation)
Cijoint.fr - Service gratuit de dépôt de fichiers

@+

 

Dernière édition: 27 Novembre 2010

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 27 Novembre 2010

• #4

Re : Gestion stock

bonjour BrunoM45
merci de ton aide.. simplement je croyais qu'il fallait indiquer le nom de l'userform !!!
et pour lier cette combobox à la combo "conssfam" je n'y arrive pas malgré les différents posts.. peux tu juste me mettre sur la piste car j'en ai beaucoup à réaliser de la sorte.
merci déjà de ce que vous faites..

 

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 27 Novembre 2010

• #5

Re : Gestion stock

bonsoir Arpette..
je n'avais pas vu ton post.. mes excuses ils ont dû se croiser..
merci pour ta proposition, je l'avais déjà consulté, mais il me semble ardu de l'adapter..
par contre je reconnais la classe !! bravo

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 27 Novembre 2010

• #6

Re : Gestion stock

Re,

Ci-joint ton fichier modifié, j'ai mis le code pour les 2 Cb

A+

 

Pièces jointes

• formulaire bgde5.zip

  60.3 KB · Affichages: 127
• formulaire bgde5.zip

  60.3 KB · Affichages: 119
• formulaire bgde5.zip

  60.3 KB · Affichages: 131

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 27 Novembre 2010

• #7

Re : Gestion stock

merci beaucoup BrunoM45
je dois m'en aller mais je regarde ton fichier dès mon retour.. (demain)
ça m'a l'air de correspondre vraiment, je vais adapter ce que tu as fait à tous les userforms de ce fichier..
merci encore.. et bonne soirée

 

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 28 Novembre 2010

• #8

Re : Gestion stock

bonjour tous
j'ai maintenant l'erreur d'exécution 70 'acces refusé' qui apparait alors que j'ai "simplement" recopié le code d'un userform (consult_stock) et adapté à un autre (mouv_art).
est-ce dû au fait que des noms sont identiques ? ça m'embête car mes userforms sont basés sur le même modèle.. et je n'en suis qu'au début..!!!!
une bien bonne journée et merci déjà

 

Vote positif 0 Vote négatif

James007

XLDnaute Barbatruc

• 28 Novembre 2010

• #9

Re : Gestion stock

Bonjour poipoi,

Pour éviter tout problème dans VBA, lorsque tu manipules des objets, il est plus sûr d'utiliser l'importation et l'exportation des formulaires ou des modules en entier ... en passant par le menu principal ...

A +

 

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 28 Novembre 2010

• #10

Re : Gestion stock

bonjour James007
oui certes... mais je ne comprends pas, si j'exporte et puis importe le même code que j'adapte ensuite à mon usf cela revient au même que si je copie ce code, non? et j'ai toujours cette erreur qui me bloque

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 28 Novembre 2010

• #11

Re : Gestion stock

Bonjour Poipoi,

Ton erreur 70 tu l'as quand tu lances le code !?
Ou à qu'elle moment apparait-elle ?

A+

 

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 28 Novembre 2010

• #12

Re : Gestion stock

bonjour BrunoM45
et merci pour hier..
oui j'ai donc recopié ce code et modifié les noms des combobox pour l'usf "consut_stock" et dès que je fais F5 le message d'erreur 70 apparait.. et quand valide "débogage" je tombe sur :
Private Sub BT_mouvt_Click()
mouv_art.Show (surligné en jaune)
End Sub

de plus sur les boutons que j'ai mis dans l'usf "d'accueil" pour appeler les autres USF, chaque clic déclenche la même erreur 70 accès refusé
voilà, voilà...

 

Dernière édition: 28 Novembre 2010

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 28 Novembre 2010

• #13

Re : Gestion stock

Salut,

regarde dans les propriétés des listes si tu as renseigné la rubrique "RowSource".
Ce que tu as (mal fait) dans les fichiers précédents !

 

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 28 Novembre 2010

• #14

Re : Gestion stock

bonsoir Si...
tu as raison Si... j'avais laissé quelque chose trainer dans une rubrique !! merci
maintenant je vais essayer de lier un textbox à une combobox..
à bientôt...

 

Vote positif 0 Vote négatif

poipoi

XLDnaute Impliqué

• 29 Novembre 2010

• #15

Re : Gestion stock

Bonjour
J'avance à petits pas et voici ce qui me bloque dans ce projet
Je cherche grâce à l'usf "consult_stock", à imprimer un état de stock.
Cet état est défini par le choix soit d'une famille et/ou d'une s/famille et/ou d'un article, dont le choix s'effectue par combobox.
Mais comme un malheur n'arrive jamais seul, je voudrais pouvoir y ajouter des options (liés à des cases à cocher) : stock actuel, alerte, commande.. de sorte d'avoir un état de tous les matériel en dessous du seuil mini ou en commandes etc.
Pour ce faire j'aurai besoin d'un "petit" coup de pouce qui me permettra d'adapter ce ou ces codes aux autres USF .. (j'ai essayé mais quelle galère!!)
Je joins le fichier..
Merci déjà

 

Pièces jointes

• formulaire bgde5.zip

  67 KB · Affichages: 105
• formulaire bgde5.zip

  67 KB · Affichages: 95
• formulaire bgde5.zip

  67 KB · Affichages: 101

Vote positif 0 Vote négatif