منتدى مصر التقني
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف أبوسجود الجمعة أغسطس 30, 2013 12:23 pm

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



كيفية إنشاء مستندات Word فى الفجوال بيسك دوت نت ....سؤال يتردد عند الكثريين ....فى هذه المقالة إن شاء الله تعالى سأحاول شرح طريقة إنشاء مستند Word مع إضافة بعض التنسيقات للمستند ......

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  614446307

1_ قم بإنشاء مشروع نوافذ جديد ....مع إضافة زر أمر للنافذة بأسم "إنشاء"

2_ قم بفتح النافذة Add References dialog ومن التويب COM أختر المكتبة Microsoft Word 12.0 Object Library ثم أوكية 

3_ أستيراد مساحة الاسماء التالية :
الكود:
Imports Word = Microsoft.Office.Interop.Word
4_ فى حدث النقر على زر الامر إنشاء ....نقوم بكتابة التعليمات التالية :

الكود:
 Dim word_app As Word._Application = New Word.ApplicationClass()
        Dim word_doc As Word._Document = word_app.Documents.Add()

        Dim para As Word.Paragraph = word_doc.Paragraphs.Add()
        para.Range.Text = "منتدى مصر التقنى"
        para.Range.Style = "Heading 1"
        para.Range.InsertParagraphAfter()

        para.Range.Text = "أهلا وسهلا بكم فى منتدى مصر التقنى" & _
            "هذا مثال على كيفية إنشاء مستندات ورد  "

        para.Range.InsertParagraphAfter()
        Dim old_font As String = para.Range.Font.Name
        para.Range.Font.Name = "Courier New"

        para.Range.Text = " تحياتى لكم" & vbCrLf & " أبوسجود"

        para.Range.InsertParagraphAfter()
        para.Range.Font.Name = old_font

        Dim filename As Object = Path.GetFullPath( _
        Path.Combine(Application.StartupPath, "..\\..")) & _
        "\\test.doc"
        word_doc.SaveAs(FileName:=filename)

        Dim save_changes As Object = False
        word_doc.Close(save_changes)
        word_app.Quit(save_changes)
السطر الاول : أول شفرة قمنا بإنشاء مثيل من Word.ApplicationClass

السطر الثانى : أنشأنا ايضا مثيل من Word._Document

أما الاسطر من 3 حتى 6 هى إنشاء فقرة رأس مع تحديد نص تلك الفقرة " منتدى مصر التقنى " و الاستايل Heading 1

أما السطر السابع و الثامن وضعنا نصوص أخرى للمستند .....وفى السطر التاسع و العاشر قمنا بحفظ نوع الخط المستخدم الحالى و إضافة خط جديد لكتابة فقرة جديدة .......أما فى السطر الحادى عشر حتى الثالث عشر قمنا بكتابة فقرة جديدة مع خط جديد للمستند ....أما السطور الاخيرة من الكود لحفظ المستند بما فيه من بيانات ثم أغلاق كافة الكائنات المستخدمة
avatar
أبوسجود
......
......

تاريخ التسجيل : 18/02/2011
المساهمات : 101
النقاط : 187
التقيم : 8
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف أحمد مناع الأحد سبتمبر 01, 2013 9:32 am

أحسنت الشرح أخى وصديقى أبوسجود ....جزاك الله خيرا

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
سبحان الله وبحمدة .....سبحان الله العظيم
أحمد مناع
أحمد مناع
.
.

تاريخ التسجيل : 15/02/2011
المساهمات : 1108
النقاط : 202034
التقيم : 144
الدولة : مصر
الجنس : ذكر

https://egy-tech.forumegypt.net

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف tryold الأحد نوفمبر 24, 2013 7:24 pm

السلام عليكم

عندي مستند مصمم للإجازة خارجية جاهز وعندي حقول تتكون من الاسم والرقم الوضيفي وتاريخ الإجازة واريد وضع هذة الحقول في مكانها في المستند الجاهز ومن ثما طباعتة 

بمعنى اني اريد ان ارسل هذة الحقول الى المستند ومشاهدته وطباعتة

هل ذلك ممكن ؟ ونحن نعلم ان البرمجة نطاقها واسع

اذا كنتم تعرفون الحل فلا تبخلوا علينا بة

وشكرا لكم يا اساتذتنا......
tryold
tryold
...
...

تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة : السعودية
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف أبوسجود الإثنين نوفمبر 25, 2013 12:20 pm

الممكن فعله على حد علمى هو ان نقوم بادراج جدول الى المستند مع تنسيقه كما اريد من خلال الكود ....وليس ان يتم ادراج بيانات فى جدول موجود اساسا فى المستند ...لانى فهمت من كلام حضرتك ان عندك مستند جاهز به رؤس واعمدة و تريد فقط ارسال بيانات الية من خلال الفجوال 

على اى حال سأحاول وضع مشاركة توضح كيفية ادراج جدول فى مستند ورد من خلال دوت نت
avatar
أبوسجود
......
......

تاريخ التسجيل : 18/02/2011
المساهمات : 101
النقاط : 187
التقيم : 8
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف tryold الأربعاء نوفمبر 27, 2013 9:48 am

نعم طال عمرك هذا ما قصدتة بالفعل 

عندي مستند إجازة معمول عن طريق الوورد ورسمي واريد ان ارسل فقط خانتين الية وهي الاسم والرقم ويكون جاهز للطباعة

وشكرا على الرد يا ابو سجود وبارك الله فيك

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ


ليس من اخترق جهاز اصبح هكر

وليس من كتب كود اصبح مبرمج

وليس من كسر برنامج صار خيبير كسر

ولكن من تواضع لله رفعة

tryold
tryold
...
...

تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة : السعودية
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف أبوسجود الخميس نوفمبر 28, 2013 6:19 pm

أخى الكريم يمكنك انشاء جدول و تنسيقة فى بنية الدوت نت على النحو التالى :

الكود:
Private Sub InsertTable(rowCount As Integer, columnCount As Integer)
    Dim curDoc As Word.Document = WordApp.ActiveDocument
    Dim table As Word.Table
 
    table = curDoc.Tables.Add(WordApp.Selection.Range, rowCount, columnCount)
    table.Cell(1, 1).Range.Text = "Hello Table"
 
    Marshal.ReleaseComObject(table)
    Marshal.ReleaseComObject(curDoc)
End Sub
ويتم استدعاء الاسلوب InsertTable لتحديد عدد الاعمدة و الصفوف فى المستند
avatar
أبوسجود
......
......

تاريخ التسجيل : 18/02/2011
المساهمات : 101
النقاط : 187
التقيم : 8
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف tryold الخميس نوفمبر 28, 2013 7:33 pm

شكرا لك اخي ابو سجود

ياليت ترفق مثال على ماذكرت وشرح للاكواد  اكون شاكر لك ومقدر

وبارك الله فيك

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ


ليس من اخترق جهاز اصبح هكر

وليس من كتب كود اصبح مبرمج

وليس من كسر برنامج صار خيبير كسر

ولكن من تواضع لله رفعة

tryold
tryold
...
...

تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة : السعودية
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف المبرمج الطموح السبت نوفمبر 30, 2013 8:57 am


هذا مثال يوضح كيفية انشاء جدول فى مستند ورد بنفس كود أخى ابو سجود تقريبا بالفجوال 2010

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

المبرمج الطموح
المبرمج الطموح
الاشراف
الاشراف

تاريخ التسجيل : 18/02/2011
المساهمات : 207
النقاط : 368
التقيم : 17
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net  Empty رد: إنشاء مستندات Word و الكتابة فيها مع بعض التنسيق فى بنية vb.net

مُساهمة من طرف tryold السبت نوفمبر 30, 2013 12:43 pm

المبرمج الطموح كتب:
هذا مثال يوضح كيفية انشاء جدول فى مستند ورد بنفس كود أخى ابو سجود تقريبا بالفجوال 2010

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]


بارك الله فيك  على الرد والمساعدة
 
لقد وجدت الحل وهو عمل اشارات مرجعية على المستند وارسال الخانات لة  ونجحت الطريقة
 
مشكور لك  من رد وساهم معي

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ


ليس من اخترق جهاز اصبح هكر

وليس من كتب كود اصبح مبرمج

وليس من كسر برنامج صار خيبير كسر

ولكن من تواضع لله رفعة

tryold
tryold
...
...

تاريخ التسجيل : 06/04/2013
المساهمات : 37
النقاط : 47
التقيم : 2
الدولة : السعودية
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

ََ

مواضيع ذات صلة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى