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

كيفية حساب الملفات في مجلد / دليل معين في 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. يتم الآن فتح المجلد الذي يحتوي على المصنف الحالي.

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



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

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


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

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

كوتولس ل إكسيل - يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. نسخة تجريبية مجانية كاملة الميزات 30اليوم ، لا حاجة لبطاقة ائتمان! تجربة مجانية الآن!

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

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

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

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

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

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

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

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

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

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


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


كوتولس ل إكسيل يتضمن أكثر من 300 أداة يدوية لبرنامج Excel ، يمكن تجربتها مجانًا دون قيود في غضون 30 يومًا. تنزيل وتجربة مجانية الآن!

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

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٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
فرز التعليقات حسب
التعليقات (0)
لا يوجد تقييم. كن أول من يقيم!
لا توجد تعليقات منشورة هنا حتى الآن
اترك تعليقاتك
النشر كضيف
×
قيم المنشور:
0   الشخصيات
المواقع المقترحة

تواصل معنا

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