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...
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...