IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)

Vous êtes nouveau sur Developpez.com ? Créez votre compte ou connectez-vous afin de pouvoir participer !

Vous devez avoir un compte Developpez.com et être connecté pour pouvoir participer aux discussions.

Vous n'avez pas encore de compte Developpez.com ? Créez-en un en quelques instants, c'est entièrement gratuit !

Si vous disposez déjà d'un compte et qu'il est bien activé, connectez-vous à l'aide du formulaire ci-dessous.

Identifiez-vous
Identifiant
Mot de passe
Mot de passe oublié ?
Créer un compte

L'inscription est gratuite et ne vous prendra que quelques instants !

Je m'inscris !

Apprendre à gérer une cave à vin avec Access
Un tutoriel de Claude Leloup

Le , par ClaudeLELOUP

29PARTAGES

7  0 
Bonjour,

http://claudeleloup.developpez.com/t...ss/cave-a-vin/

Cette application de gestion de cave à vin n'a pas la prétention de rivaliser avec les logiciels existants, même gratuits, que vous pouvez facilement trouver sur la toile.
Voyez plutôt ceci comme un prétexte pour montrer combien il est facile d'utiliser Access pour réaliser des outils bien pratiques : en l'occurrence, une gestion de stock.
En effet, il s'agit de décrire différents articles (les bouteilles) que l'on entre en stock (les achats), que l'on range à un endroit précis (les casiers de la cave), que l'on sort ensuite (les consommations… avec modération) et périodiquement dresser l'inventaire (ce qui reste, valorisé ici au dernier prix d'achat).

C’est aussi l'occasion de montrer quelques réalisations pratiques qui répondent à des questions posées sur le forum :
- construire un formulaire de recherche multicritère (ici, basé sur une requête enregistrée qui est non modifiable) ;
- afficher une image différente pour chaque enregistrement et logeant ces images en dehors de la base ;
- montrer une astuce pour contourner l'absence de mise en forme conditionnelle pour un cadre d'options ;
- décrire une méthode pour cloner un enregistrement et ses dépendants éventuels dans les tables liées à la sienne ;
- construire un état basé sur une requête d'analyse croisée ;
- imprimer un état sur plusieurs colonnes, quand cela permet d'économiser du papier.

Vos commentaires sont les bienvenus.

Une erreur dans cette actualité ? Signalez-nous-la !

Avatar de tee_grandbois
Expert éminent sénior https://www.developpez.com
Le 24/09/2017 à 23:49
Bonsoir Claude,
tu nous a encore servi un grand millésime avec ce tuto

1  0 
Avatar de ClaudeLELOUP
Rédacteur/Modérateur https://www.developpez.com
Le 25/09/2017 à 6:34
À ta santé ! Guy.
1  0 
Avatar de kabamel
Membre régulier https://www.developpez.com
Le 25/09/2017 à 18:58
Salut, en voilà le coup du génit.
Merci Claude
1  0 
Avatar de User
Rédacteur/Modérateur https://www.developpez.com
Le 30/09/2017 à 21:49
Merci Claude !

A consulter sans modération
1  0 
Avatar de Fabikaz
Candidat au Club https://www.developpez.com
Le 25/10/2017 à 23:44
Avec vos tutos, la coupe n'est jamais pleine ! Fantastique.

Merci

Fabien
1  0 
Avatar de ClaudeLELOUP
Rédacteur/Modérateur https://www.developpez.com
Le 26/10/2017 à 5:22
1  0 
Avatar de ClaudeLELOUP
Rédacteur/Modérateur https://www.developpez.com
Le 28/01/2021 à 17:59
Bonjour hand92,

En fait, c’est la source de l’état eRepartition qui fait problème : c’est une requête croisée et elle coince lorsqu’il n’y a pas de données pour une de ses colonnes.
On va un peu ruser pour faire en sorte qu’on trouve une quantité (éventuellement zéro) pour chaque catégorie.
J’ai ajouté cette requête rRepartition0

Code SQL : Sélectionner tout
1
2
SELECT "-" AS Region, tCategories.Categorie, 0 AS NbreBouteilles 
FROM tCategories;

Et j’ai créé l’union rRepartitionComplet = rRepartition + rRepartitionO
Soit :
Code SQL : Sélectionner tout
1
2
3
4
SELECT tRegions.Region, tCategories.Categorie, Sum(stock([tBouteillesPK])) AS NbreBouteilles 
FROM tRegions INNER JOIN (tAppellations INNER JOIN (tCategories INNER JOIN (rInventaire INNER JOIN tBouteilles ON rInventaire.tBouteillesFK = tBouteilles.tBouteillesPK) ON tCategories.tCategoriesPK = tBouteilles.tCategoriesFK) ON tAppellations.tAppellationsPK = tBouteilles.tAppellationsFK) ON tRegions.tRegionsPK = tAppellations.tRegionsFK 
GROUP BY tRegions.Region, tCategories.Categorie  UNION SELECT "-" AS Region, tCategories.Categorie, 0 AS NbreBouteilles 
FROM tCategories;
Et, dans la foulée, j’ai modifié la source de l’état :


Cette fois, on y est :


La db modifiée est ici : http://claudeleloup.developpez.com/%2699/CaveAvin.zip
1  0 
Avatar de hand92
Futur Membre du Club https://www.developpez.com
Le 27/01/2021 à 11:49
Bonjour
J'ai cherché à remplacer une application de gestion d'une cave à vin développer par MicroApplication et cette BDD répond au besoin. Je ne suis pas un pro d'Access mais avec un peu de persévérance et curiosité j'ai commencé à adapter cette application. Toutefois je me heurte à une erreur sur l'état par région quand par exemple il n'y a aucune bouteille en stock de vin doux naturel une erreur d'exécution 3070 s'affiche. Je ne sais pas si ce problème a déjà été soulevé et suis preneur de toute information. merci d'avance
0  0 
Avatar de ClaudeLELOUP
Rédacteur/Modérateur https://www.developpez.com
Le 27/01/2021 à 14:04
Bonjour hand92,

Bienvenue puisque c’est ton premier message sur dvp.
Pas sûr que je puisse t’aider ainsi sans ausculter ta base de données.
Peux-tu poster le zip de ta base en version compatible Access2000 ?
0  0 
Avatar de hand92
Futur Membre du Club https://www.developpez.com
Le 27/01/2021 à 16:38
Merci pour la réponse, je joins ma BDD '(caveavinperso)mais je me suis dépanné en supprimant les entêtes dans l'état par contre la base de données du forum (caveavin) plante car il n'y a plus de vin doux naturel
je l'envoi aussi
0  0