انتقل إلى المحتوى الرئيسي

كيفية إلغاء تحديد الخلايا بسرعة من النطاقات المحددة في إكسيل؟

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

قم بإلغاء تحديد جزء من الخلايا أو نطاقات من التحديد باستخدام رمز VBA

قم بإلغاء تحديد جزء من الخلايا أو نطاقات من التحديد باستخدام Kutools for Excel

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


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

يعد VBA طريقة رائعة للتعامل مع بعض العمليات في Excel والتي ليست سهلة مع أوامر Excel. وكذلك الحال بالنسبة لإلغاء تحديد الخلايا أو النطاقات.

الخطوة1: حدد النطاق الذي ستعمل معه ؛

الخطوة2: انقر فوق خلية في التحديد الذي تريد إلغاء تحديده مع الضغط باستمرار على ملف CTRL الرئيسية.

الخطوة3: اضغط باستمرار على قديم + F11 في Excel ، ويفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

الخطوة4: انقر إدراج > وحدة، ولصق الماكرو التالي في نافذة الوحدة النمطية.

VBA لإلغاء تحديد الخلية النشطة من التحديد

Sub UnSelectCell()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range
Dim DeleteRng As Range
Dim OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set DeleteRng = Application.InputBox("Delete Range", xTitleId, Type:=8)
For Each rng In InputRng
    If Application.Intersect(rng, DeleteRng) Is Nothing Then
        If OutRng Is Nothing Then
            Set OutRng = rng
        Else
            Set OutRng = Application.Union(OutRng, rng)
        End If
    End If
Next
OutRng.Select
End Sub

الخطوة5: اضغط على F5 مفتاح لتشغيل هذا الماكرو. ثم ينبثق مربع حوار لتحديد نطاق عمل. انظر لقطات الشاشة:




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




الخطوة7: انقر OK، ويمكنك مشاهدة النتيجة:



السهم الأزرق الحق فقاعة قم بإلغاء تحديد جزء من الخلايا أو نطاقات من التحديد باستخدام Kutools for Excel

إذا كنت بحاجة إلى إلغاء تحديد العديد من الخلايا أو النطاقات من التحديد ، فإن VBA أعلاه ليست طريقة جيدة. لذلك نقدم الحيلة التالية ، حدد مساعد النطاق أدوات كوتولس ل إكسيل. يمكن أن يساعدك في إلغاء تحديد أي خلية أو نطاق من التحديد بسهولة وبسرعة.

كوتولس ل إكسيل يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. تجربة مجانية بدون قيود خلال 30 يومًا. احصل عليه الآن.

الخطوة1: انقر كوتولس > اختر اداة >> حدد مساعد النطاق ....

الخطوة2: في حدد مساعد النطاق مربع الحوار، والتحقق من قم بإلغاء تحديد الخلايا الخيار ، ثم انقر أو اسحب الماوس لإلغاء تحديد الخلايا أو النطاقات من التحديد. انظر لقطة الشاشة:

الخطوة3: وتم إلغاء تحديد الخلايا غير المرغوب فيها من التحديد. في النهاية ، أغلق ملف حدد مساعد النطاق صندوق المحادثة.

للحصول على معلومات أكثر تفصيلا حول حدد مساعد النطاق، يرجى زيارة حدد وصف ميزة مساعد النطاق.


مقالات ذات صلة:

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

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


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

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

 

 

 

 

 

Comments (4)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
thank you so much
Rated 5 out of 5
This comment was minimized by the moderator on the site
Why can't Excel just allow users to deselect cells by holding down Ctrl like Google Sheets does?? It's ridiculous
This comment was minimized by the moderator on the site
This code you posted above in VBA for deselecting active cell from selection crashes on me when I X out of the input dialog box and the deselected cells once again become selected cells. How do we fix the code so after you use the VBA code you can get out of it and not loose what you deselected?

Thanks
This comment was minimized by the moderator on the site
After I have deselected the range of cells I want to deselect I get an error when I try to close the pop-up input box for another range. how do I fix that in the code provided above? Thanks.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations