Aide pour LIstBox

Jazz_Bass Messages postés 6 Statut Membre -  
Polux31 Messages postés 7219 Statut Membre -
Hello,

J'ai un petit souci avec la fonction DECALER pour une ListBox d'un USF.

Vous pouvez télécharger le fichier Test.xls avec les explications.
http://www.cijoint.fr/cjlink.php?file=cj200812/cijkUdyPgD.xls

Merci pour votre aide.

Jazz_Bass.

3 réponses

Polux31 Messages postés 7219 Statut Membre 1 204
 
Bonjour,

Ca ressemble beaucoup à : "voilà mon fichier, merci de me le retourner après avoir fait ce que je demande ..."

Voilà une piste:

Dim ws As Worksheet
Dim lig As Long

   set ws = Worksheets(1)    ' L'onglet qui contient les données
   lig = 1                             ' La 1ère ligne à tester

   With ws
      While .Range("A" & lig).Value <> ""
         If .Range("B" & lig).Value <> "" Then
            USF.List1.Additem .Range("B" & lig).Value
         End If
      lig = lig + 1
      Wend
   End With

   set ws = Nothing


A toi de l'adapter pour ton besoin.

Bon courage.

;o)
0
Jazz_Bass Messages postés 6 Statut Membre
 
Hello,

Merci Polux31 de me répondre.

C'est dommage que tu penses ça alors que j'ai été poli et si tu lis bien le message du fichier, je ne dis pas "Merci" et point, je dis "Quelqu'un pourrait m'aider ?

Personnellement, je n'aime pas qu'on fasse le travail pour moi, mais là j'avais vraiment besoin d'aide car j'y ai passé la journée d'hier et pratiquement la journée d'aujourd'hui.

En revanche je rétorque que tu n'étais pas obligé de me répondre, ou même que si ça t'ennuie d'aider les autres, ben ne réponds pas, ou alors abstiens-toi de faire ce genre de remarque.

Et je rajoute que j'en veux pas de ton aide.

Bonne soirée.

Jazz_Bazz.
0
Polux31 Messages postés 7219 Statut Membre 1 204
 
Bonjour,

Je faisais une remarque et rien de plus. Il n'y a aucune question dans la demande. Juste : Vous pouvez télécharger le fichier Test.xls avec les explications. Si ce n'est pas un semblant de "Faites le à ma place", ça y ressemble beaucoup. Une petite lecture de la charte avant de poster, aurait pu te permettre de formuler autrement ta demande.

D'autre part, j'ai pris le soin d'apporter une solution. Si tu avais regardé dans mon profil, tu aurais pu constater que d'aider les autres ne m'ennuie pas.

Encore un petit rappel : ce n'est pas moi le demandeur.

;o)
0