Discussion :

[imrane74]

BONJOUR TT LE MONDE FORUM
je viens de développer une application commercial sous excel
mais il me reste une liste déroulante pour les references et les clients qui s exécute par un code VBA
Pour cela je vous demandes bien de m aider a realiser cet liste deroulante
J ai mis un fichier pour éclaircir mon exemple

[Daniel.C]

Bonjour,

Je ne comprends pas pourquoi tu as besoin d'une macro ? Peux-tu préciser ce que tu veux dire par :

et l ajout des references ce fait un par un , car en saisisant

[Philippe Tulliez]

Bonjour,
Pour réaliser une liste déroulante, tu as le choix entre
Sans programmation
1) L'outil Validation de données-Liste (FAQ traitant de cet outil)
2) Les contrôles formulaire Zone de liste déroulante
3) Les contrôle ActiveX
Programmation en VBA
4) Le contrôle ComboBox à placer dans un UserForm (Tutoriel Utiliser les contrôles dans un UserForm, en VBA Excel)
Voir la FAQ et de nombreux tutoriaux sur Developpez.com

[imrane74]

bonjour Daniel c

1 j ai dis avec MACRO car je veux une liste qui s affiche indepandament du excel lors de la touche d une cellule de la colonne C " pareille au logiciel "
dans les logiciels ont voit une liste qui s affiche quand on veut saisir des references en ecrivant juste une ou deux lettres dans la cellule
2 pour repondre a votre question pourquoi j ai dis un par un
cela veut dire .si j ai un tableau qui s affiche lors de la saisie des references et quand je choisi une reference indique je dois apres passer a la seconde reference en touchant la cellule suivant tjr dans la meme colonne

BONJOUR philippe tulliez
Oui c est ca il y a deux possibilite
mais moi j aimerai la deusieme methode combox USER FORM
Le probleme c est que je n ai pas de connaissance dans la programmation du VBA
Donc si quelqu un veut m aider j en serai vraiment tres reconnaissant

[Daniel.C]

Si tu n'as aucune connaissance de VBA, il vaut mieux que tu optes pour une liste de validation de données.

[imrane74]

BONSOIR PHILLPE

SVP j ai recu ce code d un ami mais j ai un probleme de limite de ligne de la liste de la base de donne "la base de donnee est limite a 100 lignes "
SVP pouriez vous m indiquer comment prolonger cette liste d apres ce code et merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Option Explicit
Dim i As Long, c As Range
 
 
Private Sub TB1_Change()
   Me.LB1.Clear
   i = 0
   For Each c In Application.Index([CODREF], , 1)
     If UCase(c) Like UCase(Me.TB1) & "*" Then
        Me.LB1.AddItem
        Me.LB1.List(i, 0) = c.Value
        Me.LB1.List(i, 1) = c.Offset(, 1).Value
        i = i + 1
     End If
  Next c
End Sub
 
Private Sub LB1_Click()
  If ActiveSheet.Name = "LIVRAISON" Then
  ActiveCell = Me.LB1
  ActiveCell.Offset(, 2) = Me.LB1.Column(1)
  Unload Me
  Else
  ActiveCell = Me.LB1
  ActiveCell.Offset(, 1) = Me.LB1.Column(1)
  Unload Me
  End If
End Sub
 
Private Sub UserForm_Initialize()
  Me.LB1.List = [CODREF].Value
End S