|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Member
Iscritto dal: Oct 2009
Messaggi: 49
|
[VBA/EXCELL '07/OUTLOOK EXPRESS] Aggiungere Mailfrom e firma
Salve a tutti,
non riesco a immettere il mittente e la firma all'interno di una mail inviata tramite database da excell. In pratica in Excell ho un database di clienti. Da questi tramite VBA tiro fuori un elenco in listbox dalla quale seleziono il nome di interesse a cui devo mandare l'email tramite outlookexpress. Posto il codice: Codice:
If ActiveCell.Value Like "*@*" Then
Recipient = ActiveCell.Value
Subj = "" 'OGGETTO DELL'EMAIL VA POSTO TRA LE VIRGOLETTE
Msg = "Egr. " & ActiveCell.Offset(0, -7).Value & " " & ListBox1.Text & "%0A" 'PRIMA RIGA. PER ANDARE A CAPO INSERIRE & "%0A"
Msg = Msg & "I am pleased to inform you that your annual bonus is "
HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & Msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:02"))
End If
Grazie per eventuali chiarimenti. 1 saluto |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 07:50.



















