combobox et valeurs automatiques

combobox et valeurs automatiques - VB/VBA/VBS - Programmation

Marsh Posté le 25-04-2006 à 20:18:06    

Bonjour,
 
je débute en vba
 
j'ai un formulaire avec deux combobox et j'aimerais que selon la valeur de ces 2 boxes, il me remplisse une textbox.
 
Derrière se trouve une sheet avec un tableau.
 
l'idée est
 

if combobox1.text = Range("A1" ) and combobox2.text : Range("B1" ) Then
textbox1.text = Range("C1" )
Else
if combobox1.text = Range("A2" ) and combobox2.text : Range("B2" ) Then
textbox1.text = Range("C2" )
Else
...
 
End if


 
ceci 80 fois (jusque A80) !
 
Comment ne pas taper tout 80 fois et ne pas rajouter 80 if ?
 
Merci pour votre aide.


---------------

Reply

Marsh Posté le 25-04-2006 à 20:18:06   

Reply

Marsh Posté le 26-04-2006 à 09:33:25    

Je pense que tu peux tout simplement faire une boucle avec i allant de 1 à 80!,un peu dans ce style:
 

Code :
  1. For i = 1 To 80
  2.     If (combobox1.text = Range("A" & i) And combobox2.text = Range("B" & i)) Then
  3.         textbox1.text = Range("C" & i)
  4.     End If
  5. Next i


 
 :jap:

Reply

Marsh Posté le 26-04-2006 à 19:48:42    

un super grand merci à toi !!!! :jap:


---------------

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed