Discussion :

[Pitou5464]

Salut à tous,

je voudrais récupérer les données d'une liste de valeurs sans les sélectionner dans la liste et sans passser par item.selected.

Voila mon code:

Code :

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

1
2
3
4
5
6
Dim varItem As Variant
Dim path As String
path = FindFax("c:\")
For Each varItem In Me.ListeFax.ItemsSelected
    SendOutlookFax "'" & Me.ListeFax.ItemData(varItem) & "'", "TEST SUBJECT", "TEST BODY", path
Next varItem

Le probleme c'est qu'il faut les sélectionner d'abord pour que la fonction marche et je voudrais éviter.

MErci pour votre aide

[Macno]

Salut,

Code :

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

1
2
3
4
5
6
 
For i = 0 To Me.Liste0.ListCount - 1
 
    MsgBox Me.Liste0.ItemData(i)
 
Next i

[Pitou5464]

Merci, mais je crois que pour qu'il prenne tout ceux de la liste, il faut mettre

For i = 0 non? parce que pour trois enregistrement dans la liste, il m'en prend que deux..

[Macno]

exact excuse moi pour cette erreur.