أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
ashraf_hertlion hassona229-- لا تميز خلال هذه الفترة YasserKhalil مطلوب تعديل الكود للطباعة اكسيل اسئله واجابات


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





الحصول على بيانات محددة في نتائج البحث

السلام عليكم ورحمة الله وبركاته: الشكر موصول لجميع اساتذتنا القائمين على المنتدى الرائع والجميل وسؤالي هو كيفية التعديل ..


موضوع مغلق

الصفحة 1 من 3 < 1 2 3 > الأخيرة »


25-10-2021 06:46 مساء
علي بطيخ سالم
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 19-09-2018
رقم العضوية : 8086
المشاركات : 277
الجنس : ذكر
تاريخ الميلاد : 30-10-1982
الدعوات : 1
يتابعهم : 7
يتابعونه : 3
قوة السمعة : 1084
عدد الإجابات: 12
 offline 

السلام عليكم ورحمة الله وبركاته: الشكر موصول لجميع اساتذتنا القائمين على المنتدى الرائع والجميل وسؤالي هو كيفية التعديل على الكود من أجل جلب اعمدة محددة في نفس نطاق البحث والمقصد أن أتمكن من تبديل البيانات المعطاة يعني بدل من جلب اسم الأم يجلب لي الديانة مثلاً وبدلاً من عمود (الصف) الثاني يجلب لي النوع وهكذا
المقصد هذا السطر:

 

arr = wsData.Range("A5:e" & wsData.Cells(Rows.Count, 1).End(xlUp).Row).Value   

 

فبدلاً من نطاقة كامل يتمثل من A5 : E أريد أن أجعله A - B - C- E بحيث أتمكن من تطبيقه على ملفات أخرى

 
 
  تكافل وكرامة 2022..xlsm   تحميل xlsm مرات التحميل :(13)
الحجم :(44.397) KB



أفضل إجابة مقدمة من YasserKhalil وهي:
وعليكم السلام أخي العزيز علي
أضف سطر واحد فقط من خلاله يمكنك التحكم في الأعمدة المطلوبة من المصفوفة 
    arr = wsData.Range("A5:E" & wsData.Cells(Rows.Count, 1).End(xlUp).Row).Value
    arr = Application.Index(arr, Evaluate("ROW(1:" & UBound(arr, 1) & ")"), [{1,2,3,5}])
عرض الإجابة




25-10-2021 10:02 مساء
مشاهدة مشاركة منفردة [1]
hassona229
مشرف عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2018
رقم العضوية : 9257
المشاركات : 808
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 13-9-1980
يتابعهم : 0
يتابعونه : 11
قوة السمعة : 4330
عدد الإجابات: 113
 offline 
look/images/icons/i1.gif الحصول على بيانات محددة في نتائج البحث
وعليكم السلام ورحمة الله وبركاته 
شكل النتائج المتوقعه للبيانات حتى يتسنى لنا فهم المطلوب جيدا لم توضحه اخى الكريم 

25-10-2021 11:54 مساء
مشاهدة مشاركة منفردة [2]
علي بطيخ سالم
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 19-09-2018
رقم العضوية : 8086
المشاركات : 277
الجنس : ذكر
تاريخ الميلاد : 30-10-1982
الدعوات : 1
يتابعهم : 7
يتابعونه : 3
قوة السمعة : 1084
عدد الإجابات: 12
 offline 
look/images/icons/i1.gif الحصول على بيانات محددة في نتائج البحث
هذا هو جدول البيانات في صفحة DATA بالترتيب من العمود A حتى العمود H طبعاً الترحيل بيكون بالترتيب من A إلى E مثلاً في نطاق البحث أنا اللي محتاجة أنه بدل ما يجلب A & B & C & E بالترتيب أنا محتاج يبقى A & B & E ومش محتاج الـ C
 
  222222222222.jpg   تحميل jpg 222222222222.jpg مرات التحميل :(8)
الحجم :(340.838) KB
 


26-10-2021 02:52 صباحا
مشاهدة مشاركة منفردة [3]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10455
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 536
قوة السمعة : 36632
عدد الإجابات: 256
 offline 
look/images/icons/i1.gif الحصول على بيانات محددة في نتائج البحث
وعليكم السلام أخي العزيز علي
أضف سطر واحد فقط من خلاله يمكنك التحكم في الأعمدة المطلوبة من المصفوفة 
    arr = wsData.Range("A5:E" & wsData.Cells(Rows.Count, 1).End(xlUp).Row).Value
    arr = Application.Index(arr, Evaluate("ROW(1:" & UBound(arr, 1) & ")"), [{1,2,3,5}])

26-10-2021 07:39 صباحا
مشاهدة مشاركة منفردة [4]
علي بطيخ سالم
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 19-09-2018
رقم العضوية : 8086
المشاركات : 277
الجنس : ذكر
تاريخ الميلاد : 30-10-1982
الدعوات : 1
يتابعهم : 7
يتابعونه : 3
قوة السمعة : 1084
عدد الإجابات: 12
 offline 
look/images/icons/i1.gif الحصول على بيانات محددة في نتائج البحث
ما الخطأ
 
  2021-10-26_063824.png   تحميل png 2021-10-26_063824.png مرات التحميل :(3)
الحجم :(50.073) KB
 


26-10-2021 11:13 صباحا
مشاهدة مشاركة منفردة [5]
hassona229
مشرف عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2018
رقم العضوية : 9257
المشاركات : 808
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 13-9-1980
يتابعهم : 0
يتابعونه : 11
قوة السمعة : 4330
عدد الإجابات: 113
 offline 
look/images/icons/i1.gif الحصول على بيانات محددة في نتائج البحث
ما هو السطر الذي يتوقف عنده الكود

26-10-2021 01:28 مساء
مشاهدة مشاركة منفردة [6]
علي بطيخ سالم
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 19-09-2018
رقم العضوية : 8086
المشاركات : 277
الجنس : ذكر
تاريخ الميلاد : 30-10-1982
الدعوات : 1
يتابعهم : 7
يتابعونه : 3
قوة السمعة : 1084
عدد الإجابات: 12
 offline 
look/images/icons/i1.gif الحصول على بيانات محددة في نتائج البحث
هذه النقطة :   [{1,2,3,5}])
في هذا السطر والذي أضافه الأستاذ ياسر:
 arr = Application.Index(arr, Evaluate("ROW(1:" & UBound(arr, 1) & ")"), [{1,2,3,5}])


الصفحة 1 من 3 < 1 2 3 > الأخيرة »


الكلمات الدلالية
الحصول ، بيانات ، محددة ، نتائج ، البحث ،


 










اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 03:12 صباحا