كيفية إنشاء قائمة من النطاق في إكسيل؟
قد تحتاج إلى إنشاء قائمة من خلال مجموعة من البيانات بشكل متكرر ، على سبيل المثال ، مجموعة من البيانات على 24 مصطلحًا للطاقة الشمسية كما هو موضح أدناه. بالطبع ، يمكنك نسخها ولصقها في قائمة يدويًا ، ولكن يبدو الأمر مملاً إلى حد ما إذا كان هناك العديد من الأعمدة في النطاق. في الواقع ، هناك حيلان لإنشاء قائمة من نطاق محدد في Microsoft Excel بسهولة.
قم بإنشاء قائمة من النطاق باستخدام VBA
قم بإنشاء قائمة من النطاق باستخدام Kutools for Excel
- إعادة استخدام أي شيء: أضف الصيغ والمخططات الأكثر استخدامًا أو تعقيدًا وأي شيء آخر إلى مفضلاتك ، وأعد استخدامها بسرعة في المستقبل.
- أكثر من 20 ميزة نصية: استخراج رقم من سلسلة نصية ؛ استخراج أو إزالة جزء من النصوص ؛ تحويل الأرقام والعملات إلى الكلمات الإنجليزية.
- أدوات الدمج: مصنفات وأوراق متعددة في واحد ؛ دمج خلايا / صفوف / أعمدة متعددة دون فقد البيانات ؛ دمج الصفوف المكررة والمجموع.
- أدوات الانقسام: تقسيم البيانات إلى أوراق متعددة بناءً على القيمة ؛ مصنف واحد لملفات Excel أو PDF أو CSV متعددة ؛ عمود واحد إلى أعمدة متعددة.
- لصق التخطي صفوف مخفية / مصفاة العد والمجموع حسب لون الخلفية؛ إرسال رسائل بريد إلكتروني مخصصة إلى مستلمين متعددين بشكل مجمع.
- مرشح سوبر: إنشاء مخططات تصفية متقدمة وتطبيقها على أي أوراق ؛ تصنيف حسب: حسب الأسبوع واليوم والتكرار والمزيد ؛ تصفية بواسطة bold، formulas، comment ...
- أكثر من 300 ميزة قوية ؛ يعمل مع Office 2007-2021 و 365 ؛ يدعم جميع اللغات ؛ سهولة النشر في مؤسستك أو مؤسستك.
قم بإنشاء قائمة من النطاق باستخدام VBA
في Excel ، يمكنك أيضًا استخدام تعليمات VBA البرمجية لاستيراد قائمة أو نطاق سريعًا.
1. معلق ALT زر واضغط F11 على لوحة المفاتيح لفتح ملف Microsoft Visual Basic للتطبيق نافذة.
2. انقر إدراج > وحدة، وانسخ VBA في الوحدة النمطية.
فبا: إنشاء قائمة من النطاق
Sub UniqueList()
'Updateby20140304
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range:", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("OutPut to (single cell):", xTitleId, Type:=8)
For i = 1 To InputRng.Rows.Count
For j = 1 To InputRng.Columns.Count
OutRng.Value = InputRng.Cells(i, j).Value
Set OutRng = OutRng.Offset(1, 0)
Next
Next
End Sub
3. انقر يجري زر أو اضغط F5 لتشغيل VBA. مربع حوار معروض على الشاشة ، وحدد نطاق البيانات التي ستنشئ قائمة بها. انظر لقطة الشاشة:
5. انقر OK، حدد خلية لإخراج القائمة من مربع الحوار المنبثق ، ثم انقر فوق OK. انظر لقطة الشاشة:
ثم تم إنشاء نطاق البيانات كقائمة في الخلية المحددة.
قم بإنشاء قائمة من النطاق باستخدام Kutools for Excel
الأداة اليدوية - كوتولس ل إكسيل's نطاق التحويل يمكن للوظيفة أيضًا إنشاء قائمة من بيانات النطاق بسرعة وسهولة.
كوتولس ل إكسيل يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. تجربة مجانية بدون قيود خلال 30 يومًا. احصل عليه الآن
1. حدد نطاق البيانات الذي تريد إنشائه كقائمة ، ثم انقر فوق كوتولس > محول المدى > نطاق التحويل. انظر لقطة الشاشة:
2. في النافذة المنبثقة نطاق التحويل الحوار ، تحقق النطاق لعمود واحد، ثم انقر OK، مربع حوار آخر معروض لتحديد خلية فارغة لإخراج القائمة ، انقر فوق OK. انظر لقطة الشاشة:
![]() |
![]() |
![]() |
3. ثم يتم إنشاء القائمة.