كيفية سرد جميع أسماء الملفات من مجلد وتحت المجلدات في ورقة عمل؟

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

• سرد جميع أسماء الملفات من مجلد إلى ورقة العمل باستخدام متصفح الويب
• سرد جميع أسماء الملفات من مجلد إلى ورقة العمل باستخدام صيغة
• سرد جميع أسماء الملفات من مجلد إلى ورقة العمل باستخدام كود VBA
• سرد جميع أسماء الملفات من مجلد وتحت المجلدات إلى ورقة العمل باستخدام Kutools

سرد جميع أسماء الملفات من مجلد إلى ورقة العمل باستخدام متصفح الويب

إذا كنت ترغب في سرد الملفات في مجلد باستخدام متصفح الويب، يجب أن تتأكد من أن لديك أحد متصفحات الويب (Firefox، Opera و Google Chrome) مثبتًا على جهاز الكمبيوتر الخاص بك. لنفترض أنك تحتاج إلى سرد ملفات المجلد التالي في ورقة العمل، انظر إلى لقطة الشاشة:

1. انتقل إلى نسخ مسار المجلد ("Folder Test") في Explorer. على سبيل المثال، مسار هذا المجلد هو: "C:\Users\AddinTestWin10\Desktop\Folder Test".

2. افتح أحد متصفحات الويب (FireFox، Opera و Google Chrome) والصق مسار المجلد في شريط العنوان واضغط على مفتاح Enter. انظر إلى لقطة الشاشة:

3. انقر فوق "Ctrl+A" لتحديد كل المحتويات في متصفح الويب واضغط على "Ctrl+C" لنسخها.

4. افتح Excel والصق مباشرة (باستخدام اختصارات "Ctrl+V" للصق) في ورقة العمل. انظر إلى لقطة الشاشة:

سرد جميع أسماء الملفات من مجلد إلى ورقة العمل باستخدام صيغة

في Excel، يمكنك أيضًا استخدام صيغة للحصول على قائمة بجميع أسماء الملفات أو أنواع معينة من أسماء الملفات من مجلد، يرجى القيام بالخطوات التالية:

1. انسخ والصق مسار الملف في خلية، ثم اكتب \* بعد مسار الملف كما هو موضح في لقطة الشاشة أدناه:

2. بعد ذلك، انقر فوق "الصيغة" > "مدير الأسماء"، انظر إلى لقطة الشاشة:

3. في مربع الحوار "مدير الأسماء"، انقر فوق زر "جديد"، انظر إلى لقطة الشاشة:

4. في مربع الحوار المنبثق "اسم جديد"، حدد اسمًا في مربع النص "الاسم"، ثم أدخل الصيغة أدناه في مربع النص "يشير إلى"، انظر إلى لقطة الشاشة:

ملاحظة: في هذه الصيغة، "Sheet1!$A$1" هي الخلية التي تحتوي على مسار الملف الذي أدخلته في الخطوة 1.

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

ملاحظة: في هذه الصيغة، "Filenames" هو اسم النطاق الذي أنشأته في الخطوة 4، و"A1" هي الخلية التي تحتوي على مسار الملف.

سرد جميع أسماء الملفات من مجلد إلى ورقة العمل باستخدام كود VBA

استخدم الكود VBA التالي لسرد الملفات في مجلد في ورقة عمل:

1. افتح ورقة عمل، وانقر لتحديد خلية حيث تريد وضع أسماء الملفات.

2. اضغط باستمرار على مفتاحي "ALT + F11" في Excel، وسيتم فتح نافذة "Microsoft Visual Basic for Applications".

3. انقر فوق "إدراج" > "وحدة"، والصق الكود التالي في نافذة "الوحدة".

كود VBA: سرد جميع أسماء الملفات من مجلد إلى ورقة عمل

Sub listfiles()
'Updateby Extendoffice
    Dim xFSO As Object
    Dim xFolder As Object
    Dim xFile As Object
    Dim xFiDialog As FileDialog
    Dim xPath As String
    Dim I As Integer
    Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
    If xFiDialog.Show = -1 Then
        xPath = xFiDialog.SelectedItems(1)
    End If
    Set xFiDialog = Nothing
    If xPath = "" Then Exit Sub
    Set xFSO = CreateObject("Scripting.FileSystemObject")
    Set xFolder = xFSO.GetFolder(xPath)
    For Each xFile In xFolder.Files
        I = I + 1
        ActiveSheet.Hyperlinks.Add Cells(I, 1), xFile.Path, , , xFile.Name
    Next
End Sub

4. ثم اضغط على مفتاح F5 لتشغيل الكود، ستظهر نافذة جديدة "تصفح". حدد المجلد الذي ترغب في سرد أسماء الملفات فيه.

5. ثم انقر فوق موافق، سيتم سرد الملفات في المجلد المحدد في ورقة العمل مع روابط تشعبية. انظر إلى لقطة الشاشة:

سرد جميع أسماء الملفات من مجلد وتحت المجلدات إلى ورقة العمل باستخدام Kutools

يمكن لخاصية "قائمة أسماء الملفات" في "Kutools لـ Excel" إنشاء قائمة بالملفات من دليل في ورقة عمل بسهولة.

1. افتح Excel، انقر فوق "Kutools Plus" > "استيراد / تصدير" > "قائمة أسماء الملفات…"، انظر إلى لقطة الشاشة:

2. في مربع الحوار "قائمة أسماء الملفات"، قم بالعمليات التالية:

(1) انقر زر لتحديد المجلد الذي يحتوي على الملفات التي تريد سردها؛

(2) تحقق من خيار "تضمين الملفات في المجلدات الفرعية" لسرد جميع أسماء الملفات في المجلدات الفرعية أو تحقق من خيار "تضمين الملفات والمجلدات المخفية" لسرد جميع أسماء الملفات المخفية وكذلك أسماء الملفات في المجلدات المخفية؛

(3) حدد نوع الملف الذي تريد سرده ضمن قسم "نوع الملفات"؛

(4) حدد وحدة حجم الملف التي تريد عرضها من قسم "وحدة حجم الملف" الذي تحتاجه.

(5) تحقق من خيار "إنشاء روابط تشعبية" حسب الحاجة.

3. انقر فوق موافق. سيقوم بإنشاء قائمة بالملفات في الدليل أو المجلد الفرعي في ورقة عمل جديدة. انظر إلى لقطة الشاشة:

مقالات ذات صلة أكثر: