طرق كتابة الشعر في word
قديم 07-05-2011, 09:47 PM   #1
عـــــضــــو فـــــــــعـــــال
 
الصورة الرمزية أسماء
 
تاريخ التسجيل: Jan 2011
المشاركات: 360
افتراضي طرق كتابة الشعر في word

طرق كتابة الشعر في word
الطريقة الأولى :
ادرج جدول من ثلاثة حقول ، اكتب الصدر في الحقل الأول والعجز في الثالث ، ثم SHIFT + ENTER لكتابة بيت جديد ، بعد ذلك حدد الكل ثم ضبط كلي من تنسيق ، ثم غير عرض الأعمدة لتتناسب مع بعضها.
الطريقة الثانية :
1- ادرج جدول من ثلاثة حقول ، اكتب الصدر في الحقل الأول والعجز في الثالث ثم حدد الصف كاملا وانقر عليه بالزر الأيمن للماوس ثم اختر خصائص الجدول .
2- اختر لسان التبويب " خلية " من نافذة " خصائص الجدول " ثم انقر على الزر " خيارات " .
3- ضع اشارة صح على مربع الاختيار " احتواء النص " في صندوق حوار خصائص الخلية . 4- اضغط موافق مرتين وتمتع بكتابة القصيدة داخل الجدول بدون عناء التنسيق لكل بيت من القصيدة .
الطريقة الثالثة :
إضافة إلى الطريقة الثانية باستخدام الماكرو " برمجة حلوة وسهلة " :
1- من قائمة " أدوات " Tools اختر " ماكرو Macro " .
2- اختر تسجيل ماكرو جديد باسم Adjustmenet ثم سجل التسجيل Create.
3- اختر ماكرو مرة أخرى من قائمة أدوات ثم اختر" وحدات ماكرو" وحدد اسم الماكرو Adjustmenet ثم اختر " تحرير " .
4- يفتح عندك الفيجيوال بيسك Visual Basic ، ألصق نص الماكرو التالي في الـ Sub :
Selection.SelectColumn
Selection.ParagraphFormat.Alignment = wdAlignParagraphJustjfy
Selection.Cells.SetHeight RowHeight:=8+
Selection.Font.SizeBi, HeightRule:=wdRowHeightExactlyWith Selection.Rows
.TableDirection = wdTableDirectionRtl
.Alignment = wdAlignRowRight
.AllowBreakAcrossPages = True
.SetLeftIndent LeftIndent:=CentimetersToPoints(0),

Advertisement

RulerStyle:=wdAdjustN one

End With
Selection.Rows.SpaceBetweenColumns = CentimetersToPoints(0.38)
Selection.MoveLeft Unit:=wdCharacter, Count:=l
For I = 1 To 24
Selection.EndKey Unit:=wdLine
Selection.TypeText Text:=Chr(ll)
Selection.MoveDown Unit:=wdLine, Count:=l
Next I
End Sub
ثم أغلق مايكروسوفت فيجيوال بيسك Visual Basic .
5- اتبع المسار : أدوات / تخصيص / اختر لسان التبويب " الأوامر " / اختر من الفئات " وحدات الماكرو " .
6- اسحب الماكرو Normal.NewMacro.Adjustment إلى اشرطة الأدوات .
7- لتنسيق الشعر بهذه الطريقة افتح ملف الشعر المراد ضبطه ثم ضع مؤشر الماوس في أي مكان داخل العمود المطلوب تنسيقه ثم اضغط على المفتاح المسمى Normal.NewMacro.Adjustment فتلاحظ بدء تنسيق الجدول آليا .
يضبط الماكرو أبعاد الجدول بما يتناسب مع حجم الخط ، ويجب تعديل الرقم 24 إلى 1000 مثلا إذا كان الشعر المراد تنسيقه يحتوي على ألف بيت شعر.
التوقيع
أسماء غير متواجد حالياً   رد مع اقتباس
إضافة رد

الكلمات الدلالية (Tags)
الشعر, word, طرق, كتابة

أدوات الموضوع
انواع عرض الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة
Trackbacks are متاحة
Pingbacks are متاحة
Refbacks are متاحة


المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
تسريحات الشعر للمراهقات نادين وجدي قسم الحوار العام 2 06-08-2012 11:37 AM
استخدام لوحة المفاتيح في الـ Word أسماء رياضيات و إعلام آلي 4 10-05-2011 05:29 PM
لمنع تنسيق الوصلات التشعبية في Word أسماء رياضيات و إعلام آلي 0 07-05-2011 09:54 PM
تحميل كتاب طه حسين في الشعر الجاهلي رؤووف قسم الحوار العام 0 29-01-2011 06:14 PM
شعر التفعيلة /الشعر الحر / وسيم اللغة العربية وآدابها 2 29-08-2010 03:29 PM

sitemap

الموقع يخضع لسياسة ادسنس لقراءة الشروط بالعربية انقر هنا أو بالانجليزية Google Adsense Privacy Policy   

 abuse@alg17.com


الساعة الآن 06:09 AM.


Powered by vBulletin Version 3.8.11 Alpha 3
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd
Translation by Support-ar
adv helm by : llssll
المواضيع المنشورة في المنتدى تعبر عن رأي اصحابها وجميع المواضيع التي تخالف سياسة الموقع يتم حذفها

Search Engine Friendly URLs by vBSEO

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138