elsedik

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

اخى الفاضل جزاك الله كل خير كيف يكون التطبيق على الملف المرفق وشكرا

كيف يتم ترقيم الصنف بناء على اسم المجموعة عندما يتم اختيار مجموعة معينة يتم ترقيم الصنف ترقيم تلقائى مرفق ملف ترقيم.rar

كيف يتم التعديل هذا الكود فى الحدث من تغير فى ورقة العمل الى الضغط على زر Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("c4:c5,i4,i5")) Is Nothing Then Application.ScreenUpdating = False On Error Resume Next If Target.Cells.Count > 1 Then Exit Sub If Target Is emptey Then Sheet2.Range("b8:i5000").ClearContents r = 8 For i = 5 To Sheet1.Range("b10000").End(xlUp).Row + 1 Application.ScreenUpdating = False If Sheet2.Range("c4").Value = "" Then GoTo a If Sheet2.Range("c4").Value = Sheet1.Cells(i, "e") Then a: If Sheet2.Range("c5").Value = "" Then GoTo a1 If Sheet2.Range("c5").Value = Sheet1.Cells(i, "g") Then a1: If Sheet2.Range("i5").Value = "" Then GoTo a2 If Sheet2.Range("i5").Value >= Sheet1.Cells(i, "h") Then a2: If Sheet2.Range("i4").Value = "" Then GoTo a3 If Sheet2.Range("i4").Value <= Sheet1.Cells(i, "h") Then a3: Sheet2.Cells(r, 2) = Sheet1.Cells(i, 3) For j = 3 To 9 Sheet2.Cells(r, j) = Sheet1.Cells(i, j + 2) Next j r = r + 1 End If End If End If End If Next i End If End If End Sub مرفق ملف تعديل كود.rar

كل البيانات لا يعمل معها الكود

اخى الفاضل الكود مش شغال وجزاك الله كل خير

اخى الفاضل بارك الله فيك وفى انتظار الباقية

عند الضعط استدعاء كيف يتم استدعاء البيانات من صفحة Data بناء على ما يتم اختيارة فى الخلايا C4,c5,14;I5 مرفق ملف استدعاء البيانات.rar

عند تشغيل الاستعلام Net تظهر رسالة بادخال معيار sumofQty اريد الغاء هذا الرسالة مرفق ملف St.rar

ارجو المساعدة فى اظهار كود الصنف واسم الصنف بناء على ما يتم اختيارة فى خانة الوحدة والحجم اى عمل فلتر بناء على الحجم والوحدة مرفق ملف St.rar

الف حمد لله على سلامتك يا استاذنا منور المنتدى والله وكل عام وانت بخير

اخى الفاضل جزاك الله كل خير ممكن مساعدة فى عمل كود تعديل البيانات واسف جدا على الازعاج

هناك بعض الاخطاء عند كتابة الاكواد لا اعرف كيف يتم التعامل مع هذا الخطاء مثل end if without if بالرغم من كتابة جملة if بداية الجملة عند استخدام متعير فى حلقة for next يظهر خطاء لابد من تعريف المتغير وفى اوقات اخرى لا يظهر هذا الخطاء وهناك اخطاء اخرى لا اجد له اى تفسير مطلوب راى الخبراء فى هذا الموضوع

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

نقول مليون مبرووووووووووووووووك الى الامام دائما ربنا يوفقك

المطلوب حذف البيانات الموظف الموجودة فى الفورم من الورقة رقم 1 عند الضغط على زر حذف بيانات الموظف والحفاظ على تسلسل الارقام فى كود الموظف مرفق ملف Book1.rar

استاذى الفاضل أ/ عبد الله جزاك الله خير على الرد الجميل الكافى بكل معنى الكلمة نفعك الله بعلمك جزاك الله كل خــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــير

كيف يتم اظهار البيانات الموجودة فى الصفحة خلال فورم والتحكم فى البيانات من اضافة وتعديل وحذف من خلال الفورم مرفق ملف اظهار البيانات .rar

كيف يتم عمل قائمة تعتمد على عدد 2 قائمة منسدلة عند اختيار اسم القسم ونوع الصنف تظهر فى قائمة الصنف الاسماء الخاصة بالقسم ام فى حالة اختيار كل الاصناف تظهر جيمع الاصناف الموجودة مرفق ملف قائمة .rar

كيف يتم اضافة اسم العملاء والارصدة الخاصة بها فى روقة رقم 1 عن طريق الكود مرفق ملف اضافة .rar

المساعدة فى تكملة اسم الصنف عند كتابة اول حرف منه او اظهار الاصناف التى تبدا بهذا الحرف فقط مرفق ملف اول حرف .rar

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

كيف يتم حماية الاشكال التلقائية فى الاكسل من التعديل عليها او تحريك الشكل وشكرا

كيف يتم عند اختيار المقاس يظهر الحجم فى الفورم حاولت باستخدام الكود الموجود ولكن هناك خطا لا اعرف اذا كان فى كتابة الكود ام فى حدث الكود مرفق ملف خطاء فى كتابة كود.rar

اخى الفاضل ممكن توضيح بسيط لماذا لا نحصل على ناتج المعادلة بدون عمل data validation بالرغم من ان المعادلة تعمل فى الورقة الاساسية للصنف ورقة رقم 3