انتقل إلى المحتوى الرئيسي
مستخدم ChatGPT العادي؟ حاول دمج ChatGPTs مع ExtendOffice.

كيفية إزالة جميع الخطوط الأفقية من مستند Word؟

المؤلف: أماندا لي آخر تعديل: 2020-11-27

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

doc إزالة الخطوط الأفقية 1

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

قم بإزالة جميع الخطوط الأفقية يدويًا واحدًا تلو الآخر

قم بإزالة جميع الخطوط الأفقية برمز VBA

قم بإزالة جميع الخطوط الأفقية باستخدام Kutools for Word


قم بإزالة جميع الخطوط الأفقية يدويًا واحدًا تلو الآخر

إذا كنت تريد فقط إزالة بعض الخطوط الأفقية ، فيمكنك إزالتها يدويًا على النحو التالي:

1. ضع المؤشر فوق الخط ؛

2. اضغط على حدود الصفحة العنصر في خلفية الصفحة مجموعة من تصميم التبويب؛

doc إزالة الخطوط الأفقية 2

3. انقر الحدود ، انقر فوق بدون اضاءة، اضغط هنا OK. وسيتم حذف الخط الأفقي المحدد مرة واحدة.

doc إزالة الخطوط الأفقية 3


قم بإزالة جميع الخطوط الأفقية برمز VBA

إذا كنت ترغب في إزالة جميع الخطوط الأفقية في المستند ، فمن الشاق إزالتها يدويًا. يمكن لـ VBA تسهيل الأمر ، قم بما يلي:

1. صحافة ألت + فسنومك لفتح نافذة VBA في Word ؛

2. انقر وحدة تبدأ من إدراج ، وأدخل الرمز في ملف وحدة نافذة او شباك؛

رمز فبا: قم بإزالة كافة الأسطر الأفقية في مستند Word:

Sub removehline()
Dim ils As Paragraph
For Each ils In ActiveDocument.Paragraphs
ils.Borders(wdBorderBottom).LineStyle =wdLineStyleNone
Next ils
End Sub

3. انقر يجري زر أو اضغط F5 لتطبيق VBA مباشرة. وتم حذف جميع الأسطر الأفقية من المستند.


قم بإزالة جميع الخطوط الأفقية باستخدام Kutools for Word

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

كوتولس للكلمة : مع أكثر من 100 وظيفة إضافية مفيدة في Word ، يمكنك تجربتها مجانًا دون قيود في أيام 60. 

1. انقر كوتولس > حذفخط أفقي، انظر لقطة الشاشة: 

2. وبعد ذلك ستتم إزالة جميع الخطوط الأفقية من المستند بأكمله مرة واحدة ، انظر لقطة الشاشة:

doc إزالة الخطوط الأفقية 5

ملاحظات: إذا كنت تريد حذف جزء من الخطوط الأفقية ، فيرجى تحديد بيانات النطاق ، ثم تطبيق هذه الميزة.

انقر لتنزيل Kutools for Word والتجربة المجانية الآن!


عرض توضيحي: قم بإزالة كافة الخطوط الأفقية في Word

كوتولس للكلمة: مع أكثر من 100 وظيفة إضافية مفيدة في Word ، يمكنك تجربتها مجانًا دون قيود في أيام 60. تنزيل وتجربة مجانية الآن!


أفضل أدوات إنتاجية المكتب

كوتولس للكلمة - ارفع تجربة كلمتك مع أكثر 100 ميزات رائعة!

🤖 مساعد كوتولس AI: تحويل كتابتك باستخدام الذكاء الاصطناعي - توليد المحتوى  /  إعادة كتابة النص  /  تلخيص المستندات  /  الاستفسار عن المعلومات على أساس الوثيقة، كل ذلك داخل Word

📘 إتقان الوثيقة: تقسيم الصفحات  /  دمج المستندات  /  تصدير التحديد بتنسيقات مختلفة (PDF/TXT/DOC/HTML...)  /  دفعة تحويل إلى PDF  /  تصدير الصفحات كصور  /  طباعة ملفات متعددة في وقت واحد

تحرير المحتويات: بحث واستبدال دفعة عبر ملفات متعددة  /  تغيير حجم كافة الصور  /  تبديل صفوف وأعمدة الجدول  /  تحويل الجدول إلى نص

🧹 تنظيف سهل: اكتساح بعيدا مساحات اضافية  /  فواصل القسم  /  كل الرؤوس  /  مربعات النص  /  الارتباطات التشعبية  / لمزيد من أدوات الإزالة، توجه إلى إزالة المجموعة

إدراجات إبداعية: إدراج الف فاصل  /  مربعات الاختيار  /  أزرار الراديو  /  رمز الاستجابة السريعة  /  الباركود  /  جدول الخط القطري  /  شرح المعادلة  /  صورة توضيحية  /  الجدول التوضيحي  /  صور متعددة  / اكتشف المزيد في إدراج مجموعة

🔍 التحديدات الدقيقة: يحدد بدقة صفحات محددة  /  طاولات الطعام  /  الأشكال  /  فقرات العناوين  / تحسين التنقل باستخدام الأكثر من ذلك حدد الميزات

تحسينات النجوم: انتقل إلى أي مكان  /  الإدراج التلقائي للنص المتكرر  /  التبديل بين مستند Windows  /  11 أدوات التحويل

؟؟؟؟ هل تريد تجربة هذه الميزات؟ يقدم Kutools for Word أ الإصدار التجريبي المجاني من 60 يومًا، بلا حدود! 🚀
 
Comments (13)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The VBA code returns the error 'compile error: must be first statement on line' for the first line. Any thoughts?
This comment was minimized by the moderator on the site
The VBA code returns the error - compile error: must be first statement on line for the first line.
This comment was minimized by the moderator on the site
The VBA code method worked. Thanks so much!
This comment was minimized by the moderator on the site
Thank you, thank you, thank you! I have a multi-gigabyte library of DOCX files that use horizontal lines (=== and ---) as internal section dividers. Thanks to your tip (perhaps the only instance on the web?) I will be able to programmatically split these documents into sub-files. Thanks again
This comment was minimized by the moderator on the site
I love you! OMG. The VBA thing worked!!!! That dump line was driving me crazy.
This comment was minimized by the moderator on the site
140 Ogrady St. Fall River, MA 02720-4911 USA How 3 lines made one line???
This comment was minimized by the moderator on the site
None of this page border stuff worked at all. I searched the document. The horizontal line was at the end, and 10 pages earlier was the culprit, a roman paragraph number lurking in a sentence for no reason at all. When I deleted it it removed the line 10 pages away. I will cut and pate the bugger here. In fact, you can have a set of them from 1 to 6. The then put a line at the bottom of every page. Go figure. MS Word 2007 is the platform. They are there, but do not display. They are just above this line, and will highlight if you mouse over.
This comment was minimized by the moderator on the site
The manual methods did not work, but the VBA code did. Very nice!
This comment was minimized by the moderator on the site
This is amazing!!! BIG THANK YOU for putting the VBA code. Searched in google but yours was the only thing that came up.
This comment was minimized by the moderator on the site
OMG! Thank you. I ran a macro as instructed and managed to remove the line. You were the onlly site among 3 to propose this solution.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations