Mon nom est Gabriel 23 ans et j'habite en suisse et je suis nouveaux sur accès.
Mon petit problème est que je suis entrain de créer une petite base de donner pour gérer un petit stock pour le bouleau.
J'ai déjà créer tout les tableaux, les formulaires, les requêtes....
Exemple simple de la base de donner:
Une partie TECHNICIEN:
Une Partie MATÉRIEL EN STOCK:
et une partie: MATÉRIEL emprunté:
Mais mon problème est le suivant.
Quand par exemple un technicien vient prendre du matériel dans le stock, donc dans le formulaire Matériel emprunté il n'est pas décompté dan la partie Matériel en stock.
Se que je veut bien sur faire pour pouvoir avoir un contrôle du stock réelle
On peut y arriver de "moult" façons.
On va continuer dans le sens déjà donné à ta base
Une table-->tblStock :
Id_Materiel-->NuméroAuto-->Clef primaire
StockTotal-->Texte
Une table-->tbl_Sortie :
Id_Sortie-->NuméroAuto-->Clef primaire
Id_Materiel-->Numérique-->Entier long
Sortie-->Numérique-->Entier long
DateSortie-->Date/Heure-->Date, abrégé
DateRetour-->Date/Heure-->Date, abrégé
Une requête pour les sorties -->qry_Sortie : SELECT tbl_Sortie.Id_Sortie, tbl_Sortie.Id_Materiel,
tbl_Sortie.Sortie, tbl_Sortie.DateSortie, tbl_Sortie.DateRetour,
IIf([DateRetour] Is Not Null,0,[Sortie]) AS SortieActuel
FROM tbl_Sortie;
Un formulaire :
Une zone de liste-->lst_Stock
-->3 colonnes-->0cm;2,54cm;2,54cm
avec pour source : SELECT tblStock.Id_Materiel, tblStock.TypeMatériel,
tblStock.StockTotal FROM tblStock;
Une zone de texte-->txt_ActuelSortie
Source : =SomDom("[SortieActuel]";"[qry_Sortie]";"[Id_Materiel]= [lst_Stock] ")
Une zone de texte-->txt_SoldeActuel
Source : =lst_Stock.Column(2)-[txt_ActuelSortie]
Pour-->lst_Stock-->Après mise à jour-->Procédure événementielle: Private Sub lst_Stock_AfterUpdate()
Me.txt_ActuelSortie.Requery
End Sub
Pour le formulaire-->Sur chargement : Private Sub Form_Open(Cancel As Integer)
Me.lst_Stock.Selected(0) = True
'Pour la dernière ligne
'Me.lst_Stock.Selected(Me.lst_Stock.ListCount - 1) = True
End Sub
Pour-->txt_SoldeActuel-->Format-->Mise en forme conditionnelle :
Valeur du champ-->Inférieure-->à-->2
(Du beau rouge, du vert, du gras, etc.)
Cordialement.
__________________________
Le peu que je sais, c'est à mon ignorance que je le dois. Sacha Guitry