Note: The other languages of the website are Google-translated. Back to English

 كيفية تطبيق زر لمسح خلايا معينة في Excel؟

عادة ، يمكنك الاحتفاظ بامتداد CTRL مفتاح لتحديد عدة خلايا محددة ، ثم امسح محتويات الخلية حسب حاجتك. إذا كنت بحاجة دائمًا إلى مسح هذه الخلايا المحددة من وقت لآخر ، فيمكنك إنشاء زر واضح لمسحها بنقرة واحدة فقط. في هذه المقالة ، سأتحدث عن كيفية إنشاء زر مسح الكل لمسح بعض محتويات الخلية المحددة.

قم بتطبيق زر لمسح محتويات خلية محددة برمز VBA


السهم الأزرق الحق فقاعة قم بتطبيق زر لمسح محتويات خلية محددة برمز VBA

أولاً ، يجب عليك إنشاء زر شكل ، ثم تطبيق رمز ، أخيرًا ، ربط الرمز بزر الشكل. الرجاء القيام بما يلي:

1. انقر إدراج > الأشكال > المستطيلات لتحديد شكل المستطيل ، ثم اسحب الماوس لرسم زر مستطيل في أي مكان من الورقة حسب حاجتك ، انظر لقطة الشاشة:

زر doc مسح الخلايا 1

2. ثم أدخل النص وقم بتنسيق زر الشكل كما تريد ، انظر الصورة:

زر doc مسح الخلايا 2

3. وبعد ذلك يجب عليك إدخال رمز VBA ، يرجى الضغط باستمرار على ملف ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة او شباك. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.

كود فبا: مسح محتويات الخلية من خلايا معينة:

Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub

ملاحظة: في الكود أعلاه: A2، A5 تشير إلى أنه سيؤدي إلى مسح الخلايا في النطاق A2: A5، وليس فقط الخليتين على حدة ، يمكنك إضافة نطاقات متعددة ، مثل النطاق ("B8"، "B12"). مسح البرنامج النصي داخل الكود المراد مسحه.

4. ثم احفظ وأغلق نافذة الكود ، ثم اربط الكود بزر الشكل ، وانقر بزر الماوس الأيمن على الزر ، وحدد تعيين ماكرو، في تعيين ماكرو في مربع الحوار ، اختر ملف كليرسيلس الاسم الرمزي من اسم الماكرو مربع القائمة ، وانقر OK زر للخروج من هذا الحوار. انظر لقطة الشاشة:

زر doc مسح الخلايا 3

5. والآن ، عند النقر فوق الزر مسح الكل الزر ، يتم مسح الخلايا المحددة التي حددتها مرة واحدة ، انظر لقطة الشاشة:

زر doc مسح الخلايا 4


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

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (65)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أعط صيغًا للحفظ والوضوح
تم تصغير هذا التعليق بواسطة المشرف على الموقع
يؤدي هذا أيضًا إلى مسح أي تنسيق للخلية. كيف أفعل ذلك إذا أردت الاحتفاظ بالصيغ والتنسيق مثل التظليل أو الحدود
تم تصغير هذا التعليق بواسطة المشرف على الموقع
قم بتغيير الأمر من "مسح" إلى "مسح المحتويات" لمجرد محو مدخلات النص
تم تصغير هذا التعليق بواسطة المشرف على الموقع
ماذا عن اللون
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا على هذه المعلومات!!

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

عندما يتم تجميعها ، لا يزال بإمكانك تغيير النص والتنسيقات الأخرى.

