Sorgu için arama sonuçları: RangetoHTML

  1. TiOr

    Outlook'ta tümünü yanıtla yapmak

    ...GÖNDER 'http://msdn.microsoft.com/en-us/lib...odeltoSendMailPart2_MailingRangeSelectionBody ' You need to use this module with the RangetoHTML subroutine. ' Works in Excel 2000, Excel 2002, Excel 2003, Excel 2007, Excel 2010, Outlook 2000, Outlook 2002, Outlook 2003, Outlook 2007, and...
  2. TiOr

    Seçilen Hücreleri Mail Göndermek.

    ...'http://msdn.microsoft.com/en-us/lib...odeltoSendMailPart2_MailingRangeSelectionBody ' You need to use this module with the RangetoHTML subroutine. ' Works in Excel 2000, Excel 2002, Excel 2003, Excel 2007, Excel 2010, Outlook 2000, Outlook 2002, Outlook 2003, Outlook 2007, and Outlook 2010...
  3. E

    Soru Sayfadaki farklı hücreleri birleştirerek makro ile mail gönderme.

    ...> Dim rng As Range, rng1 As Range yaptım Set rng = Sheets("HAYMANA").Range("A4:N35").SpecialCells(xlCellTypeVisible) Set rng1 = Sheets("HAYMANA").Range("A36:N65").SpecialCells(xlCellTypeVisible) bunu ekledim ve son olarak da .HTMLBody = RangetoHTML(rng) & RangetoHTML(rng1) altı çiziliyi...
  4. E

    Soru Sayfadaki farklı hücreleri birleştirerek makro ile mail gönderme.

    Merhabalar, excel'de belirlenen hücreleri vba makroyla mail olarak gönderme kodunu yazdım. Bu kodda A7 ile N25 sütunları arasındaki satır ve sütunlar gönderiliyor. Buna ek olarak A1 ve N4 arasındaki kodları da eklemek istiyorum yani 2 farklı hücreyi birleştirip o şekilde mail göndermek...
  5. F

    Soru Excel İçeriğini Buton ile Outlook Mail e Aktarma

    Hocam Teşekkürler. ".HTMLBody = RangetoHTML(alan1) & "<br><br>" & RangetoHTML(alan2)" olarak revize edildi. "Set alan2 = Range("A1:K50") Set alan1 = Range("P3:U16") " kodları değiştirilerek dosyayı reviz ettim. Ellerinize sağlık. Syg, Syg,
  6. Ömer

    Soru Excel İçeriğini Buton ile Outlook Mail e Aktarma

    ...için .send deki tırnak işaretini kaldırın. '.send .HTMLBody = "Merhaba" & "<br><br>" & "Veriler Aşağıdadır." & "<br><br>" & RangetoHTML(alan1) & "<br><br>" & RangetoHTML(alan2) & .HTMLBody End With Set wrdEdit = Nothing Set OutMail = Nothing Set...
  7. F

    Soru Excel İçeriğini Buton ile Outlook Mail e Aktarma

    ...With OutMail .Subject = Range("Y1") .Display 'Maili otomatik göndermek için .send deki tırnak işaretini kaldırın. '.send .HTMLBody = RangetoHTML(alan) & .HTMLBody End With Set wrdEdit = Nothing Set OutMail = Nothing Set OutApp = Nothing End Sub Function RangetoHTML(rng As Range) ' Changed...
  8. H

    Makro ile belirtilen hücredeki mail adreslerine mail atma

    ...'For Tips see: http://www.rondebruin.nl/win/winmail/Outlook/tips.htm 'Don't forget to copy the function RangetoHTML in the module. 'Working in Excel 2000-2016 Dim rng As Range Dim OutApp As Object Dim OutMail As Object Set rng = Nothing On Error Resume Next 'Only the...
  9. Asri

    Excel mail gönderme kısa yolu

    ....CC = mailcc .Subject = mailkonu .Display 'Hemen göndermek için '.send .HTMLBody = mailmesaj & RangetoHTML(alan) & .HTMLBody End With Set wrdEdit = Nothing Set OutMail = Nothing Set OutApp = Nothing End Sub Function...
  10. D

    mail adresi bulunan kişilere tablolu mail gönderimi

    Merhaba Sayın mancubus, Paylaşımınız çok faydalı, çok teşekkürler. Ancak aşağıdaki şekilde hata aldım ve sebebini anlayamadım. Yardımcı olabilir misiniz.
  11. mancubus

    mail adresi bulunan kişilere tablolu mail gönderimi

    Merhaba. Ekteki dosyayı yıllardır sorunsuz kullanıyoruz. Ana_Sayfa sayfasında açıklama mevcut. Sizin tabloyu da kopyalayarak fikir vermeye çalıştım. Meşhur :) RangetoHTML KTF ile range tabloya dönüşüyor. Sorunuz olursa cevaplamaya çalışırım.
  12. Korhan Ayhan

    mail gönderimi

    ...= "" .Bcc = "" .Subject = "Mail konusunu buraya yazınız." .HTMLBody = Mesaj & RangetoHTML(Tablo) & .HTMLBody .BodyFormat = 2 .Save '.Send End With...
  13. O

    Excel Sayfasını Mail Olarak Gönderme

    yardımcı olur musunuz?
  14. O

    Excel Sayfasını Mail Olarak Gönderme

    ....Cc = "" .Bcc = "" .Subject = Sheets("ANA SAYFA").Range("J1").Value .HTMLBody = Metin & RangetoHTML(rng) & Metin2 & .HTMLBody .Display End With On Error GoTo 0 With Application .EnableEvents = True .ScreenUpdating = True End...
  15. I

    Seçilen Hücreleri Mail Göndermek.

    Sub SECILI_ALANI_MAIL_GONDER() 'For Tips see: http://www.rondebruin.nl/win/winmail/Outlook/tips.htm 'Don't forget to copy the function RangetoHTML in the module. 'Working in Excel 2000-2016 Dim rng As Range Dim OutApp As Object Dim OutMail As Object Set rng = Nothing On...
  16. Korhan Ayhan

    Seçilen Hücreleri Mail Göndermek.

    Aşağıdaki gibi deneyiniz. .Display .To = "maili_göndereceğiniz_adres" .CC = "" .BCC = "" .Subject = "This is the Subject line" .HTMLBody = RangetoHTML(rng) & vbLf & VbLf & .HTMLBody
  17. I

    Seçilen Hücreleri Mail Göndermek.

    ...ve logo ekleyebilirmiyim. yada mevcut imzayı resim olarakda ekleyebilirim. hangisi daha kolaysa. musait oldugunuzda paylasırsanız sevinirim. To = "ron@debruin.nl" .CC = "" .BCC = "" .Subject = "This is the Subject line" .HTMLBody = RangetoHTML(rng)...
  18. Korhan Ayhan

    Boyutlandırma

    ...etmiş olursunuz. Yazı karakteri ve sütun genişliğini otomatik yapınca biraz daha derli-toplu sonuç çıkabiliyor. Deneyiniz. Function RangetoHTML(rng As Range) ' Changed by Ron de Bruin 28-Oct-2006 ' Working in Office 2000-2016 Dim fso As Object Dim ts As Object Dim TempFile As...
  19. K

    Boyutlandırma

    ...ayarlayan sayıyı bulamadım yada eklemem mi gerekir bilmiyorum. Eğer biliyorsanız yardımlarınız için şimdiden teşekkürler. Function RangetoHTML(rng As Range) ' Works in Excel 2000, Excel 2002, Excel 2003, Excel 2007, Excel 2010, Outlook 2000, Outlook 2002, Outlook 2003, Outlook 2007, and...
  20. N

    Seçilen Hücreleri Mail Göndermek.

    ...'For Tips see: http://www.rondebruin.nl/win/winmail/Outlook/tips.htm 'Don't forget to copy the function RangetoHTML in the module. 'Working in Excel 2000-2016 Dim rng As Range Dim OutApp As Object Dim OutMail As Object Set rng = Nothing On Error Resume Next 'Only the...
Üst