#02 : VBA Access G.Stock - Lister les Produits

Objectif : Créer un formulaire qui Lister les Produits

L'objectif de cette deuxième Vidéo est de réaliser un formulaire "F_ListProduits" comme indiqué ci-dessus, ce formulaire permet de lister les produits contenus dans la table produits en faisons bien sûr des jointures entres les trois tables : produits, Unités et Catégories pour trouver l’ensemble des informations dont nous avons besoin pour ce formulaire,donc sur propriétés de ce formulaire, sur la source , saisir la requêtes SQL suivantes:

vous pouvez utiliser directement le requête SQL la suivante pour récupérer les données affichées dans le formulaire F_ListProduits

Le Code SQL de la requête

SELECT Produits.idProduit, Produits.CodeProduit, Produits.Designation, Produits.QteStock,
Produits.QteMin, Produits.PrixUnitaire, Produits.idUnite, Produits.IdCategorie FROM Produits
ORDER BY Produits.idProduit DESC;

Ajoutons ensuite le code VBA sur l'événement clic du bouton "btnSupprimer" afin confirmer la suppression du produit sélectionné:

l'événement clic du bouton btnSupprimer

Private Sub btnSupprimerProduit_Click()
res = MsgBox("Voulez vous vraiment supprimer ce produit ", vbYesNo + vbInformation, "Confirmation de
suppression")
If res = vbYes Then
DoCmd.RunSQL "DELETE * FROM Produits WHERE idProduit=" & Me.idProduit
DoCmd.Requery
End If
End Sub

DoCmd.RunSQL : Instruction pour exécuter une requête SQL , dans notre cas une requête de suppression "DELETE"

DoCmd.Requery : Utiliser Requery de l'objet DoCmd pour rafraîchir et actualiser la totalité du formulaire

👉 Pour plus de détail, Regarder la Vidéo de ce Cours

🔗 Télécharger le Code Source  : Projet G.Stock V1.0

***********************

***********************