ListBox -> cellules excel

  • Initiateur de la discussion Initiateur de la discussion ALBERT
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

A

ALBERT

Guest
Hello tous !!!

Voila, j'ai dans un Userform 2 Listbox

ListBox1 = liste de produit en 1ere colonne et tarif en colonne 2
Quand je double clique sur un produit il s'affiche en ListBox2
Si je double clique une nouvelle fois sur le même produit j'ai
ListBx2 colonne 1 = nom du produit
ListBox2 colonne 2 = nombre de fois dblclick

et ainsi de suite à chaque nouveau produit dbl cliqué

Ce que je voudrais c'est retranscrire tout ca dans mon tableau excel

colonne A = 'nom produit' et qutité du produit (listbox2 colonne2)
colonne B = 'Prix a payer' soit qtité * prix unitaire (listBox2 colone2 multipliée par listbox1 colone2)

Et la je bloque completement... :ermm: :whistle: 😱 😱

Y aurait il quelqu un pour m aider ???

Merdi a tous !!!
 
Re...

Bon bah j'ai bien l'impression que j'ai posé LA question ...?! 😛

Toujours pas de candidats pour une réponse ou une intuition partielle ? 😱hmy:

Merci à ceux qui se creuseront la tête avec moi... 😛inch:

A bientot
 
Re Hervé et Pascal...

Voici un petit bout du fichier que j'ai tiré d'un fichier du forum (peut etre à l'un de vous)

Je vous remercie de vous pencher sur mon probleme

A+ [file name=Albert_ListBx.zip size=17244]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Albert_ListBx.zip[/file]
 

Pièces jointes

re

Macro à placer dans le bouton valider :

Code:
Private Sub CommandButton1_Click()
Dim l As Byte

Range('b5:c20').ClearContents

l = 5

With ListBox2
    If .ListCount = 0 Then Exit Sub
    
    For i = 1 To .ListCount
        Range('b' & l) = .List(i - 1, 0)
        Range('c' & l) = .List(i - 1, 1) * .List(i - 1, 2)
       
        l = l + 1
    Next i
End With
End Sub

Salut
 
Re

En effet pascal, qu'elle synchronisme.

Par contre, petite question :

tu utilises dans ton code Cdbl (pour convertir le type de donnée), alors que moi je considère que la multiplication des données de la listbox converti automatiquement, serais-je dans le faux ?

Merci pour tes éclaircissements.

Bonne fête à toi.

Salut
 
Re

En fait j'ai l'habitude de convertir à cause souvent de souci où les chiffres sont en fait considérés comme du string et les multiplications ne peuvent se faire.

C'est souvent le cas si ce n'est toujours avec les textbox mais j'ai pas testé avec la listbox mais c'est vrai que je le fais machinalement

Bon app

Edition : Par contre tu as testé le cas où la listbox est vide ce que je n'ai pas fait (Albert tien en compte)

Message édité par: Pascal76, à: 17/05/2005 12:23
 
Salut Pascal, Salut Hervé !!!

Tout d'abord un GRAND MERCI pour votre aide.

Désolé je rentre seulement du boulot et je n'ai pas pu vous répondre avant (RDV).

J'ai jeté un coup d'oeil sur vos formules...

Je dois dire que je n'ai pas réussi avec celle de Hervé qd à ton fichier Pascal, c'est éblouissant et presque parfait... 😱

Le seul 'hic' c'est que j'aurais en fait voulu qu'a chaque fois que je lance le UF et les consos, les premières ne s'effacent pas mais que les nouvelles validations aile a la suite des precedentes...
Et si possible (le gros emm...deur tu te dis là 🙂 ) avoir le nombre de consos affiché dans la colonne Produit (avant ou apres le nom du produit)...

En tout cas merci, vous m'avez déjà enorméménet avancé et je n'arrivait plus a dormir !!!

A+
 
Re Hervé et Pascal...

Hervé, ca y est j'ai réussi avec ta formule, mais c'est le meme probleme que celle de pascal...

A chaque nouveau lancement et validation de consos du UF, ca écrase les comptes rendu précédent...

🙁 :unsure:

Et pareil, là toi aussi tu de dis que je suis chi..t !! toujours cette histoire de nombre de produit dans la colonne produit, quitte a faire que s'il y a 2 cocas ds la listbox, cela prenne 2 ligne dans le tableau
Coca 1.2
Coca 1.2

Au lieu de

coca x2 2.4

😱 😱 😱 J'ai honte d'être si méticuleux... Mais je pense que vous l'êtes encore plus que moi vous deux , non??? 🙂 😛

Encore un ENORME MERCI à vous !!! 🙂

A+

ALB
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

D
Réponses
16
Affichages
7 K
Réponses
6
Affichages
1 K
R
Réponses
18
Affichages
6 K
RUBEN88
R
Y
Réponses
0
Affichages
2 K
Y
D
Réponses
2
Affichages
1 K
D
Z
Réponses
4
Affichages
1 K
zeltron
Z
H
Réponses
17
Affichages
3 K
H
Y
Réponses
13
Affichages
10 K
yann marchand
Y
K
Réponses
0
Affichages
1 K
K
Retour