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

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


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





تعديل في كود البحث واظهار عدد7 اعمده بالليست بوكس بدل 3

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريبالساده الافاضل الكرام السلام عليكم جميعا ورحمه الله وبركاته بامل ..


موضوع مغلق


14-12-2020 07:42 مساء
ابونورا
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 12-04-2020
رقم العضوية : 18872
المشاركات : 2
الجنس : ذكر
تاريخ الميلاد : 1-1-1980
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 10
 offline 

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريبالساده الافاضل الكرام
السلام عليكم جميعا ورحمه الله وبركاته
بامل التكرم في اجراء التعديل في كود البحث لاظهار عدد اعمده في الليست بوكس بعدد 7 علما بان الفورم هو من احد اعمال استاذنا الاستاذ مجدي يونس له كل التحيه والتقدير ودام الله عليه وعليكم  نعمه الصحه والعافيه مع خالص الشكر والتقدير
 
 
  بحث.xlsm   تحميل xlsm مرات التحميل :(5)
الحجم :(35.121) KB



أفضل إجابة مقدمة من ali mohamed ali وهي:
وعليكم السلام-تم ضبط وتعديل هذا الجزء من الكود البحث Private Sub kh_Find() كما ترى

ReDim Preserve Ary(1 To 7, 1 To ii)
            Ary(3, ii) = .Item(R).Value
            Ary(2, ii) = .Cells(R, 0).Value
            Ary(1, ii) = .Cells(R, -1).Value
            Ary(4, ii) = .Cells(R, 2).Value
            Ary(5, ii) = .Cells(R, 3).Value
            Ary(6, ii) = .Cells(R, 4).Value
            Ary(7, ii) = .Cells(R, 5).Value

كما تم ضبط وتعديل تنسيق عرض الأعمدة بالليست بوكس كالتالى
110 pt;105 pt;200 pt;110 pt;95 pt;150 pt;150 pt

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
عرض الإجابة




14-12-2020 08:29 مساء
مشاهدة مشاركة منفردة [1]
ali mohamed ali
مشرف على منتدى الاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1769
الدولة : مصر
الجنس : ذكر
الدعوات : 2
يتابعهم : 0
يتابعونه : 68
قوة السمعة : 9642
عدد الإجابات: 47
 offline 
look/images/icons/i1.gif تعديل في كود البحث واظهار عدد7 اعمده بالليست بوكس بدل 3
وعليكم السلام-تم ضبط وتعديل هذا الجزء من الكود البحث Private Sub kh_Find() كما ترى

ReDim Preserve Ary(1 To 7, 1 To ii)
            Ary(3, ii) = .Item(R).Value
            Ary(2, ii) = .Cells(R, 0).Value
            Ary(1, ii) = .Cells(R, -1).Value
            Ary(4, ii) = .Cells(R, 2).Value
            Ary(5, ii) = .Cells(R, 3).Value
            Ary(6, ii) = .Cells(R, 4).Value
            Ary(7, ii) = .Cells(R, 5).Value

كما تم ضبط وتعديل تنسيق عرض الأعمدة بالليست بوكس كالتالى
110 pt;105 pt;200 pt;110 pt;95 pt;150 pt;150 pt

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  بحث1.xlsm   تحميل xlsm مرات التحميل :(17)
الحجم :(39.922) KB

توقيع :ali mohamed ali
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
 الاخرين لوجه الله وان تحتسب له اجر عند الله



الكلمات الدلالية
بوكس ، اعمده ، بالليست ، عدد7 ، واظهار ، البحث ، تعديل ،


 










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

الساعة الآن 05:36 صباحا