السلام عليكم الرجاء مراجعة الكود وتصليح الخطأ-عاجل

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

السلام عليكم ورحمه الله وبركاته

الرجاء من الاساتذة الكرام الاطلاع على الملف ومراجعة الاكود وتصحيح الخطأ

حيث البحث لا يعمل وايضا احضار البيانات لا يظهر مظبوط وحاولت كثيرا لم استطع 

وشكرا لكمكروت.xlsb

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

11 دقائق مضت, AbuuAhmed said:

عدلت في إجراء البحث قدر المستطاع، جرب الآن

كروت_02.xlsb 275.68 kB · 0 downloads

استاذ ابو احمد

شكرا لحضرتك ولكن البحث لا يعمل ويقوم بتعطيل الملف 

[AbuuAhmed]

محاولة أخرى
يمكنك الآن البحث في حقلي الرقم والمدينة.

كروت_03.xlsb

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

5 ساعات مضت, AbuuAhmed said:

محاولة أخرى
يمكنك الآن البحث في حقلي الرقم والمدينة.

كروت_03.xlsb 280.19 kB · 1 download

استاذ ابو احمد

شكرا لحضرتك ولكن البحث لا يزال لا يعمل وزر عرض الملف ايضا لا يعمل وايضا عند الضغط على بحث بدون كتابة اي شىء جلب بيانات ولكن مش مظبوطة وتم اضافة موظف وايضا لم يظهر في الليست بوكس 

كروت_03.xlsb

تم تعديل يناير 6 بواسطه spyhearts
توضيح المشكلة

[AbuuAhmed]

أخي أنا لم أكتب الأكواد، والطلب كان يخص البحث فقط، وما قمت به فقط تنظيم لإجراء البحث فقط.
عموما الآن انتبهت أنك تريد البحث في العمود الثاني وليس الأول.
بدل هذا السطر:
 

SearchCol = IIf(IsNumeric(TextBox22), 1, 11)

بهذا السطر:
 

SearchCol = IIf(IsNumeric(TextBox22), 2, 11)

وأعتذر عن المواصلة.

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

35 دقائق مضت, AbuuAhmed said:

أخي أنا لم أكتب الأكواد، والطلب كان يخص البحث فقط، وما قمت به فقط تنظيم لإجراء البحث فقط.
عموما الآن انتبهت أنك تريد البحث في العمود الثاني وليس الأول.
بدل هذا السطر:
 

SearchCol = IIf(IsNumeric(TextBox22), 1, 11)

بهذا السطر:
 

SearchCol = IIf(IsNumeric(TextBox22), 2, 11)

وأعتذر عن المواصلة.

شكرا اخي AbuuAhmed وبشكرك على سعة صدرك 

 اما بالنسبة للملف حاولت الاستعانة ببعض الاكواد الخارجية ولكن يوجد اخطاء في الاكواد سانتظر احد الاساتذة في المنتدى الاطلاع على الاكواد ومحاولة حل الخطأ

مرفق الملف مره اخرى بعد تصحيح بعض الاخطاء في الكود 

 

كروت_03.xlsb

تم تعديل يناير 6 بواسطه spyhearts

[ابو عارف]

تفضل أخي اليك احد حلول حسب فهمي من السؤال
كروت_03.xlsb

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

2 ساعات مضت, ابو عارف said:

تفضل أخي اليك احد حلول حسب فهمي من السؤال
كروت_03.xlsb

شكرا ا. ابو عارف

ولكن نفس المشكلة لا يبحث وعند اختيار الاسم من الليست بوكس جلب البيانات غير مظبوط كما في الصور

[AbuuAhmed]

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

ملاحظة: أتمنى من يرفع ملف جديد بتغيير رقم الملف مثلما أنا أفعل بزيادة رقم مع كل مرة.

كروت_04.xlsb

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

26 دقائق مضت, AbuuAhmed said:

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

ملاحظة: أتمنى من يرفع ملف جديد بتغيير رقم الملف مثلما أنا أفعل بزيادة رقم مع كل مرة.

كروت_04.xlsb 281.22 kB · 2 downloads

شكرا ا. AbuuAhmed بارك الله فيك

امل التوضيح حاليا البحث بالرقم شغال اما البحث بالمدينة لا يعمل 

ويوجد خطأ في كود الاضافة بحاول احله

ممكن توضيح فكره كتابة حرف العمود هل المعني انه يقوم بجلب البيانات بناء على حرف العمود وليس على بداية الجدول

في المره المقبلة ساقوم برفع الملف وتغير الرقم بناء على اخر رقم

ومازلت الاكواد بها ملاحظات 

[AbuuAhmed]

البحث عن المدينة يعمل

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

شكرا  AbuuAhmed البحث يعمل ولكن عند الضغط والاختيار  من خلال listbox به خطأ وايضا لا يظهر كامل الاعمدة التي بورقة العمل  داخل listbox

وايضا تم عمل اضافة لموظف ولم يتم الحفظ في ورقة العمل مرفق صور توضح ذلك 

واتمنى المعذرة فانا احاول فهم مع تعملته من الاساتذة المحترمين امثال ا. محمد هشام وحضرتك و ا. mn2 وبعض الاساتذة من المنتدى العريق

جزاكم الله كل خير لما تقدموه من مساعدة للاعضائ

[AbuuAhmed]

7 دقائق مضت, spyhearts said:

البحث يعمل ولكن عند الضغط والاختيار  من خلال listbox به خطأ وايضا لا يظهر كامل الاعمدة التي بورقة العمل  داخل listbox

وايضا تم عمل اضافة لموظف ولم يتم الحفظ في ورقة العمل مرفق صور توضح ذلك 

