كيفية استخراج امتداد الملف من ورقة العمل؟
إذا كان لديك عمود من أسماء الملفات يتضمن امتدادات الملفات ، والآن ، فأنت تريد فقط الحصول على امتدادات الملفات من الخلايا لبعض الأغراض. سيكون استخراجها واحدًا تلو الآخر يدويًا أمرًا مملًا للغاية ، اليوم ، سأقدم لك بعض الحيل السهلة لإكمالها.
استخراج امتداد الملف من ورقة العمل مع الصيغة
استخراج امتداد الملف من ورقة العمل باستخدام User Defined Function
استخراج امتداد الملف من ورقة العمل مع الصيغة
لاستخراج امتدادات الملفات من الخلايا ، يمكنك الاستفادة من الصيغة التالية.
1. أدخل هذه الصيغة:
= REPLACE (RIGHT (A2,5،1)، 2,5، SEARCH ("."، RIGHT (AXNUMX،XNUMX))، "") في خلية فارغة بجانب بياناتك. انظر لقطة الشاشة:
2. ثم اسحب مقبض التعبئة إلى النطاق الذي تريد أن يحتوي على هذه الصيغة ، وتم استخراج جميع امتدادات الملفات من الخلايا ، انظر لقطة الشاشة:
استخراج امتداد الملف من ورقة العمل باستخدام User Defined Function
هناك طريقة أخرى يمكن أن تساعدك أيضًا على إنهاء هذه المهمة ، لإنشاء وظيفة محددة بواسطة المستخدم.
1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: استخراج امتدادات الملفات من ورقة العمل
Function FileExt(FileName As String) As String
'Update 20141111
On Error Resume Next
If InStrRev(FileName, ".") > 0 Then FileExt = Right(FileName, Len(FileName) - InStrRev(FileName, "."))
If Err <> 0 Then MsgBox Err.Description, vbCritical, "Kutools for Excel"
End Function
3. ثم احفظ هذا الرمز وأغلقه ، ثم عد إلى ورقة العمل ، وأدخل هذه الصيغة = FileExt (A2) في خلية فارغة بجوار بياناتك ، انظر لقطة الشاشة:
4. ثم اسحب مقبض التعبئة إلى النطاق الذي تريد أن يحتوي على هذه الصيغة ، وتم استخراج جميع امتدادات الملفات من العمود A ، انظر لقطة الشاشة:
معلومه- سرية: في الصيغ أعلاه ، تشير A2 إلى الخلية التي تريد استخراج الامتداد منها.
مقالات ذات صلة:
كيفية إرجاع اسم الملف بدون امتداد للخلية؟
كيفية استخراج اسم الملف بسرعة من المسار الكامل في إكسيل؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!