...As Object
Dim myRange As Range
Dim EmailItem As Object
Dim sh As Worksheet
Zaman = Time
Tarih = Date + 21
' Outlook uygulamasını başlat
Set EmailApp = CreateObject("Outlook.Application")
Set EmailItem = EmailApp.CreateItem(0) ' olMailItem = 0
' Kredi...
...için mail de boş geliyor.
Hangi kısmında hata yapıyorum ? Teşekkür ederim.
Sub MailBilgi()
Zaman = Time
Tarih = Date + 21
Dim EmailApp As Outlook.Application
Dim Source As String
Dim myRange As Range
Set myRange = Selection
Set EmailApp = New Outlook.Application
Dim EmailItem As...
Yeniden Merhaba,
@cavanoos Manuel olarak,
Outlook çalıştırınız,
Yukarıda ki menüden Giriş - Yeni E-Posta Tıklayınız.
Yeni Oluşturulacak olan yeni epostanın Yukarıda ki Menüsünden
Seçenekler - Teslimi Geciktir Tıklayınız
Açılan pencere de Bu Tarihten önce teslim etme seçeneği (mailin ileri...
...için mail de boş geliyor.
Hangi kısmında hata yapıyorum ? Teşekkür ederim.
Sub MailKredi()
Zaman = Time
Tarih = Date + 21
Dim EmailApp As Outlook.Application
Dim Source As String
Dim myRange As Range
Set myRange = Selection
Set EmailApp = New Outlook.Application
Dim EmailItem As...
Biolightant;
Tarih sütunu kodun içinde nerede, hangi alanı değiştireceğim.
Cems'e yanıt verirken dosya eklemiştim.
Onun üstünde örnek uygulama yapabilir misin ?
Merhaba,
varmış öyle bir şey ( DeferredDeliveryTime )
Tabi o saatte Outlook Açık ve internet bağlantısı olmalı.
Sub PostdatedEmail()
Dim objOutlook As Object
Dim objMail As Object
Dim strTo As String
Dim strSubject As String
Dim strBody As String
Dim teslimZamani As...
...mi).
Makro Çalıştırma İzinleri:
Kullanıcının Excel'de makrolara izin verip vermediği. Bu, makronun çalışabilmesi için gereklidir.
Outlook Yapılandırması:
Kullanıcının bilgisayarında Outlook'un kurulu ve yapılandırılmış olduğundan emin olunması.
Ekstra Bilgiler (Opsiyonel)
Veri...
Merhaba Sayın Forum Sakinleri,
Bugün Word ve Outlook kısayollarının değiştiğini farkettim. Excel'de bir değişiklik yok ancak Word ve Outlook uygulamalarında CTRL+K tuşu CTRL+B olmuş. Excel'de halen CTRL+K şeklinde. Kısayol ayarlarından değiştirmek ile uğraşmak istemiyorum. Buna neyin neden...
Cevabınız için teşekkürler sayın pitchoute. Kodların çalışmasında yine bir sorun çıkmıyor "e posta oluşturuldu ve görüntülendi" mesajı çıkıyor ama gönderdiğim mail adresine posta gitmiyor. (posta gönderme iletisi) görüntüsünü de gönderiyorum. Dosyanın en son halini gönderiyorum. Size zahmet...
Şu şekilde deneyip sonucu paylaşabilir misiniz;
Dim OutlookApp As Object
Dim MailItem As Object
On Error Resume Next
Set OutlookApp = GetObject(, "Outlook.Application")
If OutlookApp Is Nothing Then Set OutlookApp = CreateObject("Outlook.Application")
On Error GoTo 0
If Not OutlookApp Is...
Maili göndermeden önce outlook'u açıyor.
Dim OutlookApp As Object
On Error Resume Next
Set OutlookApp = GetObject(, "Outlook.Application")
If OutlookApp Is Nothing Then
Set OutlookApp = CreateObject("Outlook.Application")
End If
On Error GoTo 0...
Hocam, şu şekilde sayfa kod alanı oldu. Zamanı yazıp gönder diyorum. Anında gönderiyor. Zamanı girdikten sonra başka bir şey mi yapacağım?
Enter yapsam, TAB yapsam hatta başka hücreye tıklasam mail anında gidiyor.
....CC = Cells(3, 9)
.Subject = Cells(1, 9)
.bcc = "muratgunay48@hotmail.com" 'buraya kullandığınız outlook adresi yazılacak.
.Send
End With
End With
daralan.Select
End With
Sayfa.Select
HATA:
With...
Evet, Outlook’ta belirli saatler ve günler dışında gelen e-postaları filtrelemek mümkündür. Bunu yapmak için kurallar oluşturabilirsiniz. İşte adım adım nasıl yapabileceğiniz:
Outlook’u açın ve üst menüden “Kurallar” sekmesine tıklayın.
“Yeni Kural” seçeneğini seçin.
“Gelen iletileri filtrele”...
Private Sub CommandButton1_Click()
Dim outapp As Outlook.Application
Dim outmail As Outlook.MailItem
Dim i As Integer
Dim gecicipath As String
Dim pdffile As String
Dim attachmentsFolder As String
Dim pdfFiles() As String
Dim attachment As Variant
Dim...
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.