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

كيفية حساب الملفات في مجلد / دليل معين في Excel؟

إذا كنت بحاجة إلى الحصول على عدد الملفات في مجلد معين في Excel ، فما الطريقة التي ستفكر فيها؟ ماذا عن حساب عدد نوع معين من الملفات في مجلد؟ وماذا لو عد الملفات في مجلد معين ومجلداته الفرعية في Excel؟ ستساعدك الحيل التالية في حلها بسهولة.


عد نوعًا محددًا من الملفات في مجلد معين باستخدام VBA

يمكن أن يساعدك VBA التالي في حساب نوع معين من الملفات في مجلد معين بسهولة ، مثل حساب جميع ملفات .xlsx في مجلد. الرجاء القيام بما يلي:

1. اضغط على قديم + F11 في نفس الوقت لفتح نافذة Microsoft Visual Basic for Applications.

2. انقر إدراج > وحدة، ثم قم بلصق رمز فبا أدناه في نافذة الوحدة النمطية الافتتاحية.

فبا: عد ملفًا معينًا في مجلد معين

Sub CountFiles()
Dim xFolder As String
Dim xPath As String
Dim xCount As Long
Dim xFiDialog As FileDialog
Dim xFile As String
Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
If xFiDialog.Show = -1 Then
xFolder = xFiDialog.SelectedItems(1)
End If
If xFolder = "" Then Exit Sub
xPath = xFolder & "\*.xlsx"
xFile = Dir(xPath)
Do While xFile <> ""
xCount = xCount + 1
xFile = Dir()
Loop
MsgBox xCount & " files found"
End Sub

ملاحظات: رمز VBA أعلاه سوف يحسب . XLSX الملفات في مجلد معين. لحساب أنواع أخرى من الملفات ، يرجى معرفة ذلك xPath = xFolder & "\ *. xlsx"، وتغيير . XLSX إلى امتداد الملف الآخر بناءً على احتياجاتك.

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

4. في مربع حوار الفتح تصفح ، حدد المجلد المعين الذي ستحسب فيه نوع الملفات المحدد ، وانقر فوق OK .


5. سيظهر الآن مربع حوار يوضح لك عدد أنواع الملفات المحددة الموجودة في مجلد معين. فقط أغلق مربع الحوار.

اجمع بسهولة أوراق عمل / مصنفات / ملفات CSV في ورقة عمل / مصنف واحد

قد يكون من الشاق دمج عشرات الأوراق من مصنفات مختلفة في ورقة واحدة. ولكن مع Kutools for Excel's الجمع بين (أوراق العمل والمصنفات) يمكنك إنجاز ذلك بعدة نقرات فقط!


إعلان دمج أوراق الكتب 1

عد كل الملفات في المجلد الذي يحتوي على المصنف الحالي

إذا فتحت مجلدًا ، فستحصل عادةً على عدد جميع الملفات في أسفل هذا المجلد. ستقدم هذه الطريقة Kutools for Excel فتح المجلد المتضمن الأداة المساعدة لفتح المجلد الذي يحتوي على المصنف الحالي ، ومن ثم الحصول على عدد الملفات في هذا المجلد.

كوتولس ل إكسيل - مزود بأكثر من 300 أداة أساسية لبرنامج Excel. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! التحميل الان!

1. انقر كوتولس بلس > مصنف > فتح المجلد المتضمن. انظر لقطة الشاشة:

عدد الملفات في المجلد 02

2. يتم الآن فتح المجلد الذي يحتوي على المصنف الحالي.

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



ملاحظات: ال فتح المجلد المتضمن ستكون الأداة المساعدة غير صالحة إذا لم تقم بحفظ المصنف الحالي من قبل.

كوتولس ل إكسيل - شحن برنامج Excel بأكثر من 300 أداة أساسية. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! احصل عليه الآن


عد جميع الملفات في مجلد معين (بما في ذلك المجلدات الفرعية) باستخدام Kutools for Excel

في بعض الأحيان ، قد ترغب في حساب عدة أنواع من الملفات في مجلد ومجلداته الفرعية. في الواقع يوفر Kutools for Excel آخر قائمة اسم الملف فائدة لحلها بكل سهولة.

كوتولس ل إكسيل - مزود بأكثر من 300 أداة أساسية لبرنامج Excel. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! التحميل الان!

1. انقر كوتولس بلس > استيراد / تصدير > قائمة اسم الملف لفتح مربع الحوار قائمة اسم الملف.

عدد الملفات في المجلد 01

2. في مربع الحوار فتح قائمة اسم الملف ، يرجى القيام بما يلي:

(1) انقر فوق تصفح زر لتحديد مجلد معين حيث ستعد أنواعًا معينة من الملفات.

(2) حدد أنواع الملفات التي ستحسبها بناءً على احتياجاتك.

على سبيل المثال ، تحتاج إلى حساب جميع أنواع المصنفات ، مثل . XLSX الملفات، و xlsm الملفات، و . إكسلس الملفات ، وما إلى ذلك ، يرجى التحقق من مشترك الخيار، وحدد كافة ملفات Excel من القائمة المنسدلة أدناه.

ملحوظة: إذا كنت بحاجة إلى حساب جميع / أنواع الملفات المحددة في مجلد معين ومجلداته الفرعية ، فيرجى التحقق من تضمين الملفات في الدلائل الفرعية الخيار.

3. انقر فوق Ok زر في مربع الحوار قائمة اسم الملف.

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

كوتولس ل إكسيل - شحن برنامج Excel بأكثر من 300 أداة أساسية. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! احصل عليه الآن


عرض توضيحي: عد جميع الملفات في مجلد معين (بما في ذلك المجلدات الفرعية)


كوتولس ل إكسيل: أكثر من 300 أداة مفيدة في متناول يدك! ابدأ تجربتك المجانية لمدة 30 يومًا دون أي قيود على الميزات اليوم. تحميل الآن!

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

🤖 مساعد 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 (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations