Gegevens van een rij naar Outlook sturen

[Cruxy]

Hoi,

Ik probeer the value van een range te sturen naar Outlook, maar het is mij nog niet gelukt. Ik zal proberen uit te leggen:

Op mijn excel heb ik de volgende informatie:

A1 = Mike (Naam van iemand)
B1 = Paris
C1 = Amsterdam
D1 = London

Als ik op the command button klik, dan wil de volgende sturen naar Outlook:

Beste Mike,
Uw gekozen steden zijn:

1- Paris
2- Amsterdam
3- London

Ik gebruik deze code (Ik weet dat het verkeerd is, maar beter kon ik niet!):

For Each cell In Range("A1:A4").Cells

aEmail.HTMLBody = "Beste" & cell.Value & "" & vbNewLine _
& aEmail.HTMLBody

Next cell

Ik hoop dat ik wat hulp krijg.
Alvast bedankt,
Cruxy