gag1983
Messages postés3Date d'inscriptionjeudi 1 juillet 2004StatutMembreDernière intervention11 août 2004
-
7 juil. 2004 à 09:45
cs_coq
Messages postés6349Date d'inscriptionsamedi 1 juin 2002StatutMembreDernière intervention 2 août 2014
-
7 juil. 2004 à 10:29
je ne trouve pas l'erreur!
je veux mettre des données dans une textbox, sous certaines conditions.
J'ai un chiffre de 20 digits au départ qui ne contient que des o et des X.
Si on a un x en position i on affiche la ieme colonne de la feuille de calcul 2 dans une listbox de UF4.
Voici le code
en message retour j'ai
Invalid procedure call or argument (Error 5)
Dim i As Integer
Dim cod As String
Dim result As String
cod = Sheet3.Range("A25")
With UserForm4
For i = 0 To 19
If Mid(cod, i, 1) = "x" Then
result = Sheet2.Range("A1").Offset(i)
ListBox1.AddItem (result)