Metni Vbnewline İle Alt Satırda Devam Ettirmek.

1 2
17/04/2021, 17:49

Oğuz Türkyılmaz

Merhaba uygulamada alttaki kod satırı .body iken vbNewLine ile alt satırdan devam ediyordu fakat .HTMLbody yapınca metin istenen yerlerden alt satıra atlamadan  normal şekilde düz devam ediyor. Bu durumu nasıl düzeltebilirim. Teşekkürler.


Sayın BLA BLA BLA
Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur.
İlginizi çekeceğini ümit ederek
kalıcı bir işbirliği oluşması temennisi ile sağlıklı günler dileriz.

yerine

Sayın BLA BLA BLA, Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur. İlginizi çekeceğini ümit ederek,kalıcı bir işbirliği oluşması temennisi ile sağlıklı günler dileriz.

şeklinde çıkıyor.




Kod:
.HTMLbody = "Sayın  " & CStr(syfEmail.Range("B" & i).Value) & "," _
                        & vbNewLine & vbNewLine & "Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur." _
                        & vbNewLine & vbNewLine & "İlginizi çekeceğini ümit ederek," _
                        & vbNewLine & vbNewLine & "kalıcı bir işbirliği oluşması temennisi ile sğlıklı günler dileriz." & .HTMLbody

                .Send
17/04/2021, 20:41

feraz

(17/04/2021, 17:49)Oğuz Türkyılmaz yazdı: Merhaba uygulamada alttaki kod satırı .body iken vbNewLine ile alt satırdan devam ediyordu fakat .HTMLbody yapınca metin istenen yerlerden alt satıra atlamadan  normal şekilde düz devam ediyor. Bu durumu nasıl düzeltebilirim. Teşekkürler.


Sayın BLA BLA BLA
Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur.
İlginizi çekeceğini ümit ederek
kalıcı bir işbirliği oluşması temennisi ile sağlıklı günler dileriz.

yerine

Sayın BLA BLA BLA, Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur. İlginizi çekeceğini ümit ederek,kalıcı bir işbirliği oluşması temennisi ile sağlıklı günler dileriz.

şeklinde çıkıyor.




Kod:
.HTMLbody = "Sayın  " & CStr(syfEmail.Range("B" & i).Value) & "," _
                        & vbNewLine & vbNewLine & "Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur." _
                        & vbNewLine & vbNewLine & "İlginizi çekeceğini ümit ederek," _
                        & vbNewLine & vbNewLine & "kalıcı bir işbirliği oluşması temennisi ile sğlıklı günler dileriz." & .HTMLbody

                .Send
heralde orda br kullanılıyordu abey karıştırdık kopyala yapıştır ile
17/04/2021, 20:53

feraz

            .HTMLbody = "Sayýn  " & CStr(syfEmail.Range("B" & i).Value) & "," _
                        & "<br>" & "<br>" & "Ekte 2021 WINPERAX Teknik Ürün Kataloðu dikkatinize sunulmuþtur." _
                        & "<br>" & "<br>" & "Ýlginizi çekeceðini ümit ederek," _
                        & "<br>" & "<br>" & "kalýcý bir iþbirliði oluþmasý temennisi ile sðlýklý günler dileriz." & .HTMLbody
17/04/2021, 20:54

Oğuz Türkyılmaz

Feraz Hocam son halini sildinizmi programın
17/04/2021, 20:57

feraz

sizdekilerinin aynısı bendekilerde abey

vbnewline yerine sadece "<br>" bu yazılacak htmlbody olduğu için
17/04/2021, 21:13

Oğuz Türkyılmaz

Anladım Feraz Hocam bendekiler maaesef hiç bir şekilde outlooka dahi göndermiyor şu anda o yüzden sordum kusura bakmayın.
1 2