كيف تُزيل الحدود من مربع نص في Excel؟
بشكل افتراضي، يُحاط مربع النص في Excel بحدود سوداء. سواء أردت إزالة الحدود من مربع نص واحد، أو من جميع مربعات النص في ورقة العمل، أو حتى إنشاء مربع نص خالٍ من الحدود من البداية — سيأخذك هذا الدليل خطوة بخطوة عبر كل طريقة بكل سهولة.
إزالة الحدود من مربع نص في Excel
إزالة الحدود من جميع مربع النص في ورقة العمل الحالية في Excel
إنشاء مربع نص بدون حدود في Excel
إزالة الحدود من مربع نص في Excel
يمكنك بسهولة إزالة الحدود من مربع نص في Excel باستخدام خاصية «بدون مخطط تفصيلي» (No Outline). اتبع الخطوات التالية:
1. حدد مربع النص الذي ترغب في إزالة حدوده.
2. انقر فوقتنسيق > مخطط الشكل التفصيلي > بدون مخطط تفصيلي. راجع لقطة الشاشة:

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

إزالة الحدود من جميع مربع النص في ورقة العمل الحالية في Excel
يمكنك استخدام كود VBA أدناه لإزالة الحدود من جميع مربعات النص في ورقة العمل الحالية في Excel. يُرجى اتباع الخطوات التالية:
1. في ورقة العمل التي تحتوي على عدة مربعات نصية تريد إزالة حدودها، اضغط على مفاتيحAlt+F11 لفتح نافذةمايكروسوفت فيجوال بيسك للتطبيقات.
2. في نافذةمايكروسوفت فيجوال بيسك للتطبيقات، انقر فوقإدراج > وحدة نمطية (Module). ثم انسخ كود VBA أدناه إلى نافذة الكود.
كود VBA: إزالة الحدود من جميع مربع النص في ورقة العمل الحالية
Sub DelectTextBoxLine()
'Update by Extendoffice 2018/5/15
Dim xOle As Shape
On Error GoTo LableNext
For Each xOle In ActiveSheet.Shapes
If xOle.Name Like "TextBox*" Then
xOle.Line.Visible = msoFalse
End If
LableNext:
Next
End Sub 3. اضغط على مفتاحF5 لتشغيل الكود. بعد ذلك، تُزال الحدود من جميع مربعات النص في ورقة العمل الحالية فورًا.
إنشاء مربع نص بدون حدود في Excel
بديلًا لذلك، يمكنك إنشاء مربع نص بدون حدود من البداية لتجنب الحاجة إلى إزالة الحدود لاحقًا. يُرجى اتباع الخطوات التالية:
1. في ورقة العمل التي تريد إدراج مربع نص بدون حدود فيها، اضغط على مفاتيحAlt+F11 لفتح نافذةمايكروسوفت فيجوال بيسك للتطبيقات.
2. فيمايكروسوفت فيجوال بيسك للتطبيقات، انقر فوقإدراج > وحدة نمطية (Module). ثم انسخ كود VBA أدناه إلى نافذة الكود.
كود VBA: إنشاء مربع نص بدون حدود في Excel
Sub AddTextbox_NoLine()
'Update by Extendoffice 2018/5/15
ActiveSheet.Shapes.AddTextbox( _
msoTextOrientationHorizontal, 90, 90, 180, 180).Line.Visible = msoFalse
End Sub 3. اضغط على مفتاحF5 لتشغيل الكود.
يتم إدراج مربع نص بدون حدود فورًا في ورقة العمل الحالية.
مقالات ذات صلة:
- كيف يمكن العد إذا كانت الخلية تحتوي على نصٍ معين أو جزءٍ منه في Excel؟
- كيف تتحقّق مما إذا كانت قيمة خلية ما تقع بين قيمتين في Excel؟
- كيف تستخدم دالة SUMIF عندما تكون الخلية المجاورة مساوية لقيمة معينة، فارغة، أو تحتوي على نص في Excel؟
- كيف يمكنني إرجاع قيمة في خلية أخرى إذا احتوت خلية ما على نص معين في Excel؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل