أناناس

السلام عليكم الرسالة التالية تفيد بوجود خطأ أرجوا المساعدة فى حلها

لمزيد من الإيضاح للإخوة المشاركين للوصول الى كود مميز يقوم بهذه الفكرة أريد أن أضع مثلا فى الخلية H1 من الرقم مثلا 5 وفى الخلية H2 الى الرقم مثلا 10 فتظهر النتيجة ( 5 ) فى الخلية F1 ومقابل البحث لها فى الخليتين c2 , c1 ثم التصفية للعمودين E , F بناءا على قيمة c2 , c1 ثم Calculate ثم الطباعة ثم النتيجة ( 6 ) فى الخلية F1 ومقابل البحث لها فى الخليتين c2 , c1 ثم التصفية للعمودين E , F بناءا على قيمة c2 , c1 ثم Calculate ثم الطباعة ثم النتيجة ( 7 ) فى الخلية F1 ومقابل البحث لها فى الخليتين c2 , c1 ثم التصفية للعمودين E , F بناءا على قيمة c2 , c1 ثم Calculate ثم الطباعة ثم النتيجة ( 8 ) فى الخلية F1 ومقابل البحث لها فى الخليتين c2 , c1 ثم التصفية للعمودين E , F بناءا على قيمة c2 , c1 ثم Calculate ثم الطباعة ثم النتيجة ( 9 ) فى الخلية F1 ومقابل البحث لها فى الخليتين c2 , c1 ثم التصفية للعمودين E , F بناءا على قيمة c2 , c1 ثم Calculate ثم الطباعة ثم النتيجة ( 10 ) فى الخلية F1 ومقابل البحث لها فى الخليتين c2 , c1 ثم التصفية للعمودين E , F بناءا على قيمة c2 , c1 ثم Calculate ثم الطباعة

السلام عليكم ورحمة الله أخى الفاضل أبو عيد جزاك الله خيرا على ما تقدمه لإخوانك بالمنتدى الكود المطلوب يقوم بعمل الاتى 1- يولد الأرقام من رقم البداية وحتى رقم النهاية 2- يقوم مع كل مرة يتولد فيها الرقم بعمل بحث عن الرقم المتولد ووضع قيمة البحث فى الخليتين C2, C1 ثم يقوم بعمل تصفية ثم طباعة أى أنه مع كل رقم يقوم بعمل بحث وطباعة فمثلا لو وضعت أنا المطلوب 15 مسلسل فى كل مرة مع كل رقم يقوم بعمل بحث وتصفية وطباعة أما الكود الذى وضعته أنت لا يقوم بعمل التصفية إلا مرة واحدة فى الأخر

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

جزاك الله خيرا لكن الملف بطئ جدا ولا يقوم بعمل التصفية تلقائية للبيانات فهل من مساعدة

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

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

استغفر الله العظيم

السلام عليكم ورحمة الله المساعدة فى طباعة حسابات الأستاذ الكود التالى يقوم بتوليد أرقام متتالية لنطاق معين بين رقم البداية ورقم النهاية هل بالإمكان إضافة جزئين للكود 1-الأول ليقوم بالبحث عن الإسم المقابل للمسلسل ( بدل عن دالة VLOOKUP الموجودة فى الخليتين C1 , C2 ) 2- يقوم بعمل تصفية تلقائية للبيانات للعمودين E , F وجزاكم الله خيرا LEDGER ACC.rar

السلام عليكم ورحمة الله أبحث عن كود فى حدث موديل يا حبذا وليس حدث الصفحة يقوم بعمل مسلسل تلقائى عند الفرز ( تصفية / فلترة ) يضع التسلسل فى الصفحة 1 فى الخلايا من A10 : A400 يكون جيد وسريع لان البحث أتعبنى وجزاكم الله خيرا

السلام عليكم ورحمة الله ابحث عن كود أو أداه تقوم بتصفية ( وليس تصفية متقدمة ) للبيانات المتكرر فى عمود وبارك الله فيكم

السلام عليكم ورحمة الله سيد ياسر خليل كل عام وانتم بخير وجزيت خيرا كثيرا على تعاونك معى لقد قمت بالذى أشرت على به ولكن للأسف لم يفلح وأعطانى فورمات غير الذى وضعته وتجاهل نطاق التنسيق فلو تكرمت إلق على الملف نظرة ولو تفضلت بتحويل الكود من حذث الصفحة الى موديل بزرار عادى ( ON - OFF ) نكون شاكرين STORE.rar

للفرفع

سيد ياسر خليل هل بالامكان المساعدة فى المشاركة السابقة وبارك الله فيك

لعلك لم تر تعليقى

السلام عليكم ورحمة الله أخونا وإستاذنا الغالى ياسر خليل جزاك الله خيرا على تعبك وبذل مجهود فى الرد على موضوعنا ظهرت مع إستخدام الملف رسالة خطأ أرفقتها هل بالإمكان تحويل الكود الى موديل بدلا من وضعه فى حدث الصفحة وربطه بزر عادى ( صورتين عاديتين on / off ) بدلا من ToggleButton للتيسير وشكرا لإهتمامك بطلبنا

