cs_vincezo
Messages postés6Date d'inscriptionsamedi 5 février 2005StatutMembreDernière intervention21 septembre 2005
-
6 juil. 2005 à 19:56
cs_vincezo
Messages postés6Date d'inscriptionsamedi 5 février 2005StatutMembreDernière intervention21 septembre 2005
-
7 juil. 2005 à 15:30
Bonjour, voici mon code :
Private Sub creation_feuille_Click()
Dim Client As String
Dim Compte As String
Dim Emetteur As String
Dim anc_num As String
Dim nom_feuille As String
Dim Somme As String
Dim date_valeur As Date
Dim ligne_cde As Integer
Dim Numéro As Integer
Dim lignevérif As Integer
Dim vérif As Integer
J'ais un souci, j'aimerais qu'une liste de mes fournisseurs s'affiche si le non entré en premier est pas correct. J'ai une seule colonne sur une autre feuille nommée "fournisseurs" avec 100 lignes. Comment je peux intégrer cette solution à l'endroit en rouge.
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200620 6 juil. 2005 à 20:21
Salut
A mon avis il y a un problème dans tes boucles do ... loop imbriquées. Je te laisse chercher un peu.
C'est comme ça qu'on apprend.
Si tu ne vois toujours pas, je te donnerai un peu plus d'indications plus tard.
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
cs_vincezo
Messages postés6Date d'inscriptionsamedi 5 février 2005StatutMembreDernière intervention21 septembre 2005 6 juil. 2005 à 21:01
Rebonjour,
pour le problème dans ma boucle, je suppose que tu mettrait une vérification d plus sur les conditions de sortie de boucle:
Do
If Worksheets("Fournisseurs").Cells(lignevérif, 1).Value = Client Then
vérif = 1
Else
vérif = 0
End If
lignevérif = lignevérif + 1
Loop Until Worksheets("Fournisseurs").Cells(lignevérif, 1).Value "" or vérif 1
Cela éviterait d'aller jusqu'au bout du listing et de perdre ma donnée vis à vis de la ligne et de sortir de la boucle lorsque je trouve le fournisseur.
cs_vincezo
Messages postés6Date d'inscriptionsamedi 5 février 2005StatutMembreDernière intervention21 septembre 2005 7 juil. 2005 à 15:30
Sinon, du point de vue du combobox, je dois créer un userform avec combobox, jusque là ok, mais après je n'arrive pas à définir le listing (colonne A feuille fournisseur) des données à affichées.
Je n'ais pas le choix du chemin, et a priori, il faut faire une boucle?!
Là, je plante complètement.
@++