كيف يمكن إدراج جميع أسماء الملفات من مجلدٍ ومجلداته الفرعية في ورقة عمل؟
إذا كنت بحاجة إلى إنشاء قائمة بأسماء الملفات من دليل معين في ورقة عمل Excel، فستتيح لك الطرق التالية تنفيذ ذلك بسرعةٍ وكفاءة. اختر الطريقة الأنسب لاحتياجاتك.
- إدراج جميع أسماء الملفات من مجلد في ورقة عمل باستخدام متصفح ويب
- إدراج جميع أسماء الملفات من مجلد في ورقة عمل باستخدام صيغة
- إدراج جميع أسماء الملفات من مجلد في ورقة عمل باستخدام كود VBA
- إدراج جميع أسماء الملفات من مجلد ومجلداته الفرعية في ورقة عمل باستخدام Kutools
إدراج جميع أسماء الملفات من مجلد في ورقة عمل باستخدام متصفح ويب
إذا كنت ترغب في إدراج ملفات من مجلد باستخدام متصفح الويب، فتأكد أولاً من تثبيت أحد المتصفحات التالية على جهازك: Firefox وOpera وGoogle Chrome. لنفترض أنك بحاجة إلى إدراج ملفات المجلد التالي في ورقة العمل—انظر لقطة الشاشة:
1. انتقل إلى نسخ مسار المجلد («Folder Test») في مستكشف الملفات. على سبيل المثال، يكون مسار هذا المجلد كما يلي:«C:\Users\AddinTestWin10\Desktop\Folder Test».
2. افتح أحد متصفحات الويب (مثل Firefox أو Opera أو Google Chrome)، والصق مسار الملف في شريط العنوان، ثم اضغط على مفتاح الإدخال Enter. انظر لقطة الشاشة:
3. انقر «Ctrl+A» لتحديد كل المحتويات في متصفح الويب، ثم اضغط «Ctrl+C» لنسخها.
4. افتح Excel والصق البيانات مباشرةً في ورقة العمل باستخدام اختصار «Ctrl+V». راجع لقطة الشاشة التالية:
- 1. باستخدام هذه الطريقة، يُمكنك عرض الملفات الموجودة في المجلد الرئيسي فقط، دون إدراج الملفات الموجودة في المجلدات الفرعية.
- 2. روابط أسماء الملفات غير متاحة.
إدراج جميع أسماء الملفات من مجلد في ورقة عمل باستخدام صيغة
في Excel، يمكنك أيضًا استخدام صيغة للحصول على قائمة بجميع أسماء الملفات أو تحديد النوع لأسماء الملفات من مجلد، يُرجى اتباع الخطوات التالية:
1. انقل مسار الملف أو انسخه إلى خلية، ثم أضف \* بعد مسار الملف كما هو موضح في لقطة الشاشة التالية:
2. بعد ذلك، انقر على «Formula» > «مدير الأسماء»، كما هو موضح في لقطة الشاشة التالية:
3. في مربع الحوار «مدير الأسماء»، انقر فوق زر «New». راجع لقطة الشاشة:
4. في مربع الحوار المنبثق «اسم جديد»، أدخل الاسم المطلوب في حقل «Name»، ثم اكتب الصيغة التالية في حقل «Refers to»، كما هو موضح في لقطة الشاشة:
ملاحظة: في هذه الصيغة، تمثّل «Sheet1!$A$1» خلية ورقة العمل التي تحتوي على مسار الملف الذي أدخلته في الخطوة 1.
5. بعد ذلك، انقر فوق «OK» ثم «Close» لإغلاق مربعات الحوار، وأدخل الصيغة التالية في خلية فارغة حيث تريد إدراج أسماء الملفات. اسحب مقبض التعبئة لأسفل حتى تظهر خلايا فارغة. الآن، تم إدراج جميع أسماء الملفات الموجودة في المجلد المحدد، كما هو موضح في لقطة الشاشة التالية:
ملاحظة: في هذه الصيغة، يُشير «Filenames» إلى اسم الخلية الذي أنشأته في الخطوة 4، بينما تحتوي الخلية "A1" على مسار الملف.
- 1. يجب حفظ هذا المصنف بتنسيق «مصنف Excel مُفعَّل بالماكرو» لضمان عمل الصيغ بشكل صحيح بعد إغلاق الملف وإعادة فتحه.
- 2. إذا كنت ترغب في إدراج جميع الملفات ذات الامتداد المحدد—مثل إدراج جميع أسماء ملفات docx—فما عليك سوى استخدام *docx* بدلاً من *. وبالمثل، بالنسبة لملفات xlsx، يُرجى استخدام *xlsx*.
إدراج جميع أسماء الملفات من مجلد في ورقة عمل باستخدام كود VBA
استخدم كود VBA التالي لإدراج الملفات من مجلد في ورقة عمل:
1. افتح ورقة العمل، وانقر لتحديد الخلية التي ترغب في إدخال أسماء الملفات بها.
2. اضغط مع الاستمرار على مفاتيح «ALT + F11» في Excel، وستفتح نافذة «Microsoft Visual Basic for Applications».
3. انقر فوق «Insert» > «Module»، ثم الصق الكود التالي في نافذة «Module».
كود 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 لتشغيل الكود، وستظهر نافذة جديدة باسم «Browse». حدد المجلد الذي ترغب في إدراج أسماء ملفاته.
5. بعد ذلك، انقر فوق «موافق»، وسيتم إدراج الملفات الموجودة في المجلد المحدد في ورقة العمل مع روابط تشعبية. انظر لقطة الشاشة:
إدراج جميع أسماء الملفات من مجلد ومجلداته الفرعية في ورقة عمل باستخدام Kutools
تتيح لك أداة «قائمة أسماء الملفات» في «Kutools لـ Excel» إنشاء قائمة بالملفات من دليل معيّن في ورقة عمل بسهولة تامة.
1. افتح Excel، ثم انقر فوق «KUTOOLS PLUS» > «استيراد/تصدير» > «قائمة أسماء الملفات…»، كما هو موضح في لقطة الشاشة:
2. في مربع الحوار «قائمة أسماء الملفات»، نفِّذ الخطوات التالية:
(1) انقر فوق
الزر لتحديد المجلد الذي يحتوي على الملفات التي تريد إدراجها في القائمة؛
(2) حدد خيار «تضمين الملفات في المجلدات الفرعية» لإدراج أسماء جميع الملفات الموجودة في المجلدات الفرعية، أو حدد خيار «تضمين الملفات والمجلدات المخفية» لإدراج أسماء جميع الملفات المخفية وأسماء الملفات الموجودة في المجلدات المخفية أيضًا؛
(3) حدد نوع الملف التي تريد إدراجها في القائمة ضمن قسم «نوع الملف»؛
(4) اختر وحدة حجم الملف التي ترغب في عرضها من قسم «وحدة حجم الملف» الذي تحتاجه.
(5) حدد خيار «إنشاء ارتباط تشعبي» وفقًا لاحتياجاتك.
3. انقر فوق «موافق»، وسيتم إنشاء قائمة بالملفات الموجودة في الدليل أو المجلد الفرعي ضمن ورقة عمل جديدة. راجع لقطة الشاشة:
Kutools لـ Excel- عزِّز Excel بقوة أكثر من 300 أداة أساسية، لتجعل عملك أسرع وأسهل، واستفد من ميزات الذكاء الاصطناعي لمعالجة البيانات بشكل أكثر ذكاءً وزيادة الإنتاجية.احصل عليه الآن
مقالات ذات صلة إضافية:
- إنشاء قائمة بجميع اسم ورقة العمل من مصنف
- افترض أن لديك مصنفًا يحتوي على أوراق عمل متعددة، وترغب الآن في إدراج جميع أسماء هذه الأوراق في المصنف الحالي. هل تعلم أنه يمكنك إنشاء قائمة بأسماء الأوراق بسرعة في Excel دون الحاجة إلى كتابتها يدويًّا واحدة تلو الأخرى؟ يقدم لك هذا البرنامج التعليمي خطوات سهلة لإدراج أسماء أوراق العمل في Excel بكفاءة وسلاسة.
- نسخ أو نقل الملفات من مجلد إلى آخر بناءً على قائمة
- إذا كانت لديك قائمة بأسماء الملفات في عمود ضمن ورقة عمل، وكانت هذه الملفات موجودة فعليًّا في مجلد على جهازك، وتحتاج الآن إلى نقلها أو نسخها من موقعها الأصلي إلى مجلد آخر—كما يظهر في لقطة الشاشة التالية—فكيف يمكنك تنفيذ هذه المهمة بأسرع وقت ممكن في Excel؟
- الحصول على قائمة بأسماء الأوراق في أوراق Google
- في هذا المقال، سأعرض بعض الطرق للحصول على اسم ورقة العمل الحالية أو قائمة بأسماء جميع الأوراق في أوراق Google.
- التنقل بين أوراق العمل باستخدام قائمة منسدلة
- افترض أن لديك مصنفًا يحتوي على أوراق عمل متعددة، وتحتاج الآن إلى إنشاء قائمة منسدلة أو مربع تحرير وسرد يعرض جميع أسماء الأوراق—بحيث يتم الانتقال فورًا إلى الورقة المحددة بمجرد اختيار اسمها من القائمة. في هذا المقال، سأوضح لك كيفية التنقل بسلاسة بين أوراق العمل باستخدام قائمة منسدلة في Excel.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل