اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

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

تعبت كثيرا إلى أن وجدت هذا الشرح المميز لكتابة الحواشي السفلية بين قوسين

الطريقة في ملف فلاشي من إعدادي يقوم بتوضيح مختلف الخطوات للقيام بذلك

يعيب الطريقة أنها:

- يجب أن تنسق من البداية قبل الشروع في إدراج الحواشي السفلية

- كل مستند جديد يجب إعداده لوحده قبل الشروع في العمل

الطريقة حقا مميزة بالرغم من عيوبها البسيطة

حضا موفقا للجميع

رابط التحميل

من هنا

قام بنشر

طريقة بسيطة وسهلة

جزاك الله خيرا

ولكن الملف الفلاشي لن يبقى طويلا

وفضلا منك لا أمرا

لو كتبت لنا الخطوات هنا مشكورا

قام بنشر

طريقة بسيطة وسهلة

جزاك الله خيرا

ولكن الملف الفلاشي لن يبقى طويلا

وفضلا منك لا أمرا

لو كتبت لنا الخطوات هنا مشكورا

بالعكس يا أستاذ أبو خليل أنا متعلم عندكم ومجبور على تقديم طلباتكم

ولن نوفيكم ما تقدموه لنا من دروس

فبارك الله فيكم وفي المنتدى

هذه هي الخطوات منقولة بتصرف:

- افتح الوورد ثم اختر مقاس الخط المناسب لكتابة بحوثك،

- ثم اكتب أي كلمة، ثم اذهب إلى (إدراج) (مرجع) (حاشية سفلية) ثم اختر موافق، سيظهر لك رقم 1 صغير فوق الكلمة التي كتبتها، ولكن بدون أقواس.

- قم بتنسيق الرقم (1)، وذلك بوضع قوسين، ثم قم بتضليل الرقم مع القوسين، ثم اضغط على زر الماوس الأيمن، واختر (خط) ثم قم بإزالة جميع العلامات الموجودة في الخيارات، ما عدا خيار (مرتفع) فضع عليه علامة، ثم اختر موافق، حيث سيظهر لك رقم (1) مع قوسين صغيرين.

- بعد ذلك، اذهب إلى الحاشية في الأسفل، حيث تجد الرقم 1 بدون أقواس.

- ضع قوسين له، ثم قم بتضليل الرقم مع القوسين، ثم اضغط على زر الماوس الأيمن، واختر (خط) ثم قم بإزالة جميع العلامات الموجودة في الخيارات، واختر مقاس للخط حسب منهجيات البحث المتبعة، ثم اختر موافق.

- اذهب إلى رقم (1) في أول الصفحة، ثم قم بتضليل الرقم مع القوسين، ثم اذهب إلى (إدراج ) > (نص تلقائي) > (جديد)، سيخرج لك مربع، اكتب فيه كلمة حواشي مثلاً.

- اذهب إلى (أدوات) > (تخصيص) > (لوحة المفاتيح)، في المربع الأيمن اختر (نص تلقائي)، حيث سيظهر لك جميع النصوص التلقائية، ومنها كلمة (حواشي).

- قم بوضع اختصار للحواشي، وذلك في المربع الأوسط على اليسار، ومن الأفضل أن يكون الاختصار هو (Alt+p)، ثم اختر (تعيين).

وهكذا تم تعيين الحواشي بحيث توضع بين قوسين عند إدراجها بالاختصار الذي تم تحديده سابقا (Alt+p)

قام بنشر (معدل)

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

سأحاول معها وأضعها لكم إن شاء الله

تم تعديل بواسطه alouma
قام بنشر

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

أخي الكريم هذا الكود كنت قد حضرته سابقا لاستعمالاتي الشخصية في كتابة البحوث والمذكرات وقد وضعته في المنتدى في موضوع آخر على شكل قالب Normal.dot وأضعه بين أيديكم للاستفادة منه ولم أستعمله إلا في أوفيس 2003 ولست أدري إن كان يصلح للنسخ الأخرى... والكود كما يلي:

Public Sub MAIN()

    WordBasic.Insert "()"

    WordBasic.CharLeft 1

    WordBasic.NoteOptions FootnotesAt:=0, FootNumberAs:=0, FootStartingNum:="1", FootRestartNum:=2, EndnotesAt:=1, EndNumberAs:=5, EndStartingNum:="1", EndRestartNum:=0

    WordBasic.InsertFootnote Reference:="", NoteType:=0

    WordBasic.Insert "- "

    WordBasic.StartOfLine

    WordBasic.Insert "("

    WordBasic.CharRight 1

    WordBasic.Insert ")"

    WordBasic.CharLeft 3, 1

    WordBasic.FormatFont PointsBi:="14", ColorBi:=0, DiacColor:=0, Points:="10", Color:=0, StrikeThrough:=0, Superscript:=1, Subscript:=0, Hidden:=0, SmallCaps:=0, AllCaps:=0, Underline:=0, Spacing:="0 pt", Position:="0 pt", Kerning:=0, KerningMin:="", Tab:="1", Font:="Times New Roman", FontNameBi:="Traditional Arabic", Bold:=0, Italic:=0, BoldBi:=0, ItalicBi:=0

    WordBasic.ViewFootnoteArea

    WordBasic.CharRight 2

    WordBasic.Insert " "

    WordBasic.CharLeft 4

    WordBasic.CharRight 3, 1

    WordBasic.FormatFont PointsBi:="16", ColorBi:=0, DiacColor:=0, Points:="12", Color:=0, StrikeThrough:=0, Superscript:=1, Subscript:=0, Hidden:=0, SmallCaps:=0, AllCaps:=0, Underline:=0, Spacing:="0 pt", Position:="0 pt", Kerning:=0, KerningMin:="", Tab:="1", Font:="Times New Roman", FontNameBi:="Traditional Arabic", Bold:=0, Italic:=0, BoldBi:=0, ItalicBi:=0

    WordBasic.CharRight 2

End Sub

ويمكن التغيير فيه مثل حجم الخط في الهامش وحجم الخط في الصلب...

أخوكم بن علية

قام بنشر (معدل)

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

أخي الكريم هذا الكود كنت قد حضرته سابقا لاستعمالاتي الشخصية في كتابة البحوث والمذكرات وقد وضعته في المنتدى في موضوع آخر على شكل قالب Normal.dot وأضعه بين أيديكم للاستفادة منه ولم أستعمله إلا في أوفيس 2003 ولست أدري إن كان يصلح للنسخ الأخرى... والكود كما يلي:

Public Sub MAIN()

    WordBasic.Insert "()"

    WordBasic.CharLeft 1

    WordBasic.NoteOptions FootnotesAt:=0, FootNumberAs:=0, FootStartingNum:="1", FootRestartNum:=2, EndnotesAt:=1, EndNumberAs:=5, EndStartingNum:="1", EndRestartNum:=0

    WordBasic.InsertFootnote Reference:="", NoteType:=0

    WordBasic.Insert "- "

    WordBasic.StartOfLine

    WordBasic.Insert "("

    WordBasic.CharRight 1

    WordBasic.Insert ")"

    WordBasic.CharLeft 3, 1

    WordBasic.FormatFont PointsBi:="14", ColorBi:=0, DiacColor:=0, Points:="10", Color:=0, StrikeThrough:=0, Superscript:=1, Subscript:=0, Hidden:=0, SmallCaps:=0, AllCaps:=0, Underline:=0, Spacing:="0 pt", Position:="0 pt", Kerning:=0, KerningMin:="", Tab:="1", Font:="Times New Roman", FontNameBi:="Traditional Arabic", Bold:=0, Italic:=0, BoldBi:=0, ItalicBi:=0

    WordBasic.ViewFootnoteArea

    WordBasic.CharRight 2

    WordBasic.Insert " "

    WordBasic.CharLeft 4

    WordBasic.CharRight 3, 1

    WordBasic.FormatFont PointsBi:="16", ColorBi:=0, DiacColor:=0, Points:="12", Color:=0, StrikeThrough:=0, Superscript:=1, Subscript:=0, Hidden:=0, SmallCaps:=0, AllCaps:=0, Underline:=0, Spacing:="0 pt", Position:="0 pt", Kerning:=0, KerningMin:="", Tab:="1", Font:="Times New Roman", FontNameBi:="Traditional Arabic", Bold:=0, Italic:=0, BoldBi:=0, ItalicBi:=0

    WordBasic.CharRight 2

End Sub

ويمكن التغيير فيه مثل حجم الخط في الهامش وحجم الخط في الصلب...

أخوكم بن علية

جزاك الله عني وعن المنتدى كل خير

بارك الله فيك على هذا الكود الجاهز

لكن لو تفضلت وتكرمت علي بأن تريني طريقة إضافته واستعماله في الوورد

لأني حاولت لكن دون جدوى

بارك الله فيك وفي جميع الأساتذة

تم تعديل بواسطه alouma
قام بنشر

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

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

أرجو أن تستفيد والأعضاء من الملف والكود...

أخوك بن علية

hben3.rar

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information