يا أخي أنت مصر أن تظهر عملي خاطئ!!، حاول تفهم أن شغلي كان على البحث فقط ونتهت عليك أكثر من مرة أن التكملة عليكم.
المرفق موجود واختبار البحث عن طريق مربع الفحص فقط، غير ذلك ليس لي علاقة به.

مثالي الأخير هو نموذج للجميع، لمن يريد أن يتعلم فكرة جديدة

[ابو عارف]

1 ساعه مضت, spyhearts said:

ولكن نفس المشكلة لا يبحث وعند اختيار الاسم من الليست بوكس جلب البيانات غير مظبوط كما في الصور

طيب جرب هذا

 

كروت_03.xlsb

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

12 دقائق مضت, AbuuAhmed said:

يا أخي أنت مصر أن تظهر عملي خاطئ!!، حاول تفهم أن شغلي كان على البحث فقط ونتهت عليك أكثر من مرة أن التكملة عليكم.
المرفق موجود واختبار البحث عن طريق مربع الفحص فقط، غير ذلك ليس لي علاقة به.

مثالي الأخير هو نموذج للجميع، لمن يريد أن يتعلم فكرة جديدة

 

شكرا AbuuAhmed

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

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

9 دقائق مضت, ابو عارف said:

طيب جرب هذا

 

كروت_03.xlsb 284.55 kB · 0 downloads

 

• شكرا ا. ابو عارف

هل حضرتك قمت بتعديل كود جلب البيانات عند الاختيار من listbo يعمل بارك الله فيك

اما لو حضرتك قمت بالتعديل في كود الاضافة فهو قام بالاضافة ولكن مش مظبوطة مرفق صوه توضح بعد الاضافة انه قام بالاضافة باخر صف 

[ابو عارف]

34 دقائق مضت, spyhearts said:

ما لو حضرتك قمت بالتعديل في كود الاضافة فهو قام بالاضافة ولكن مش مظبوطة مرفق صوه توضح بعد الاضافة انه قام بالاضافة باخر صف

اي زر يعمل اضافة ؟ يوجد زر واحد  و هذا كود   

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

2 دقائق مضت, ابو عارف said:

اي زر يعمل اضافة ؟ يوجد زر واحد  و هذا كود   

عند الضغط على زر يختفي هذا الزر ويظهر ايقونة   لحفظ البيانات بعد الادخال

[عبدالله بشير عبدالله]

السلام عليكم

بعد اذن الاساتذه الافاضل

𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ

•  

بالنسبة البحث بالمدينة  اذا تكرر اسم المدينة لاكثر من شخص  فالكود سيحضر اول اسم فقط في حال اظهار البيانات في التكستبوكسس

 

جرب الملف ينقصه البحث بالمدينة

طباعة العقد / لا توجد صفحة خاصة بهذا الامر 

ارجو التوضيح اكثر

انتبه الى عنوان المشاركة فكلمة عاجل  تعتبر من الكلمات الممنوعة  كما جاء في قوانين المشاركة كما يلي

4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا.....

جرب الملف وحدد النقاط بوضوح التي تحتاج الى تعديل او تصحيح

كروت_05.xlsb

تم تعديل يناير 6 بواسطه عبدالله بشير عبدالله

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

وعليكم السلام ورحمه الله وبركاته

شكرا أ. عبدالله بشير عبدالله

تم تحميل الملف وحاليا الجهاز الحالي ليس

فور فتح الملف على جهاز سابلغك بالنتيجة باذن الله بارك الله فيك

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

السلام عليكم ورحمه الله وبركاته

ا. عبدالله بشير عبدالله

شكرا لحضرتك بارك الله فيك  البحث يعمل سواء بالرقم او بالمدينة 

المشكلة بالنسبة للاضافة بعد ما كتبت البيانات واضفت تم حفظ البيانات ولكن بيانات مختلفة

كما بالصور ولا اعلم ما المشكلة عند الحفظ وكتابة البيانات 

وبالنسبة لنقطة طباعة العقد فهو معتمد على ليبل مكان حفظ العقد وبالفعل كانت خطوة اخرى بعد الانتهاء من تصحيح الاكواد ساقوم بارشفة العقود داخل فولدر وعرضها من خلال الاكسيل

 

 

[عبدالله بشير عبدالله]

وعليكم السلام ورحمة الله وبركاته

ارجو ان تتعامل مع الملف المرفق بالمشاركة الحالية حتى نصل  الى تحقيق المطلوب مع الاعضاء والخبراء 

الملف 

كروت_05.xlsb

 

تم تعديل يناير 7 بواسطه عبدالله بشير عبدالله

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

6 ساعات مضت, عبدالله بشير عبدالله said:

وعليكم السلام ورحمة الله وبركاته

ارجو ان تتعامل مع الملف المرفق بالمشاركة الحالية حتى نصل  الى تحقيق المطلوب مع الاعضاء والخبراء 

الملف 

كروت_05.xlsb 279.21 kB · 2 downloads

 

شكرا ا. عبدالله بشير عبدالله

ان شاء الله بفتح الملف على الجهاز الخاص بي وابلغك بالنتيجة

بارك الله فيك

[عبدالله بشير عبدالله]

تعديلات اخرى على الملف

كروت_06.xlsb

[𝒜ℬ𝒪 𝒴𝒪𝒰𝒮ℰℱ]

13 دقائق مضت, عبدالله بشير عبدالله said:

تعديلات اخرى على الملف

كروت_06.xlsb 276.49 kB · 0 downloads

بارك الله فيك ا. عبدالله بشير عبدالله الملف يعمل

هل حضرتك قمت بتعديل كود البحث بالمدينة لانه لا يعمل

هل ممكن جعل listbox يعرض 19 عمود ويكون من الجهة اليمنى

وهل في المكان وضع كود لطباعة العقد ومعاينته

جزاك كل خير وزادك من علمه