Autres creation d un fichier de gestion de cave a vin

mic35 · 28 Novembre 2021

Bonjour
Je souhaiterais automatiser mon fichier mais je sait pas du tout faire de vba mais j ai reussi a faire un formulaire que je souhaiterais automatiser .
Dans l’onglet « ma cave » il y a 92 cases cave droite et cave gauche .J’ai ajouter dans une cellule pour un futur bouton ajout case droite et case gauche .
Dans l’onglet liste j’ai répertorier plein de liste qui serviront de base pour les formulaires .Un onglet mouvement qui devra se remplir automatiquement grace au formulaire que j ai commencer en usuform 1
Dans l usuforme 1 il y a 4 bouton rouge
bouton nouveau millesime servira quand d’autre vin seront acheter et automatiquement cela ira remplir l onglet mouvement et l onglet ma cave et la partie aussi de l usuform 1 « quantité reel et quantitée achat prix » .Mais la partie haute de l usuform 1 recherche dans la cave servira a rechercher seulement les vin s qui sont deja dans la cave
Lusuform 1 je l ai intitule formulaire de saisie des vins .
En esperant que vous pourrez m 'aider.
pour info j ai excel 2007

Cordialement

Wayki · 28 Novembre 2021

Bonjour,
Vos appellations ne sont pas reliées au type de vin : un Blanc peut sortir alors qu'on cherche un rouge par exemple.
Le fichier ne sera pas précis.
A +

JM27 · 28 Novembre 2021

Bonjour
Je vois que tu as "pompé" sur un fichier du site.
https://www.excel-downloads.com/resources/cave-a-vins-avec-macro.1087/
Cela n'est pas interdit et cela prouve que ca sert
Ton Userform est "vide"
penses tu que cela se fait tout seul : il faut un minimum de 15 jours de travail pour un connaisseur.
mais comme tu le dis:

mais je sait pas du tout faire de vba

Je crains que tu te lances dans une appli difficile!
bon courage!
Le tableau des millésimes est intéressant!( je l'intègre à mon fichier)

Wayki · 28 Novembre 2021

Je complèterai le poste de @JM27 en donnant une piste :
Pour compléter un combobox, créez un tableau structuré de votre onglet liste, puis nommez le t_liste, et la macro donne ceci :

VB:

Private Sub UserForm_Initialize()
With Sheets("liste")
ComboBox2.List = .Range("t_liste[Type de vin]").Value
ComboBox5.List = .Range("t_liste[Régions]").Value
End With
End Sub

Revenez quand tout sera fait, on vous montrera comment associer une action à un bouton.
A +

mic35 · 28 Novembre 2021

JM27 à dit:
Bonjour
Je vois que tu as "pompé" sur un fichier du site.
https://www.excel-downloads.com/resources/cave-a-vins-avec-macro.1087/
Cela n'est pas interdit et cela prouve que ca sert
Ton Userform est "vide"
penses tu que cela se fait tout seul : il faut un minimum de 15 jours de travail pour un connaisseur.
mais comme tu le dis:

Je crains que tu te lances dans une appli difficile!
bon courage!
Le tableau des millésimes est intéressant!( je l'intègre à mon fichier)

Merci d avoir prit connaissance de mon sujet .De ton coté serait il possible de voir ton fichier Cordialement

mic35 · 28 Novembre 2021

Wayki à dit:
Je complèterai le poste de @JM27 en donnant une piste :
Pour compléter un combobox, créez un tableau structuré de votre onglet liste :

VB:

Private Sub UserForm_Initialize() With Sheets("liste") ComboBox2.List = .Range("t_liste[Type de vin]").Value ComboBox5.List = .Range("t_liste[Régions]").Value End With End Sub

Revenez quand tout sera fait, on vous montrera comment associer une action à un bouton.
A +

Je vais me lancer attention c est pas gagner mais merci quand meme je vous tiens informer de la suite

JM27 · 28 Novembre 2021

Bonjour
si tu suis le lien du post #3 tu vas y arriver
et tu clic sur l'icone télécharger

ou alors fichier ci joint

Autres creation d un fichier de gestion de cave a vin

mic35

XLDnaute Nouveau

Pièces jointes

Wayki

XLDnaute Impliqué

JM27

XLDnaute Barbatruc

Wayki

XLDnaute Impliqué

mic35

XLDnaute Nouveau

mic35

XLDnaute Nouveau

JM27

XLDnaute Barbatruc

Pièces jointes

Discussions similaires