Comment traiter des totaux entre les tableaux VB 6?
Fermé
accent19811
Messages postés
104
Date d'inscription
mercredi 4 janvier 2012
Statut
Membre
Dernière intervention
20 août 2022
-
31 mars 2017 à 21:28
accent19811 Messages postés 104 Date d'inscription mercredi 4 janvier 2012 Statut Membre Dernière intervention 20 août 2022 - 1 avril 2017 à 21:30
accent19811 Messages postés 104 Date d'inscription mercredi 4 janvier 2012 Statut Membre Dernière intervention 20 août 2022 - 1 avril 2017 à 21:30
A voir également:
- Comment traiter des totaux entre les tableaux VB 6?
- Le fichier contient une liste de prénoms. triez ce tableau par ordre alphabétique des prénoms. quel mot est formé par les 6 premières lettres de la colonne code ? - Forum Bureautique
- Belote a 6 - Forum Loisirs / Divertissements
- Dans la table des matières de ce document, le chapitre 6 et ses 2 sections n'apparaissent pas. trouvez l'erreur dans la structure du document et corrigez-la. mettez à jour la table des matières. quel est le mot formé par les lettres en majuscules de la table des matières après sa mise à jour ? - Forum Word
- Triez la liste comme sur cette illustration (attention, on ne voit que le début …). quel est le mot formé par les 6 dernières lettres de la colonne code ? - Forum Excel
- Freebox etape 6 ✓ - Forum Freebox
1 réponse
f894009
Messages postés
16904
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
18 mars 2023
1 678
1 avril 2017 à 07:21
1 avril 2017 à 07:21
Bonjour,
Votre code marche tres bien, sauf que vous ne prenez pas la bonne table pour la boucle y. Vendre ce que vous n'avez pas achete c'est pas bien
Votre code marche tres bien, sauf que vous ne prenez pas la bonne table pour la boucle y. Vendre ce que vous n'avez pas achete c'est pas bien
1 avril 2017 à 16:00
ça va bien ami, "Je suis très heureux de votre réponse"
oui marche bien,
mais non montre pas les autres article, qui se trouve de table de vente,
elle montre seulement les articles qui se trouve dans table d'achat, car l'référence d'achat = à référence de vente.
moi, je vous S.V.P :
- dans la liste 3 ; je vous montre tous les articles qui se trouve dans table de vente et table d'achat, si l'référence d'article d'achat = à l'référence d'article de vente, s'affiche dans la liste trois, et fait des calcules; prix vente - prix d'achat pour donnée le solde réel, sinon s'affiche aussi les autres article qui n'a fait pas la même référence, et fait des calcules.
1 avril 2017 à 20:51
Dim Ref_achat As String Dim Ref_vente As String Dim prixachat As Double Dim prixvente As Double Dim prixsolde As Double Dim flg_OK As Boolean Ref_Cherch = "" prixachat = 0 prixvente = 0 prixsolde = 0 If Liste2.Rows <> 1 Then For y = 1 To Liste2.Rows - 1 Ref_vente = Liste2.TextMatrix(y, 0) prixvente = Liste2.TextMatrix(y, 1) flg_OK = False For i = 1 To Liste1.Rows - 1 Ref_achat = Liste1.TextMatrix(i, 0) prixachat = Liste1.TextMatrix(i, 1) If Ref_achat = Ref_vente Then prixsolde = prixvente - prixachat Liste3.AddItem Ref_vente & vbTab & prixachat & vbTab & prixvente & vbTab & prixsolde flg_OK = True Exit For End If Next i If Not flg_OK Then 'pas de prix achat prixachat = 0 Liste3.AddItem Ref_vente & vbTab & prixachat & vbTab & prixvente & vbTab & prixvente End If Next y End If1 avril 2017 à 20:59
merci beaucoup.
Je suis très heureux de votre réponse
1 avril 2017 à 21:14
Je regarde demain pour le projet taxi
1 avril 2017 à 21:30
Merci l'autre fois,
Je suis en attente pour votre aide