![]() |
|
#1
|
|||
|
|||
|
إخواني الكرام : عندي ملف وورد ، وهو عبارة عن متن وشرحه .. والمتن بين قوسين ، والشرح خارج الأقواس ..وأريد أن أنسق الخط بحيث يكون المتن أسود عريض .. وأريد طريقة لتحديد ما بين الأقواس في كل الملف ... بدلا من التحديد اليدوي .. فآمل ممن يعرف الطريقة ألا يبخل علينا .. وفي المرفقات ملف كنموذج ... وجزاكم الله خيرا ..
|
|
#2
|
|||
|
|||
|
وهذا كامل الملف ، لمن قدر على تغيير نمط الخط .. ( المتن أسود عريض ، الشرح عادي)
|
|
#3
|
|||
|
|||
|
آمل من الخبراء الإفادة ..فأنا في انتظارهم ..
|
|
#4
|
|||
|
|||
|
حسب كلامك تريد ما بين الأقواس تجعله أسود عريض
غيرته لك أسود عريض وأيضا جعلته لك باللون الأحمر بالإمكان لو لم يعجبك الأحمر أن تغيره لما تشاء
__________________
حُبُّ الصحابةِ والقَرَابة سُنَّة... ألْقى بها ربِّي إذا أحياني
الإمام القحطاني في «النونية» |
|
#5
|
|||
|
|||
|
ولو تحب البحث عما بين القوسين وتغيره لأي شكل آخر اتبع الآتي:
افتح شاشة بحث واستبدال ـ أكثر ـ وضع سهما في أمام خيار باستخدام حروف البدل واكتب في شاشة الاستبدال فوق: \(*\) وتحت تتركه فارغا أو تكتب فيه: ^& وهذه تجدها بالضغط على شفت مع رقم 6 ثم رقم 7 تضغط على شفت مع 6 ثم شفت مع 7 التي في لوحة الكتابة وليس في جزء الأرقام، ولكن المقصود 6 و 7 فوق حروف الكتابة ومن أكثر في شاشة الاستبدال تدخل على خط وتغير الخط حسبما تريد ويمكنك أخي أن تحذف ( وتضع مكانه أي رمز آخر بنفس الطريقة فتفعل ما تشاء لكن المهم تكون الرموز صحيحة هذا ما تعلمته من أخ فاضل جزاه الله عني خير الجزاء وبارك فيه وأورثه الفردوس الأعلى ولكم بمثله أخي ولسائر المسلمين
__________________
حُبُّ الصحابةِ والقَرَابة سُنَّة... ألْقى بها ربِّي إذا أحياني
الإمام القحطاني في «النونية» |
|
#6
|
|||
|
|||
|
جزاك الله خيرا وبارك فيك
|
|
#7
|
|||
|
|||
|
لكن اخي طريقتك لا يعمل معي ، والاوفيس معي هو 2003 فهل يعمل في هذا الاصدار ام لا ؟
اعني كتبت في خانة find هذا \(*\) وفي الخانة الثانية تحت الاولٰى ^& فما الحل ؟؟؟؟ |
|
#8
|
|||
|
|||
|
جزاك الله خيرا .. لقد يسرت عليَّ .. يسر الله لك كل عسير ..
|
|
#9
|
|||
|
|||
|
اقتباس:
كنت من زمن بعيد أبحث عن طريقة لاستبدال ما بين الأقواس في نصوص الوورد أو البحث عنها دفعة واحدة. وقد وجدت هنا ضالتي. أدعو لك كثيراً وللأخ الفاضل الذي تعلمت منه. شكرا. |
|
#10
|
|||
|
|||
|
طريقتي هكذا:
1 - تغيير الأقواس بإضافة رمزين هكذا (& بسم الله الرحمن الرحيم $) 2 - البحث عن &*$ مع تفعيل حروف البدل وتضع في خانة الاستبدال (عريض، أحمر إلخ) 3 - تغيير الأقواس لحذف الرمزين وبالمناسبة: البحث والاستبدال له قدرات هائلة وأسرار لا يدركها كثيرون |
|
#11
|
|||
|
|||
|
اقتباس:
وثانياً: لم أفهم هذه الطريقة من البحث. جربتها لكن لم تنجح الوورد 2010 المهم: هو كيف يمكنك استبدال ما بين الأقواس بنمط آخر او بتنسيق آخر لكن دفعة واحدة. هذا الأمر الذي تفضلت به لم يفض إلى نتيجة. تحياتي لك دكتور. ما أحتاجه فقط الان هو كيف يمكن البحث عما بين الاقواس من دون الاقواس ذاتها. اي فقط الكلمات والجمل التي داخل الأقواس، والطريقة السابقة تأتي ثمارها مع الاقواس. |
|
#12
|
|||
|
|||
|
أنا أستحدمه منذ 15 سنة وهو يعمل بالتأكيد
ولا أزال أستخدم الوورد 2003 ولا أظن أن الأمر يختلف في الوورد 2010 أو غيره وسأشرح من جديد: 1 - استبدل ( بـ (& في المستند كله 2 - استبدل ) بـ ($ كذلك 3 - الآن صار الكلام في جميع الأقواس هكذا (& بسم الله الرحمن الرحيم $) لاحظ ضرورة هذين الرمزين لأن التنسيق المطلوب لا يشمل القوسين أما إذا كان المطلوب تنسيق القوسين وما بينهما فلا حاجة للرمزين ويكون البحث عن \(*\) كما تفضلت --------------------------- 4 - ضع في خانة الاستبدال العلوية &*$ مع تفعيل حروف البدل، وضع في الخانة الثانية التنسيق المطلوب أحمر مثلاً (بواسطة لسان التنسيق) - ملاحظة: النجمة تقوم مقام النص بين القوسين نظرا لخاصية حروف البدل ----------------------------- 5 - الآن تم المطلوب - اعكس 1 و 2 لحذف الرمزين & $ ------------ جرب وأفدنا مع تحديد الخطوة التي حصل الفشل عندها |
|
#13
|
|||
|
|||
|
كلامك صحيح، بيد أن التقصير حاصل مني، لكن أظن أنك غفلت عن نقطة مهمة وهي أن $ - & في بعض الخطوط المستعملة في النصوص تكون (رضي الله عنه) مثلاً، لذلك توجب علي أن أغير تنسيق الخط حتى تتم العملية. فاخترت خط Tmes New Roman .
طبعاً هذه الخطوة يمكن أن تختصر الوقت كثيراً في البحث وتنسيقه، خصوصاً إذا صار الاستبدال لنمط خاص لما بين الأقواس. وسوف يسهل التحكم لاحقاً بشكل كبير فيما لو أصبحت تحت سيطرة النمط. طبعاً لا أخفيك أنها طريقة ذكية جداً. أشكر تواصلك معي، وأدعو لك برضا الله تعالى. |
|
#14
|
|||
|
|||
|
يدفعني الطمع بكرمك أن أطلب منك أن تساعدني في أمر آخر وهو أنني منذ يومين أحاول استبدال حاشية متأخرة عن النص إلي حاشية ملتصقة بالنص. وقد كنت قبل فترة أقوم بهذا الاستبدال لكنني نسيت الطريقة، وقد حاولت مراراً هذين اليومين لكن لم أجد فلاحاً.
مثلا: لو كان النص لصاحب الموافقات: لما كانت المصالح والمفاسد على ضربين دنيوية وأخروية وتقدم الكلام على الدنيوية اقتضى الحال الكلام في المصالح والمفاسد الأخروية (1). أريد الحاشية ملتصقة: لو كان النص لصاحب الموافقات: لما كانت المصالح والمفاسد على ضربين دنيوية وأخروية وتقدم الكلام على الدنيوية اقتضى الحال الكلام في المصالح والمفاسد الأخروية(1). سابقاً استبدلت كل الزحف بالحواشي بأمر واحد من خلال إدراج علامة حاشية سفلية بين قوسين، وأظن أقوم بالنقر على علامة رفع في تنسيق الخطوط. لكن في خانة الاستبدال بـ لم أدر ماذا أضع !! آمل بالمساعدة. |
|
#15
|
|||
|
|||
|
اقتباس:
وبالنسبة لسؤالك الآخر فإن كان المقصود إزالة المسافة قبل القوس فالأمر سهل، بأن تضع الحاشية وأقواسها ومسافتها في الخانة 1 ، وتضع $^& في الخانة 2 ، وستجد أن جميع تلك المسافات مسبوقة بــ $ ليسهل حذفها بالاستبدال وإن كان المقصود تغيير تنسيق رقم الحاشية بأقواسه (الخطّ- الحجم - اللون إلخ) فضع النص في الخانة 1 ، وضع التنسيق المطلوب في الخانة 2 باستخدام لسان التنسيق الموجود في أسفل شاشة الاستبدال |
|
#16
|
|||
|
|||
|
شكرا لك سيدي الفاضل.
اقتباس:
اقتباس:
على سبيل الفرض: (سمعت محمد بن يحيى وهو الذهلي يقول ولا يجوز الاحتجاج الا بالحديث الموصل غير المنقطع الذي ليس فيه رجل مجهول) (1). بعد أن قمت بالاستبدال الذي تفضلت به أصبح: (سمعت محمد بن يحيى وهو الذهلي يقول ولا يجوز الاحتجاج الا بالحديث الموصل غير المنقطع الذي ليس فيه رجل مجهول)$ (1). (لاحظ لا زالت الفاصلة الواحدة موجودة) ثم قمت بوضع علامة $ في الخانة 1 حتى استبدلها بفراغ في الخانة2 لكي يتم حذفها. لكن استمرت الفاصلة بعد الاستبدال. وعذراً على إشغالك معي. ولا يهم أن تهمل هذا الطلب، فوقتك ربما قد يكون أهم بكثير. وشكراً لك كثير الشكر، ولك مني خالص الدعاء. |
|
#17
|
|||
|
|||
|
اقتباس:
وهذه الـ $ إنَّما جيء بها لتمييز المسافة قبل القوس عن سائر المسافات فالآن قد تميزت، فاحذفها مع $ بواسطة شاشة الاستبدال (ضع $ + مسافة في خانة 1 ، ولا شيء في خانة 2) |
|
#18
|
|||
|
|||
|
شكراً أخي الفاضل، ووفقك الله لكل خير.
نعم لم التفت إلى أن ثمة ثلاث خطوات، الأولى: وضع الحاشية وأقواسها ومسافتها في الخانة 1 ، ووضع $^& في الخانة 2 ، ثم استبدال الجميع. الثانية: استبدال العلامة $ بـ $ - مع مسافة في خانة 1. الثالثة: التخلص من العلامة $ بوضعها في الخانة 1 من دون وضع شيء في الخانة2. وأنا قد غفلت عن الخطوة الثانية. شكرا كثيرا. لقد نجح الاستبدال بشكل سريع جداً. أتمنى لك كل الخير والتوفيق. |
|
#19
|
||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||
|
السلام عليكم ورحمة الله وبركاته
للفائدة العامة: (ما لا يعرفه الكثيرون عن وورد -من شروحات سعود العقيل- جزاه الله خيرا) اقتباس:
__________________
{وَلِكُلٍّ وِجْهَةٌ هُوَ مُوَلِّيهَا فَاسْتَبِقُوا الْخَيْرَاتِ} {وَفِي ذَلِكَ فَلْيَتَنَافَسِ الْمُتَنَافِسُونَ} http://tinyurl.com/MyShamelaBooks |
|
#20
|
|||
|
|||
|
استاذ الدكتور محمد بن عبدالله العزام، حفظك الله:
احتجت لمساعدتك في مسألة تخص الوورد: احتجت أن أرفع نص الحاشية في مكان رقم الحاشية داخل المتن، مثلاً : الحاشية رقم (1) ونصها الاسفل : الشاطبي، الاعتصام: ج1 ص33. فاريد أن ارفع النص الاسفل لجميع متن الوورد واضع كلّ نص مكان رقمه، بحيث لا يبقى اي نص للحاشية في الاسفل. هل يمكن هذا باستبدال واحد؟ |
|
#21
|
|||
|
|||
|
إذا كان المقصود بالرفع هو حذف الحاشية ونقلها إلى المتن فأعتقد أنه غير ممكن ويجب عمله يدويا
|
|
#22
|
|||
|
|||
|
اقتباس:
بوركت أعزّك الله، وشكرا لك. |
|
#23
|
|||
|
|||
|
جزاكم الله خير.
|
|
#24
|
|||
|
|||
|
يمكن استبدال نص الحاشية السفلية ورفعه إلى أعلى:
قم بعمل ماكرو والصق فيه هذا الكود: Sub footnote1() For Each fnote In Word.ActiveDocument.Footnotes If Active********View.SplitSpecial = wdPaneNone Then Active********ActivePane.View.Type = wdNormalView Else Active********View.Type = wdNormalView End If Debug.Print fnote.Index & fnote.Range.Text Call writeTable*******(fnote.Range.Tables) fnote.Reference.InsertBefore "[[" & fnote.Range.Text & "]]" Next For Each fnote In Word.ActiveDocument.Footnotes fnote.Delete Next End Sub نفع الله بكم أجمعين وجزانا وإياكم خير الجزاء |
|
#25
|
|||
|
|||
|
اقتباس:
لقد أفرحتني مشاركتك هذه كثيراً - الأخ الكريم سيد عثمان - بيد أنني لم أستطع فعل شيء، بسبب عدم فهمي لكيفية عمل الماكرو المرتبط بوضع الكود المذكور. شكر الله سعيك وجعل ذلك في ميزان حسناتك لو تتلطف علينا في تفصيل ذلك. |
|
#26
|
|||
|
|||
|
تعلمت طريقة اضافة الكود في الماكرو لكن النتيجة ان هناك خطأ
compile error syntax error |
|
#27
|
|||
|
|||
|
هذا حسن مفيد. جزيتم كلكم خيراً.
__________________
يا قابضَ الروح من نفسي إذا احتُضِرَت = وغافرَ الذنب زحزحنِي عن النار
|
|
#28
|
|||
|
|||
|
أخي الكريم هذا هو الكود الصقه داخل الماكرو مع ملاحظة أني لم أرسل لك هذه المرة اسم الماكرو
اسم الماكرو= sub footnote For Each fnote In Word.ActiveDocument.Footnotes Debug.Print fnote.Index & fnote.Range.Text fnote.Reference.InsertBefore " " & fnote.Range.Text & " " Next For Each fnote In Word.ActiveDocument.Footnotes fnote.Delete Next نهاية الماكرو = end sub وإن شاء الله يكون فيه الشفاء العاجل بإذن الله وأرجو من جميع الإخوة الأعزاء من لديه معرفة بلغة الفي بي ايه أن يتبادل الحوارات مع الآخرين حتى يعم النفع على الجميع أسأل الله أن ينفع الجميع بعلمه وأن ينفع غيره بعلمه أيضا وجعله الله في ميزان حسناتكم |
|
#29
|
|||
|
|||
|
مع الاسف لم اتوفق لإجراء الماكرو بالشكل الصحيح - دمت سالماً
|
|
#30
|
|||
|
|||
|
الحمد لله تم اخيراً اجراء الماكرو، لك مني كل التقدير، مع خالص دعائي لك بالتوفيق.
لكن هل يمكن تحديد الخطوط في الحاشية المرتفعة، مثلا يكون الخط 13 ونوع الخط كذا خط، ويكون منسقاً مثلا؟ |
|
#31
|
|||
|
|||
|
جزاك الله خيرا وأسألك الدعاء بظهر الغيب.
نعم يمكن تنسيق الحاشية بخط معين ولون معين وحجم معين في قائمة بحث عن ستجد لسانًا اسمه المزيد أو more اضغط عليه وسوف تجد فيه لسانًا آخر اسمه خاص أو special واختر منها علامة حاشية سفلية أو footnote، مع التنبيه على أنه إذا كانت الحاشية بين أقواس لابد أن تضع الأقواس واختر البحث عن الكل في هذه الحالة ستتحدد لك جميع الحواشي السفلية وفي هذه الحالة قم باختيار التنسيق المناسب لك. أسألكم الدعاء جميعًا |
|
#32
|
|||
|
|||
|
السلام عليكم ورحمة الله الاخوة المشاركون في هذه الصفحة بوركتم
لدي سؤال يهمني جداً وهو : توجد كتب مهمة بصيغة وورد على هيئة متن ممزوج بالشرح مع فصل المتن بجعله بين قوسين واريد تجريد المتن من الشرح فهل من طريقة سريعة يمكن حذف الشرح والابقاء على المتن ؟؟ وبلفظ اخر : هل توجد طريقة سريعة لحذف الكلام الموجود خارج الاقواس والابقاء على الكلام الذي بين الاقواس فقط؟؟ ارجو التفضل بالاجابة السريعة جزاكم الله خير جزاء في الدنيا والاخرة علما ان الاوفيس الذي اعمل عليه هو 2010 |
|
#33
|
|||
|
|||
|
الأخ أبو عبد الرحمن الكبيسي،،،،
يمكن ذلك بكتابة هذه الجملة في البحث عن \(*\) مع التعليم على مربع استخدام أحرف البدل [usewieldcardes] وبذلك تكون قد قمت بتحديد كل الكلام بين الأقواس يمكنك أخذه في ملف جديد نسألكم الدعاء |
|
#34
|
|||
|
|||
|
السلام عليكم ورحمة الله الاخ الفاضل سيد عثمان اشكرك على الاجابة جزاك ربي خير جزاء....
ولكني للاسف لم افهم كيفية التحويل فلو تكرمت عليّ بتوضيح اكثر تفصيلا خطوةخطوة. فبعد فتح الملف المراد استخراج المتن منه ثم الانتقال الى خاصية الاستبدال والبحث ثم التاشير على ماتفضلت به اقف عند هذا الحد .... ثم ماذا بعد ذلك فيوجد في مربع الحوار خيارات عديدة ؟؟؟ فلو تفضلت وتكرمت واطلت النفس معي بتوضيح الاجابة خطوة خطوة جزاك الله خير جزاء ووقاك شر الفتن وثبتك على الصراط المستقيم |
|
#35
|
|||
|
|||
|
نعم ...نعم ...نعم وقبل ان تجيب ............
عرفتها وتمت المحاولة بنجاح فجزاك الله خير جزاء ويسر امرك واسعد ايامك وحقق احلامك وجعل الجنة مقامك |
|
#36
|
|||
|
|||
|
شكرا للاخ الكريم السيد عثمان:
اقتباس:
مع فائق شكري. |
|
#37
|
|||
|
|||
|
نسألكم الدعاء جميعًا.
هذه الخطوة يمكنك أن تفعلها في الحاشية السفلية قبل أن ترفعها إلى المتن، وإن لم يمكنك ذلك فيمكنك وضع هذا هذا الكود: For Each fnote In Word.ActiveDocument.Footnotes Debug.Print fnote.Index & fnote.Range.Text fnote.Reference.InsertBefore "$" & fnote.Range.Text & "$" Next For Each fnote In Word.ActiveDocument.Footnotes fnote.Delete Next وبنفس الطريقة السابقة باستخدام البحث عن وتحديد خيار استخدام أحرف البدل ونضع بدل الأقواس علامة $ والتي بالطبع موجودة في الكود السابق أرجو أن تلاحظ وجودها. وإذا قمت بتحديد ما بين هاتين العلامتين يمكن فعل أي شيء فيه. أرجو أن أكون نافعًا وإذا احتجت استفسار أنا في الخدمة عذرا على الاختصار حيث إني في العمل |
|
#38
|
|||
|
|||
|
وإذا صعب عليك هذا أرجو أن ترسل لي الملف وأنا سأقوم باللازم
|
|
#39
|
|||
|
|||
|
أعتذر جدا سيد عثمان عن التأخير بسبب مشاغلي.
وشكرا لك خالص الشكر بل عرفاني وتقديري بارك الله فيك. لو تكتبه لي هذا الكود كاملاً For Each fnote In Word.ActiveDocument.Footnotes Debug.Print fnote.Index & fnote.Range.Text fnote.Reference.InsertBefore "$" & fnote.Range.Text & "$" Next For Each fnote In Word.ActiveDocument.Footnotes fnote.Delete Next وسؤال ثاني : الا يمكن دمج هذا الكود بطريقة معينة مع الكود الاول، حتى يكون في كود واحد فترتفع الحاشية مع تنسيقاتها المرغوبة سوية؟ مع اعتذاري على الالحاح . |
|
#40
|
|||
|
|||
|
السلام عليكم ورحمة الله وبركاته
أرجو توضيح طريقة وضع رقم الحاشية السفلية بين قوسين في كامل البحث عن طريق البحث والاستبدال علما بأني اخترت من مربع الاستبدال خيار ( المزيد) واخترت من خيار (خاص) علامة حاشية سفلية وبعد البحث جاء رمز ^f وضعته في مربع الاستبدال بين قوسين هكذا (^f) ولكن تأتيني نافذة العملية خاطئة لأن الحرف غير صالح في المربع أرجو توضيح الطريقة وجزاكم الله خيرا
__________________
قال الحسن : رحم الله عبداً وقف عند همه ، فإن كان لله مضى وإن كان لغيره تأخر . |
|
#41
|
|||
|
|||
|
سلام عليكم ورحمة من الله وبركات
هل يمكن أن اضيف في جدول المحتويات التلقائي في الوورد، عنوانا رابعاً وخامساً الخ، فالجدول التلقائي منحصر بمستويات ثلاثة للعناوين فقط، ولا يقبل عنوانا اخر. فلو أدخلت عنواناً رابعاً ضمن عناوين الفهرسة في المحتويات لن يظهر في الفهرس، الا عن طريق تخصيص جدول المحتويات، والتخصيص لا يقبل التحديث التلقائي مثل الجدول التلقائي. |
|
#42
|
|||
|
|||
|
السلام عليكم ورحمة الله
ابتداء أشكر جميع من شارك في هذه الصفحة لما ساهم به من اثراء الموضوع وزيادة في خبرات العمل على ملفات وورد . ثم ان لدي سؤال يهمني جدا وهو عكس سؤالي المتقدم وهو : بالنسبة للكتب المتكونة من متن وشرح والتي عادة ماتكتب بطريقة مزج الشرح مع المتن ويكون المتن مفصولا عن الشرح بوضع المتن بين قوسين ( ) فهل من طريقة سريعة لحذف الشرح والابقاء على المتن ؟ ارجو التفضل بالاجابة سريعاً .. وجزاكم الله خيراً |
|
#43
|
|||
|
|||
|
ثم سؤال اخر يهمني وهو:
كيف اجعل في الصفحة الواحدة اربعة كتب معاً على ان تكون مفصولة بخط لكل منها ؟ بمعنى اريد ان اجعل الصفحة الواحدة مجزأة الى اربعة جداول افقية وليست عمودية فيكون في اعلى الصفحة الكتاب الاول ثم اسفل منه الكتاب الثاني مفصولا بينهما بخط ثم اسفل منه الكتاب الثالث مفصولا بينهما بخط ايضا ثم اسفل منه الكتاب الرابع ؟؟ ارجو التفضل بالاجابة سريعاً اثابكم الله ويسر امركم وثبتكم على الصراط المستقيم . |
![]() |
| الكلمات الدلالية (Tags) |
| ملف , مجدى , الأقواس , بين , خبراء , وورد , كيف |
| أدوات الموضوع | |
|
|