اريد كود ماكرو لزيادة مسافة بعد ال ( ، : ؛ )

[محمد ابوجبل 0]

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

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

[برقش 35]

لست خبيراً بالماكرو ولكن يمكن حل مشكلتك بالبحث والاستبدال.

اضغط على CTRL+H وانسخ النص أدناه وألصقه في خانة البحث:

([:،؛])([! ])

ألصق في خانة الاستبدال ما يلي:

\1 \2

لا تنس أن تختار "استخدام أحرف البدل" في خيارات البحث.

بهذه الطريقة يبحث الوورد عن كل نقطتين/فاصلة/فاصلة منقوطة لا تتبعها مسافة، فيضيف مسافة بعدها.

Edited September 3, 2018 by برقش

[محمد ابوجبل 0]

اشكر حضرتك على الرد
نفذت كل المكتوب
لكن عند التجربة تعدى الأمر الى الكلمات
وفصل الحرف الأول عن باقى الكلمة بعد علامات الترقيم
وحتى عند مسح المسافة الناتجة لا يلتصق الحرف مرة اخرى
*****************
انا حصلت على اكواد اخرى وقمت باستبدال شئ واحد داخل الكود
فمرة جعلتها ، ومرة جعلته ؛ ومرة :
لكن لو امكن كيف اجعلهم جميعا فى كود واحد لسهولة التعامل

 

Edited September 3, 2018 by محمد ابوجبل

[برقش 35]

أعدت تجربة الكود عندي ونجح الأمر. لذلك:

1- تأكد من عدم وجود مسافة في آخر نص خانة الاستبدال. تأكد أنه ينتهي بـ 2.

2- احرص أن تنسخ وتلصق كود خانة البحث كما هو. لا تكتبه بنفسك من جديد في الخانة.

 

تبين لي أن النسخ من الصفحة يضيف حروفاً غير مرئية إلى الخانة في الوورد. لذا عدّلت ردي السابق.

Edited September 3, 2018 by برقش

[محمد ابوجبل 0]

جزاكم الله خيرا
وشكرا على اضافتك
لكن للأسف لم تضبط معى
انا اعمل على 2016 لكن عند فتحه يعطى انترو 365

هل الاصدار له علاقة

[برقش 35]

لا أعرف ما هي حدود أوفيس 365 بالنسبة للغة العربية، فلم أجربه قط. ولكن جرّب هذه الطريقة اليدوية الأخيرة:

افتح نافذة البحث والاستبدال. حوّل لوح مفاتيحك إلى الإنجليزية واكتب هلالين () داخلهما معقوفان، أي هكذا:   ([])

ضع المؤشر بين المعقوفين وحوّل لوح المفاتيح إلى العربية، واكتب     :،؛

فتكون هذه هي النتيجة:       ([:،؛])

في خانة الاستبدال اكتب بلوح المفاتيح \ ثم 1 ثم مسافة. (لا تهم لغة لوح المفاتيح)

اختر "باستخدام أحرف البدل" وجرب الاستبدال.

إن لم ينجح الأمر فأنا أستسلم 🙂

Edited September 3, 2018 by برقش

[مصطفى شاهين 46]

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

يوجد حل بسيط، وأنا أستخدمه دائماً، ولا أواجه مشاكل بذلك.

الحل كالتالي:

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

يتم تكرار العملية لباقي علامات الترقيم.

دمتم بخير

 

في ‏٠٣‏/‏٠٩‏/‏٢٠١٨ at 22:00, برقش said:

فتكون هذه هي النتيجة:       ([:،؛])

الأستاذ برقش المحترم

ممكن تفسير علمي للقوسين ([])، \1 \2، وما هي الحالات التي يمكن استخدامها.

دمتم بود

[برقش 35]

عذراً ولكن لم أنتبه إلا اليوم على سؤالك هذا.

عند استخدام خيار أحرف البدل في الوورد، يمكن استعمال المعقوفين [] للبحث عن أي من الأحرف (لا الكلمات) بينهما. مثلاً، يبحث [بج، ] عن الباء أو الجيم أو الفاصلة العربية أو المسافة. أما إذا أردت أن تبحث عن تسلسل حروف (بحسب ترتيب الحاسوب لها)، فيمكن استعمال "-". مثلاً،

[0-9]

يبحث عن أي رقم من الأرقام.

ولكن ماذا لو أردت في الاستبدال أن تعيد الحرف الموجود بين المعقوفين، أيما يكن؟ هنا يأتي دور علامة

\1

في الاستبدال. إنّها تستلزم أولاً أن تحدّد في خانة البحث ما تريد إعادته، وذلك من خلال الهلالين (). لذا نضع مثلاً [بج، ] بين هلالين: ([بج، ]) وفي خانة الاستبدال نضع

\1

فيعرف الوورد أنك تريد إعادة ما وضعته بين ( ) في الاستبدال حيث وضعت 1\. وهكذا أيضاً إذا استعملت ( ) مرّة ثانية في البحث، تستعمل 2\ في الاستبدال...

 

إليك هذا المثل الخيالي:
إن أردت البحث مع اختيار أحرف البدل عن:

([0-9]) ([بجد])

والاستبدال بـ:

\1\2

فأنت تقول للوورد إنّه كلّما وجدت رقماً تتبعه مسافة تتبعها الباء أو الجيم أو الدال، أعد الرقم واحذف المسافة وأعد الحرف.

 

ملاحظة هامة: تتلخبط الأحرف كثيراً عند الخلط بين العربية والعلامات الأخرى.

 

[مصطفى شاهين 46]

في ‏١٨‏/‏٠١‏/‏٢٠١٩ at 10:28, برقش said:

فأنت تقول للوورد إنّه كلّما وجدت رقماً تتبعه مسافة تتبعها الباء أو الجيم أو الدال، أعد الرقم واحذف المسافة وأعد الحرف.

وأنا أقول لحضرتكم، سلمت يداك أخي الفاضل برقش، ما قصرت.

الله يبارك في عمرك، ويزيدك من فضله.

دمتم بعز