كيفية تقسيم الرسالة لاكثر من سطر؟

[ابو فارس2013]

بسم الله الرحمن الرحيم

احبتي في الله

يوجد ملف في المرفقات يقوم بارسال رسالة عند انتهاء المدة المحددة

المطلوب كود او طريقة لجعل الرسالة مؤلفة من اكثر من سطر

ارجوا الافادة

مع العلم ان الرسالة الان تصل بالشكل التالي:

RENT EXPIRED FOR MR 1 ON DATE 16/03/2015 AFTER 10 DAYS AMOUNT IS 60000

ولكن اريدها ان تصبح مثلا هكذا

RENT EXPIRED FOR MR 1 ON DATE 16/03/2015 AFTER 10 DAYS

AMOUNT IS 60000

email from any server.rar

[عبدالله المجرب]

السلام عليكم 

 

 

إستبدل هذا السطر في الكود 

 Mail.TextBody = "RENT EXPIRED FOR MR" & " " & .Cells(i, 1).Text & " " & "ON DATE" & " " & .Cells(i, 6).Text & "  " & "AFTER" & " " & .Cells(i, 7).Text & " DAYS" & " " & "AMOUNT IS" & " " & .Cells(i, 3).Text

بهذا

 Mail.TextBody = "RENT EXPIRED FOR MR" & " " & .Cells(i, 1).Text & " " & "ON DATE" & " " & .Cells(i, 6).Text & "  " & "AFTER" & " " & .Cells(i, 7).Text & " DAYS" & vbNewLine & " " & "AMOUNT IS" & " " & .Cells(i, 3).Text

[ابو فارس2013]

بارك الله فيك استاذ عبدالله

 

مشكور

 

& vbNewLine &

 

ساحفظها ان شاء الله