تحميل مجانى برنامج الكنترول المدرسى ( كنوز ) وادارة اعمال الامتحانات وزارة التربية والتعليم

 

ترحيل البيانات في إكسيل: دليل شامل لنقل البيانات بناءً على شروط محددة

 

هل تبحث عن طريقة فعالة لنقل بيانات محددة من ورقة عمل إلى أخرى في إكسيل؟

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

ما هو ترحيل البيانات؟

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

1. لماذا نحتاج إلى ترحيل البيانات بناءً على شروط؟
2.   تنظيم البيانات: تسهيل عملية تحليل البيانات من خلال فصل البيانات ذات الصلة ببعضها البعض.
3.   إنشاء تقارير مخصصة: استخراج البيانات التي تلبي معايير معينة لإنشاء تقارير مفصلة.
4.   تحديث البيانات تلقائياً: ربط ورقتي عمل بحيث يتم تحديث البيانات تلقائياً عند إجراء أي تغييرات.
5.   تحليل البيانات الفرعية: دراسة مجموعات بيانات أصغر داخل مجموعة بيانات أكبر.

طرق ترحيل البيانات في إكسيل

هناك عدة طرق لترحيل البيانات في إكسيل، ولكل طريقة مزاياها وعيوبها. سنستعرض هنا الطرق الأكثر شيوعاً:

  استخدام الدوال:

•    دالة VLOOKUP: تستخدم للبحث عن قيمة في عمود معين وإرجاع قيمة مقابلة من عمود آخر.
•     دالة INDEX و MATCH: توفر مرونة أكبر في البحث وإرجاع القيم.
•   دالة IF: تستخدم لإنشاء شروط منطقية وتحديد القيم التي سيتم نقلها.

  الفلترة:

•     الفلترة التلقائية: تسمح لك بعرض البيانات التي تلبي معايير محددة.
•     الفلترة المتقدمة: توفر خيارات فلترة أكثر تعقيداً.

  البيانات الفرعية:

إنشاء جداول بيانات فرعية تحتوي على البيانات التي تلبي شروط معينة.

استخدام VBA:

    لإنشاء أكواد مخصصة لأتمتة عملية ترحيل البيانات.

مثال عملي

كتابة كود VBA لترحيل البيانات بناءً على شرط معين

أهلاً بكم! سأقدم لكم مثالاً عمليًا لكيفية كتابة كود VBA في Excel لترحيل البيانات بناءً على شرط معين.

 لنفترض أن لدينا جدول بيانات يحتوي على أسماء المنتجات وأسعارها، ونريد ترحيل المنتجات التي يزيد سعرها عن 100 جنية إلى ورقة عمل أخرى.

الخطوات:

  فتح Visual Basic Editor:

   انتقل إلى علامة التبويب "Developer" في شريط أدوات Excel.

    انقر على زر "Visual Basic".

  إدراج Module جديد:

    في نافذة Visual Basic Editor، انقر بزر الماوس الأيمن على اسم المشروع واختر "Insert" ثم "Module".

كتابة الكود:

 

Sub ترحيل_البيانات()

    Dim wsSource As Worksheet, wsDest As Worksheet

    Dim lastRow As Long, i As Long

 

    ' تحديد ورقتي المصدر والوجهة

    Set wsSource = ThisWorkbook.Sheets("Sheet1") ' استبدل "Sheet1" باسم الورقة المصدر

    Set wsDest = ThisWorkbook.Sheets("Sheet2") ' استبدل "Sheet2" باسم الورقة الوجهة

 

    ' تحديد آخر صف في الورقة المصدر

    lastRow = wsSource.Cells(Rows.Count, 1).End(xlUp).Row

 

    ' بدء حلقة لتمرير كل صف في الورقة المصدر

    For i = 2 To lastRow

        ' إذا كان سعر المنتج أكبر من 100 جنية، قم بنسخ البيانات إلى الورقة الوجهة

        If wsSource.Cells(i, 2).Value > 100 Then ' افترض أن سعر المنتج في العمود B

            wsDest.Cells(wsDest.Rows.Count, 1).End(xlUp).Offset(1, 0).Value = wsSource.Cells(i, 1).Value

            wsDest.Cells(wsDest.Rows.Count, 2).End(xlUp).Offset(1, 0).Value = wsSource.Cells(i, 2).Value

        End If

    Next i

 

    MsgBox "تم ترحيل البيانات بنجاح"

End Sub

 

 

لتحميل ملف العمل

إكسيل,إكسيل للمبتدئين ,دورات إكسيل ,تعليم إكسيل ,إكسيل VBAبرمجة إكسيل ,VBA ,تحليل البيانات بإكسيل ,جداول بيانات إكسيل ,تطبيقات إكسيل , دروس إكسيل مجانية , كورسات إكسيل مدفوعة ,شروحات إكسيل بالتفصيل ,إكسيل اون لاين ,أساسيات إكسيل: ,واجهة المستخدم ,الصيغ ,الدوال,التنسيق,الجداول المحورية,الرسوم البيانية VBA:, ماكرو إكسيل ,لغة برمجة VBA