Bonjour,

Je suis cloche, malgré la lecture de la doc sur les arrays
http://didier-gonard.developpez.com/...s-tableau-vba/
je n'arrive pas à charger ma vairable pour ennvoyer des mails Lotus à une liste de personnes.

En effet ma séquence:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
    Dim Recipient As Variant
    Recipient = Array("denis.Nom@organisation.com", "marc.Nom@organisation")
...
    With docMail
        .Form = "Memo"
        .SendTo = Recipient
Envoie bien aux deux personnes

Par contre je n'arrive pas à remplir le tableau d'après une liste.
En plus je me suis rrendu compte que ça envoyait le mail à plein de gens .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
    Recipient = Range("J2").Value & "@organisation.com"
 
        ActiveSheet.Range("J3").Select
            Do While Not IsEmpty(ActiveCell)
            Recipient = Recipient & "," & ActiveCell.Value & "@organisation.com"
            Selection.Offset(1, 0).Select
        Loop
Comment faut il faire pour charger et surout utiliser "recipient" j'ai beau avoir essayé de comprendre les deux dimensions des tableaux et essayé de pêcher "recipient(i,1), ça ne marche pas.
MErci pour votre aide
Denis