Sub mail_gonder()
Dim alan As Range
Dim ws As Worksheet
Dim pic As Picture
Dim picPath As String
Dim shp As Shape
mailkonu = Range("AD1").Value
Mail = Range("AD2").Value
mailcc = Range("AD3").Value
mailmesaj = Range("AD4").Value
sonsatir =...
Merhaba umarım aşağıdaki kod işinizi görür.
Sub Excel_ile_Mail_Gönderme()
Call Kaydet
Dim OutApp As Object
Dim OutMail As Object
Dim table As Range
Dim pic As Picture
Dim ws As Worksheet
Dim wordDoc
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)...
Deneyiniz.
Option Explicit
Sub EmailAuto_CreateSend()
Dim OutApp, OutMail As Object
Dim LastRow, CustRow, LastApptDays, ZoomLev As Long '
Dim FirstNm, LastNm, Problem, LastApptText, Subj, Mesg, BirthPicLoc As String
Dim BdDate, BdFrDate, BdToDate, TodDate, LastApptDt As Date
Dim PicRng As...
Merhaba arkadaslar,
Otomatik olarak Excelden bir mail gonderiyorum. Outlook sayfasi aciliyor, Kime gidecegi ve konusu yaziliyor. Fakat Outlook icine resim yerlestirmeyi yapamadim. Bu adimin devami olarak mail sayfasinda Insert-Picture ile bir file den otomatik olarak nasil resim koyabilirim ...
Bir dosya uzantısının hangi programa ait olduğunu ararken bulduğum bilgileri sunuyorum.
A
.A Assembly source code
.ABK CorelDRAW AutoBackup file
.ACL CorelDRAW 6 keyboard accelerator
.ACM Audio Compression Module (add-on to MSACM.DRV Windows audio driver)
.AD Library module for After Dark...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.