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...
Merhaba arkadaşlar.
Ekte gönderdiğim dosyada Kodlarda bir sorun çıkmıyor. Ve en sonunda "Mail başarıyla gönderildi" mesajını veriyor ama gönderdiğim mesajlar gitmesi gereken mail adreslerine gitmiyor. Yardımcı olursanız çok sevinirim.
Yardimseverliginiz icin cok cok tesekkur ederim, yine ben beceremedim sanirim, size mail adresi yazssan excel dosyasi olarak sizden alsam olur mu, sedatelmas@hotmail.com gonderemezssenizde caniniz sagolun
...araç var bunların vize sigorta kasko gibi yapılması gerekiyor ve her seferinde ben unutuyorum. ve malum patrondan fırça yiyorum siz üstadlarımdan Plaka,tarih,vize sigorta kasko gibi bana 1 hafta önceden mail atarak anımsatacak bir excell tablosu lazım ilgilenen arkadaşlara şimdiden tşk.ederim
...araç var bunların vize sigorta kasko gibi yapılması gerekiyor ve her seferinde ben unutuyorum. ve malum patrondan fırça yiyorum siz üstadlarımdan aşagıda bulunan dosyaya günü gelmeden bana 1 hafta öncesi mail atmasını istiyorum beni büyük bir sıkıntıdan kurtarırsınız. şimdiden çok teşekkür ederim
Öncelikle bilginize emeğinize sağlık. Haftalardır çözmeye çalıştığım sorunuma yardımcı oldunuz çok teşekkür ederim. Son bir sorum olacak; PDF yerine excel dosyası olarak yapmak istesem neyi değiştirmem gerek?
...21 Eylül 2024 17.20 yazdım. Onay kutusu ekledim. "Evet" dersen yine anında gönderiyor "Hayır" dersem hiç göndermiyor. Yani ben Excel dosyasını kapatsam 17.20'de mail göndermiyor.
Belki ben yanlış anlattım. Ben I4 hücresine 21 Eylül 2024 17.20 yazacağım ve dosyayı kapatacağım. 17.20'de mail...
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.
...' Bellek temizliği
Set tempSheet = Nothing
End Sub
Ben PDF dosyası yaptım siz Excel dosyası da yapabilirsiniz
Hatta bu dosyayı direk mail atabilirsiniz artık isteğinize göre değişir.
Oluşan Rapor.pdf dosya Dizaynını daha düzgün olmasını isterseniz
manuel olarak :
Dizaynı düzgün bir...
Arkadaşlar, sayın hocalarım, kullandığım bir mail dosyası var.
Normal çalışıyor.
Bunu I4 hücresine yazacağım zamanda otomatik göndertmek mümkün mü?
Teşekkür ederim.
Saygılarımla.
function getEmailsToSheet() {
var sheet = SpreadsheetApp.getActiveSpreadsheet().getActiveSheet();
var threads = GmailApp.getInboxThreads(0, 10); // İlk 10 e-posta konusunu alır
var row = sheet.getLastRow() + 1; // Mevcut son satırın altına yazmaya başlar
// İşlenmiş mesaj ID'lerini al
var...
...ve önceki işlenmiş mesajları saklayabileceksiniz.
var processedMessages = []; // Önceden işlenmiş e-postaları saklamak için dizi
function getEmailsToSheet() {
var sheet = SpreadsheetApp.getActiveSpreadsheet().getActiveSheet();
var threads = GmailApp.getInboxThreads(0, 10); // İlk 10...
Cem bey bu kodları kullanınca hiç mail aktarmıyor.
Aşağıdaki hatayı verdi
15:43:54
Hata
ReferenceError: processedMessages is not defined
(anonim)
@ makrolar.gs:10
(anonim)
@ makrolar.gs:8
getEmailsToSheet
@ makrolar.gs:6
...kod, yalnızca yeni gelen e-postaları aktarır:
var processedMessages = []; // Önceden işlenmiş e-postaları saklamak için dizi
function getEmailsToSheet() {
var sheet = SpreadsheetApp.getActiveSpreadsheet().getActiveSheet();
var threads = GmailApp.getInboxThreads(0, 10); // İlk 10 e-posta...
Cem bey merhaba
kodu denedim . Yeni mail gelmese dahi 5 dakikada bir ilk maili (aynı maili) aktarıyor. Benim istediğim mail gelince yenisini aktarsın. Eğer gelen yeni mail yoksa aynı maileri tekrardan aktarmasın
...Script’te kullanabilirsiniz. Bu, yalnızca ilk iki satırı alacak ve her yeni e-posta geldiğinde çalışacak şekilde ayarlanmıştır.
function getEmailsToSheet() {
var sheet = SpreadsheetApp.getActiveSpreadsheet().getActiveSheet();
var threads = GmailApp.getInboxThreads(0, 10); // İlk 10 e-posta...
Hüseyin Bey Merhaba
Teşekkür ederim. Script güzel çalıştı. Bir ricam daha olacak her yeni mail geldiğinde script otomatik çalışıp maili aktarsın . Ve mümkünse mail gövdesindeki bütün mesajı değil sadece ilk iki satırı yapıştırsın.
...Bu veriler her ay sonu aylık filtrelenerek ekran görüntüsü alarak müdüriyet tarafına gönderilmekte. İlk başlarda 2 3 ekran görüntüsü ile mail atıyorken şimdi 9-10 ekran görüntüsüne ulaştı ve bu zamanlada artmaya devam etmekte.
Benden istenilen bu ekran görüntüsü ile rapor vermeyi...
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.