السلام عليكم ورحمة الله أخى وأستاذى الغالى أبو عيد جزاك الله خيرا على ما تقدمه والله إن اللسان عاجز عن الشكر لكن تبقى طلب صغير جدا على ملف الـ CASH وهو معادلة توليد المسلسل فى العمود A هل بالإمكان إستبدال المعادلة التى وضعتها أنا بكود ليقوم بعمل المسلسل الذى يتغير كلما قمت بالتصفية ( الفلترة ) وهذا أخر طلب لى بارك الله فى علمك

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

فكرتك رائعة وهى إضافة ( ON / OFF ) على معادلات التنسيق الشرطى وفكرة الكود أفضل و أهى حاجة جديدة نتعلمها من فيض علمكم الواسع وألف حمد لله على سلامة جنابك أخانا الغالى ياسر خليل

السلام عليكم ورحمة الله أقوم بعمل مشروع إنشاء نموذج لدليل الحسابات ( عناصر المخزون ) واجهتنى مشكلة خلال إعتمادى على التنسيق الشرطى لإخفاء بعض القيم ما أبحث عنه هو كود يقوم بتعطيل معادلات التنسيق الشرطى لاتمكن من المعاينة ثم يقوم بتفعيل تلك المعادلات مرة أخرى كود بزرارين تفعيل تعطيل مرفق المشروع ولو من متكرم يقوم بعمل TREE VIEW للشارت نكون شاكرين STORE.rar

السلام عليكم ورحمة الله وبركاته أولا بارك الله فيك بسبب الرد على طلب تعديل المعادلة ثانيا جزاك الله خيرا على تعديلك لكود السحب لان هذا التعديل كنت أبحث عنه مدة طويلة لكن لى طلب تعديل ضغير على معادلة الصفيف وهو هل بالإمكان جعل معادلة الصفيف تلتقط رقم فاتورة الشراء الخارجية من الخلية G إذا كانت الخلية E " فاتورة شراء " فقط , لانك لو لاحظت عند وجود مثلا " فاتورة رقم " فى الخلية E وهناك رقم فى الخلية G فإن المعادلة تأخذه بغض النظر عن المحتوى المطلوب بدون تعقيد إذا كانت E " فاتورة شراء " تأخذ الرقم المجاور فى الخلية G , وما عدا ذلك يتولد السريال كما كان عملك المبارك ثم قد أرفقت ملفا به بعض المعادلات نتمنى منك أن تطبق لنا فيه هذ الكود اللطيف للسحب لاسفل وبارك الله فيك CASH.rar

السلام عليكم ورحمة الله وبركاته اخي الغالي و أستاذي هل بالامكان جعل معادلة السيريال عند وجود فاتورة شراء تأخذ قيمة خلية ما على نفس الصف ( بدون زيادة 1 عن السابق أو زيادة 1 للاحق ) أى فى شرط مستقل أخير خارج +1 بحيث أقوم أنا بوضع سيريال فاتورة الشراء يدويا نظرا لانه متغير خارجي وليس سيريال داخل الشركة انما من المورد وأنا سأقوم بوضع صف فارغ بين كل مجموعة وأخرى تفاديا لامر نادر الحدوث موضح بالمرفق وأخيرا هل تتكرم علينا بملف فيه بعض المعادلات فى أكثر من أربع مواضع وتنفذ فيه كود السحب لاسفل الذى تكرمت به علينا حتى نستوعب كيفية تركيبه بارك الله فيك ونفع بك الاسلام والمسلمين مولد السرايل الجديد.rar

أبو نبأ إنا لله وإنا اليه راجعون :(

أخى الغالى أبو عيد جزاك الله خيرا لو من الممكن التعديل على المعادلة لوضع سريال جديد فى حالة فاتورة الشراء تعديل السريال مرفق والمعادلة الجديدة متميزة جدا لاننى أتمكن من وضع صف فارغ ولا يظهر لى الخطأ #N/A ويتبقى لى طلب أخر فى الملف الذى أريد إنشائه كود VBA للبحث فهل من الممكن دمجه مع كود نسخ معادلة السريال فى كود واحد و الكود هو Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("N8:N41013")) Is Nothing Then '------------------------- If Target.Cells.Count > 1 Then Exit Sub On Error Resume Next Application.ScreenUpdating = False Target.Offset(0, 1) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 2, False) Target.Offset(0, 2) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 3, False) Target.Offset(0, 3) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 4, False) Target.Offset(0, 4) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 5, False) Target.Offset(0, 5) = Application.VLookup(Target, Sheet1.Range("A3:F5000"), 6, False) End If End Sub وأخير يظهر لى رسالة كلما قمت بحفظ الملف مرفق صورتها أسأل عن كيفية التغلب عليها مولد السرايل.rar

أستاذنا الغالى أبو عيد تسلم يداك وجزاك الله خيرا المعادلة الثانية عين المطلوب لكن هل من الممكن وضع سريال البداية - للفاتورة والبيان والإضافة - داخل المعادلة بدلا من معادلة VLOOKUP وهل من الممكن تطبيق تلك المعادلة فى كود فيجوال بيسك بمجرد إختيار النوع والمستفيد تعطى السريال وبارك الله فيك على حسن المتابعة والرد