Bonjour à tous. Dans le cadre de mes études, je suis amené à réaliser un projet qui consiste en la création d'un programme en VBA (avec formulaires, base de données et tout le bazar)
J'ai des difficultés à effectuer certaines opérations (il faut dire qu'on a été formés au langage assez rapidement). Bref j'en viens aux faits.
Je dispose d'une base de donnée clients sur la feuille "Particuliers" du classeur excel.
J'ai un formulaire avec 2 textbox dans lesquelles on peut écrire soit le nom du client ("Nom") soit le numéro du client("Numero") (est-il possible de n'entrer que des chiffres ?), une listbox("liste") dans laquelle je veux afficher les résultats et 3 boutons, un pour lancer la recherche une fois le nom saisi, un pour afficher un nouveau formulaire une fois le nom choisi et un autre pour revenir en arrière (pas important ici)
Voici le début de mon code quand je clique sur le bouton rechercher
Private Sub CommandButton3_Click()
Sheets("Particuliers").Select
Dim client As Variant, nombre As String
liste.Clear
If Nom.Text = "" And Numero.Text = "" Then
MsgBox "Veuillez entrer un nom ou un numéro de client"
Else: Nom.Text = client And Numero.Text = nombre
End If
If client <> "" Or nombre <> "" Then
'liste.rowsource= ???
End Sub
Ce que je voudrais faire c'est afficher dans la list box le nom et le prénom du client situés dans 2 colonnes différentes sur la feuille excel dans la listbox ou le nom et le prénom correspondant au numéro du client.
J'ai déjà essayé de trouver des codes avec la fonction .Find mais je ne comprends pas comment elle fonctionne et le code est faux.
D'ailleurs, j'ai l'impression qu'on ne peut pas mettre le résultat de 2 colonnes différentes dans une listbox. Je me trompe ?
J'espère avoir été assez précis dans mes explications...
J'ai des difficultés à effectuer certaines opérations (il faut dire qu'on a été formés au langage assez rapidement). Bref j'en viens aux faits.
Je dispose d'une base de donnée clients sur la feuille "Particuliers" du classeur excel.
J'ai un formulaire avec 2 textbox dans lesquelles on peut écrire soit le nom du client ("Nom") soit le numéro du client("Numero") (est-il possible de n'entrer que des chiffres ?), une listbox("liste") dans laquelle je veux afficher les résultats et 3 boutons, un pour lancer la recherche une fois le nom saisi, un pour afficher un nouveau formulaire une fois le nom choisi et un autre pour revenir en arrière (pas important ici)
Voici le début de mon code quand je clique sur le bouton rechercher
Private Sub CommandButton3_Click()
Sheets("Particuliers").Select
Dim client As Variant, nombre As String
liste.Clear
If Nom.Text = "" And Numero.Text = "" Then
MsgBox "Veuillez entrer un nom ou un numéro de client"
Else: Nom.Text = client And Numero.Text = nombre
End If
If client <> "" Or nombre <> "" Then
'liste.rowsource= ???
End Sub
Ce que je voudrais faire c'est afficher dans la list box le nom et le prénom du client situés dans 2 colonnes différentes sur la feuille excel dans la listbox ou le nom et le prénom correspondant au numéro du client.
J'ai déjà essayé de trouver des codes avec la fonction .Find mais je ne comprends pas comment elle fonctionne et le code est faux.
D'ailleurs, j'ai l'impression qu'on ne peut pas mettre le résultat de 2 colonnes différentes dans une listbox. Je me trompe ?
J'espère avoir été assez précis dans mes explications...