e-mail gönderme

[akd]

Merhaba arkadaşlar,
Aşağıdaki kodla e-mail'in Outlook Expres'ine bilgileri gönderip e-mail gönderiyorum.

Private Sub CommandButton6_Click()
Dim Link As String
If T8 = i Then MsgBox e, , t
Link = "mailto:" & T8 & "?Subject=Teklif Mektubu "
ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
End Sub
e-mail adres kutusuna T8 textbox'undaki adresi ve konuyada direkt olarak " Teklif mektubu" yazdırıyorum.

Ama metin(mesaj) yazma kısmınada benim belirleyecegim sayfadaki bilgileri bu kodla beraber gönderebilirmiyiz.
selamlar...

 

[akd]

Afedersiniz arkadaşlar,
sorumu yanlışlıkla bu kısma sormuşum,
makrolar sayfasına sormam gerekirdi,
ilgili arkadaşlardan makrolar kısmına almalarını rica edebilirmiyim.
selamlar