لفك التجميع ، ما عليك سوى النقر بزر الماوس الأيمن فوق الزر الجديد وتحديد GROUP> UNGROUP.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أو يتيح لك النقر بزر الماوس الأيمن ببساطة على الشكل تغيير التنسيق والنص.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
تشك لهذا الرمز. كيفية مسح محتويات الخلية أو تعبئتها بشكل مثالي بقيمة 0 في ورقة محمية مع عدد قليل من الخلايا القابلة للتحرير؟ شكرا للمساعدة على بعد التمديد.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
بدلاً من الأمر الواضح ، سيبدو سطر المثال أعلاه كما يلي:
النطاق ("A2: A5") = 0
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هل يمكنك عمل هذا على عدة أوراق؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
هذا هو تطهير الحدود أيضًا ، فماذا أفعل؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
تغيير واضح لمسح المحتويات ثم سيبقى التنسيق كما هو بعد المسح. ستزول النص فقط وليس الحدود والتلوين وما إلى ذلك
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أهلاً. ما هي أفضل طريقة لإنشاء أزرار منفصلة لمسح محتويات كل صف على حدة؟ على سبيل المثال ، ملتقط البيانات سعيد بمدخلات كل صف آخر ، ولكنه يحتاج بعد ذلك إلى مسح الصفوف 3 والصف 6 والصف 7. ما هي الطريقة الأكثر فعالية لإنشاء الأزرار لمسحها بهذه الطريقة ، أي الصف فقط؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا ، ضع زرًا أعلى الصف 3,6,7،XNUMX،XNUMX. قم بتعيين نفس علامة ماركو المذكورة أعلاه على كل زر لمسح هذا الصف المحدد فقط.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لدي كتاب عمل به 11 علامة تبويب ، بالإضافة إلى علامة تبويب واحدة في البداية عليها علامة "ابدأ من هنا". أرغب في إنشاء زر واحد في علامة التبويب هذه لمسح ما يصل إلى 9 خلايا فردية من محتوياته ، أو إدخال "0" فيه داخل كل علامة من علامات التبويب هذه. لا توجد بالضرورة الخلايا التي أريد مسحها في نفس المكان في كل صفحة. هل هذا ممكن وكيف يتم؟ أفترض أنه يمكن القيام بذلك في VisualBasic ، ولكن هل سيكون من الأسهل على المبتدئ إنشاؤه باستخدام وحدات الماكرو؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لدي نفس السؤال
تم تصغير هذا التعليق بواسطة المشرف على الموقع
استخدم هذا كقالب برنامج نصي:
مسح الخلايا الفرعية ()
'تحديث بواسطة Extendoffice 20161008
Range ("b11: d22") يشير هذا السطر ClearContents إلى الصفحة التي تحتوي على زر الماكرو.
Range ("إدخال نقاط التقييم"! D2: AA2 ") يشير هذا السطر إلى علامة تبويب ونطاق مختلفين.
نهاية الفرعية


تم تصغير هذا التعليق بواسطة المشرف على الموقع
ببساطة فعلت الشيء نفسه في ورقة العمل لقد نجحت عندما أحمي الورقة التي تظهر الخطأ 1004 ، أي اقتراح في هذه الحالة؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا راديشيام ،
لتشغيل الرمز أعلاه في ورقة عمل الحماية ، يرجى تطبيق الكود أدناه: (ملاحظة: قم بتغيير النص "كلمة المرور" إلى كلمة المرور التي تحمي الورقة الخاصة بك)
Clearcells الفرعية
خافت xWS كورقة عمل
خافت xPsw كسلسلة
قم بتعيين xWS = ActiveSheet
xPsw = "كلمة المرور"
على خطأ استئناف التالي
xWS.Unprotect Password: = xPsw
النطاق ("A2"، "A5"). مسح
النطاق ("C10"، "D18"). مسح
النطاق ("B8"، "B12"). مسح
xWS.Protect Password: = xPsw
نهاية الفرعية

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

ما الرمز الذي أستخدمه إذا كنت بحاجة فقط إلى مسح خلية واحدة بدلاً من نطاق من الخلايا؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا جينيفر ،
لمسح خلية واحدة فقط ، تحتاج فقط إلى تغيير رمز VBA على النحو التالي: (ملاحظة: قم بتغيير الخلية A2 إلى الخلية التي تريد مسحها)

مسح الخلايا الفرعية ()
المدى ("A2"). مسح
نهاية الفرعية

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


على سبيل المثال.

النطاق ("A2"، "A5") = مسح
تم تصغير هذا التعليق بواسطة المشرف على الموقع
إنه لا يعمل على الخلايا المدمجة. :(
تم تصغير هذا التعليق بواسطة المشرف على الموقع
استبدل. امسح بـ = ""
تم تصغير هذا التعليق بواسطة المشرف على الموقع
بالنسبة للخلايا المدمجة ، هل تعني أن التنسيق على سبيل المثال يكون النطاق ("A25" ، "B25" ، "C25") = ""؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
جرب هذا،

على سبيل المثال: الخلايا المدمجة عبارة عن عمودين "أ" و "ب". تريد مسح الصفوف من 2 إلى 5. ستبدو كما يلي.

مسح الخلايا الفرعية ()
النطاق ("A2: B2"، "A5: B5"). محتويات واضحة
نهاية الفرعية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
كيف تفعل على أوراق جوجل من فضلك؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
إنه سيلر كل شيء بما في ذلك خطوط الحدود وتنسيق الخلايا ، أريد مسح البيانات فقط.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبا كرم
لمسح البيانات والاحتفاظ بتنسيق الخلية فقط ، يرجى تطبيق الكود أدناه:

مسح الخلايا الفرعية ()
المدى ("A2"، "A5"). ClearContents
المدى ("C10"، "D18"). ClearContents
المدى ("B8"، "B12"). ClearContents
نهاية الفرعية

من فضلك حاول ، آمل أن يساعدك!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا لك سكاييانغ
الآن تعمل بشكل صحيح
تم تصغير هذا التعليق بواسطة المشرف على الموقع
يشكركم
تم تصغير هذا التعليق بواسطة المشرف على الموقع
يبدو أن هذا التنسيق لا يعمل بالنسبة لي ، يستمر في إعطائي "خطأ تجميع: متوقع: نهاية العبارة"
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا سكاييانغ. كان هذا بالضبط ما كنت أبحث عنه ، لحذف المحتوى وليس التنسيق. شكرًا لك مرة أخرى.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا على هذا. هل هناك طريقة لوضع أكثر من زر واضح في ورقة عمل واحدة؟ شكرًا!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
انها لا تعمل
تم تصغير هذا التعليق بواسطة المشرف على الموقع
عندما أضغط على زر الأمر حذف ، فإنه يحذف أيضًا الخلايا المستمرة ولدي بالفعل صيغة فيها ولا أريد حذفها
تم تصغير هذا التعليق بواسطة المشرف على الموقع
يرجى إعطاء marco للتوضيح إذا كان محتوى الخلية أقل من 4 أرقام رقمية. شكرًا
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أهلاً! يعمل بشكل رائع بالنسبة لي مع هذا الرمز كما ذكرت:

مسح الخلايا الفرعية ()
المدى ("A2"، "A5"). ClearContents
المدى ("C10"، "D18"). ClearContents
المدى ("B8"، "B12"). ClearContents
نهاية الفرعية

ومع ذلك ، أريد الاحتفاظ بالرقم "0" أو القسيمة "0" لخلايا معينة. أيضًا ، احتفظ باللون المحدد السابق. والرنين لهذا هو أنني أستخدم هذه الخلايا كخلايا إدخال وأريد استخدام الأرداف لمسح خلايا إدخال معينة.


ويرجع الفضل في ذلك مسبقا!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أحاول مسح خلايا معينة عبر عدة علامات تبويب. كيف يمكنني تحقيق ذلك؟ لقد أنشأت قائمة مرجعية تتكون من حوالي 100 سؤال في عدة علامات تبويب ، ومن الصعب العودة وحذف التعليقات من كل خلية.
لا توجد تعليقات منشورة هنا حتى الآن
عرض المزيد
اترك تعليقاتك
النشر كضيف
×
قيم المنشور:
0   الشخصيات
المواقع المقترحة

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL