اكتب الرسالة على ثلاثة أسطر

[خالد نور]

السلام عليكم ورحمة الله وبركاته

العديد قد يريد ان تظهر الرسالة بأكثر من سطر وقد لا يعرف الطريقة احبائى اليكم الطريقة

الكود

Sub Msglin()
   Msg = "     ÓØÑ ÑÞã æÇÍÏ " & vbCrLf
  Msg = Msg & ("ÓØÑ ÑÞã 2") & vbCrLf
  Msg = Msg & "ÓØÑ ÑÞã 3"
  MsgBox Msg
       
End Sub

وفى الملف المرفق تطبيق عملى

Msg.rar

[ابو اسامة العينبوسي]

مشكورر

[الســـــــاهر]

تسلم اخوي خالد على المعلومة القيمة و الله اني ادورها من فترة

[محمد عسكر]

السلام عليكم

مشكور أخى خالد

بارك الله فيك و جزاك الله خيرا

تحياتى

[عبدالله باقشير]

السلام عليكم ورحمة الله وبركاته

تشكر أخى خالد وجزاك الله الف خير

اخوكم/ خبور

[الجزيرة]

:: خالد نور ::

مشكور أخي الحبيب والله يكثر من أمثالك

[محمد عسكر]

السلام عليكم

اخى الفاضل / خالد

بعد اذنك

اضافه للمعلومة و لكن بشكل اخر

فهذا كود لاضافه عدد كبير من السطور حسب رغبتك

و مثالا عليها فى ( 12 ) اثنى عشر سطرا

اتمنى ان تفيد كمعلومه اضافيه

تحياتى

MORE_THAN_3_LINE__S.rar

[خالد نور]

السلام عليكم ورحمة الله وبركاته

رائع اخى محمد عسكر جزاك الله خيرا مثال جيد جدا

ملحوظة :-

"والكود السابق ايضا من الممكن ان تضيف اكثر من سطر ان احببت وليس مقيد بعدد سطور انما تم عمله 3 أسطر للتوضيح فقط

انما يمكنك ان تزيد عدد الاسطر كما تريد كما فى الملف المرفق

وتقبل تحياتى

Msg2.rar

[tag4m]

السلام عليكم ورحمة الله

شكرا لكم جميعا

وهذه مشاركة أخرى الكود فى سطرين فقط

والرسالة حسب ما تشاء من السطور ولو 100 سطر

تحياتى

Msg33333.rar