afficher la 2eme colone d'un combobox = plantage - VB/VBA/VBS - Programmation
Marsh Posté le 17-02-2006 à 05:59:08
tant qu'a faire j'ai un autre probleme assez etrange sur excel:
il faut que je puisse ecrire "ppm" dans une cellule, or c'est impossible quel que soit le format de la cellule, meme en texte (ca me marque visionage)...
Marsh Posté le 17-02-2006 à 08:00:51
Bonjour,
L'application ne bloque pas mais boucle sans fin. l'instruction ComboBox1.BoundColumn = 1 déclanche l'événement change et le processus repart à la ligne au dessus et ainsi de suite.
Pour écrire du texte avec une valeur dans une cellule, on peut essayer cela :
= 6 & " ppm"
Bon courage
Epéna
Marsh Posté le 17-02-2006 à 05:51:14
Bonjour à tous
Desole pour le titre qui ne veux pas dire grand chose mais je ne savais pas trop comment formuler ça.
Je debute en VBA et j'ai commencé une petite application afin de calculer des dilutions. Sur une feuille excel j'ai placé un combobox qui permet de choisir une citerne. Les n° des citernes sont sur une colone et j'ai placé la contenance de la citerne à coté, ce qui donne un truc de ce style:
1 10
2 10
3 10
4 45
5 30
en considerant que 1 se trouve dans la cellule A1 et 30 dans la B5 j'ai defini le listerange en mettant A1:B5
je veux que 2 labels (le 6 et le 10) affichent le n° de la citerne et un label (le 13) affiche la contenance, j'ai fais ceci:
Private Sub ComboBox1_Change()
ComboBox1.BoundColumn = 1
Label6.Caption = ComboBox1.Value
Label10.Caption = ComboBox1.Value
ComboBox1.BoundColumn = 2
Label13.Caption = ComboBox1.Value
End Sub
et mon application se bloque...
Comment pourrais-je resoudre ce probleme ? merci d'avance