[excel2007] calcul sur listbox multicolonnes
Résolu
ced3c
Messages postés
237
Date d'inscription
Statut
Membre
Dernière intervention
-
Le Pingou Messages postés 12249 Date d'inscription Statut Contributeur Dernière intervention -
Le Pingou Messages postés 12249 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Petit renseignement svp
Peut on effectuer des calculs dans une listbox ?
Je m'explique par l'exemple
J'ai une listbox de 8 colonnes que je remplie par additem
les colonnes 4 et 5 indiquent respectivement un prix et une quantité
J'aimerais inserer si possible dans la colonne 6 un calcul de TVA
soit
prix * 19.6% * quantité (col4 * 19.6% * col5)
voici le code que j'ai actuellement pour remplir les 5 premières colonnes de ma listbox via un bouton de commande
Si cela est possible comment dois je m'y prendre pour faire le calcul de la 6eme colonne ?
(la 7eme et 8eme colonnes seront sur le même principe soit montantHT et MontantTTC )
Merci d'avance :)
Petit renseignement svp
Peut on effectuer des calculs dans une listbox ?
Je m'explique par l'exemple
J'ai une listbox de 8 colonnes que je remplie par additem
les colonnes 4 et 5 indiquent respectivement un prix et une quantité
J'aimerais inserer si possible dans la colonne 6 un calcul de TVA
soit
prix * 19.6% * quantité (col4 * 19.6% * col5)
voici le code que j'ai actuellement pour remplir les 5 premières colonnes de ma listbox via un bouton de commande
ExtraitVente.AddItem ComboBox2.Value ExtraitVente.List(ExtraitVente.ListCount - 1, 1) = TextBox1.Value ExtraitVente.List(ExtraitVente.ListCount - 1, 2) = TextBox2.Value ExtraitVente.List(ExtraitVente.ListCount - 1, 3) = ComboBox3.Value ExtraitVente.List(ExtraitVente.ListCount - 1, 4) = TextBox3.Value
Si cela est possible comment dois je m'y prendre pour faire le calcul de la 6eme colonne ?
(la 7eme et 8eme colonnes seront sur le même principe soit montantHT et MontantTTC )
Merci d'avance :)
A voir également:
- [excel2007] calcul sur listbox multicolonnes
- Calcul moyenne excel - Guide
- Calcul km marche à pied gratuit - Télécharger - Sport
- Calcul charpente bois gratuit - Télécharger - Architecture & Déco
- Logiciel gratuit calcul valeur nutritionnelle - Télécharger - Santé & Bien-être
- Logiciel gratuit calcul surface m2 - Télécharger - Outils professionnels
11 réponses
Bonjour,
Au passage, si [prix] en TextBox4 et [quantité] en textBox5 alors :
Salutations.
Le Pingou
Au passage, si [prix] en TextBox4 et [quantité] en textBox5 alors :
ExtraitVente.List(ExtraitVente.ListCount - 1, 6) = (TextBox4.Value* TextBox5.Value)
Salutations.
Le Pingou
Merci pour ta reponse Le Pingou
Cette facon de faire m'indique une réponsequi n'est pas la bonne
quand par exemple je dois trouver 503 il m'indique 513412,4195
Ce que je n'ai pas préciser et qui à peut être de l'importance est le fait que j'inscris plusieurs ligne dans ce listbox
Je joint le fichier pour être plus clair
https://www.cjoint.com/?0Lfw1JksXCc
il faut remplir le formulaire en haut à gauche sur le userform à l'ouverture et ajouter
Cette facon de faire m'indique une réponsequi n'est pas la bonne
quand par exemple je dois trouver 503 il m'indique 513412,4195
Ce que je n'ai pas préciser et qui à peut être de l'importance est le fait que j'inscris plusieurs ligne dans ce listbox
Je joint le fichier pour être plus clair
https://www.cjoint.com/?0Lfw1JksXCc
il faut remplir le formulaire en haut à gauche sur le userform à l'ouverture et ajouter
Bonjour,
Rapidement, le prix est dans la [Combobox3] et la quantité en [Textbox3] ; dans se cas ligne devient :
Bonne nuit.
Salutations.
Le Pingou
Rapidement, le prix est dans la [Combobox3] et la quantité en [Textbox3] ; dans se cas ligne devient :
ExtraitVente.List(ExtraitVente.ListCount - 1, 5) = (Me.ComboBox3.Value * Me.TextBox3.Value)
Bonne nuit.
Salutations.
Le Pingou
pardon c'est moi qui m'étais trompé
Ca marche niquel, merci beaucoup
J'aurai une autre question si possible
Comment faire pour avoir la somme des valeurs de la colonne 6 de la listbox ?
Merci
Ca marche niquel, merci beaucoup
J'aurai une autre question si possible
Comment faire pour avoir la somme des valeurs de la colonne 6 de la listbox ?
Merci
J'ai trouvé sur le net
mais je ne sais pas comment faire pour qu'il renvoie la valeur automatiquement dans le textbox6 a la place du msgbox
Private Sub CommandButton1_Click() Dim i As Byte Dim cible As Integer Dim Resultat As Double cible = ExtraitVente.ListCount For i = 1 To cible Resultat = Resultat + ExtraitVente.List(i - 1, 7) Next MsgBox Resultat End Sub
mais je ne sais pas comment faire pour qu'il renvoie la valeur automatiquement dans le textbox6 a la place du msgbox
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
j'aimerai que ce résultat se mette a jour des que je valide une entrée dans la listbox afin d'avoir toujours le total à jour.
c'est pour cela que je pensais le faire dans le bouton de commande qui ajoute les ligne dans la listbox.
c'est pour cela que je pensais le faire dans le bouton de commande qui ajoute les ligne dans la listbox.
Bonjour,
Que faut-il comprendre par : dès que je valide une entrée dans la listbox ?
Quelque chose est étrange, car la [TextBox6] de votre formulaire contient la somme des montants de la colonne [H2 :H98] de la feuille [traitement].
Est-vous sur de votre choix ?
Salutations.
Le Pingou
Que faut-il comprendre par : dès que je valide une entrée dans la listbox ?
Quelque chose est étrange, car la [TextBox6] de votre formulaire contient la somme des montants de la colonne [H2 :H98] de la feuille [traitement].
Est-vous sur de votre choix ?
Salutations.
Le Pingou
Ce sont d'anciennes valeurs que je n'ai pas enlever sur le lien que j'ai mis
A l'heure actuelle la textbox6 n'indique rien
Je souhaiterais que cette case indique la somme de la derniere colonne, celle des montants ttc
A l'heure actuelle la textbox6 n'indique rien
Je souhaiterais que cette case indique la somme de la derniere colonne, celle des montants ttc
Bonjour,
Dans ce cas, il suffit d'ajouter cette ligne à la suite du code que j'ai fourni hier :
Remarque: vous dites que se sont d'anciennes valeurs, oui d'accord mais les code de procédure sont dans ce cas incorrects, pour une partie.
Dans ce cas, il suffit d'ajouter cette ligne à la suite du code que j'ai fourni hier :
Me.TextBox6 = Me.TextBox6 + (Me.ComboBox3.Value * Me.TextBox3.Value)
Remarque: vous dites que se sont d'anciennes valeurs, oui d'accord mais les code de procédure sont dans ce cas incorrects, pour une partie.
merci beaucoup cela marche très bien :)
je te relink le modèle si jamais tu veux voir
https://www.cjoint.com/?3LgsRuseTK4
il est vrai que mon code doit être "bordélique " pour un habitué du vba mais vu mes piètres capacités dans ce domaine je fais du brik à brak avec des bouts de codes trouvé par ci par la.
Heureusement que j'ai l'aide de personne comme toi pour m'aider et m'orienter :)
Merci beaucoup pour ton aide
je te relink le modèle si jamais tu veux voir
https://www.cjoint.com/?3LgsRuseTK4
il est vrai que mon code doit être "bordélique " pour un habitué du vba mais vu mes piètres capacités dans ce domaine je fais du brik à brak avec des bouts de codes trouvé par ci par la.
Heureusement que j'ai l'aide de personne comme toi pour m'aider et m'orienter :)
Merci beaucoup pour ton aide