Mdemir63
Altın Üye
- Katılım
- 7 Temmuz 2006
- Mesajlar
- 2,892
- Excel Vers. ve Dili
- Ofis2010 32Bit Türkçe
- Altın Üyelik Bitiş Tarihi
- 19-02-2026
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Selamlarmerhaba olApp in tanımlamalrını bu şekilde dener misiniz
Dim olApp As Object
Set olApp = CreateObject("Outlook.Application")
Rica ederim kusura bakacak birşey yok. Bu şekilde de denedim aynı hatayı verdimail deneme şansım yok şu an kusura bakmayın, yazıyorum siz test edin diye
olEmail in tanımlamalarını da aynı şekil değişip dener misiniz
Dim olEmail As Object
Set olEmail = olApp.CreateItem(0)
Teşekkür ederim. Sağoluntamamdır eğer çözüm yazılmazsa yarın detaylı bakıp test ederim çözebilirsem paylaşırım
'Dim olApp As Outlook.Application
Dim olApp As Object
'Dim olEmail As Outlook.MailItem
Dim olEmail As Object
'Dim olInsp As Outlook.Inspector
Dim olInsp As Object
'Dim wdDoc As Word.Document
Dim wdDoc As Object
' Set olApp = New Outlook.Application
Set olApp = CreateObject(" Outlook.Application")
‘ .BodyFormat = olFormatHTML
.BodyFormat = 2