قطان

أخي الكريم الموضوع ممتاز ويحتاج للخبراء لكن أرجو من الأخ yahiaoui فتح المجال بإعطاء كلمة السر لفتح الvb للإطلاع على على طريقة عمل الملف والسلام ختام

السلام عليكم مشكور أخي الكريم بالنسبة لتفقيط الجنيه موجود عندي لكن المشكلة الجنيه 100 قرش أما الدينار 1000 فلس والسلام بيوصل أخي ابن البلد الحبيب بالانجليزي ماشي (بس التفقيط لثلاث أعداد عشرية وليس عددين عشريين ) والسلام ختام

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

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

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

السلام عليكم آسف على الخطأ Selection.AutoFill Destination:=Range(cells(2,3),cells(3,4)) والسلام ختام

السلام عليكم بالإعادة الإفادة Selection.AutoFill Destination:=Range(cells(2,3),(3,4)) والسلام ختام

السلام عليكم rang(cells(3,4),cells(4,5)).select للتجربة فقط

rang(cells(3,4);cells(4,5)) هذا للتجربة فقط والسلام ختام

عفوا أخي الكريم لدي مشكلة في اضافة كود لكن يمكنك التعديل على الشكل : Selection.AutoFill Destination:=Range(cells(2,3),cells(4,5)") أرجو أن يكون واضحا ولو تكرمت وأفدت بطريقة كتابة الكود في الرسالة والسلام ختام

السلام عليكم أخي الكريم الكود بالشكل : Selection.AutoFill Destination:=Range((2,3),(3,4)") والسلام ختام

أخي الكريم السلام عليكم ورحمة الله وبركاته هذا الملف مرفق وفق حل الأخ العزيز أبو الخير والسلام ختام ظ…ظ† ط§ظ„ط¯ط±ظ‡ظ… ط§ظ„ظ‰ ط§ظ„ط¯ظٹظ†ط§ط±.rar

السلام عليكم أخي الكريم بالنسبةللسعر والجودة الهدف من البرنامج ( على ما فهمته ) أنك ستضع المكتبات والكتب ولا تفكر أيها أقل سعرا ولا حتى أيها أحسن جودة وأقل سعر بل تدخل الأسعار كلها ولكن الكتاب الذي لاتريده تضع بجواره السلاش وبعد أن تنتهي يحدد البرنامج المكتبة الأقل سعرا فتقوم أنت بإلغاء باقي المكتبات بوضع السلاش (أم تريدها اتوماتيكيا أيضا اعلمني بذلك ) وإذا كان كتابان مطابقان للمواصفات فالبرنامج يحدد الأقل سعرا بين الكتب الجيدة فتقوم أنت بإلغاء الباقي بوضع السلاش وإن كان هناك واحدة فقط فالأمر صحيح لكنك ستتعب باختيار الأقل سعرا بينما البرنامج يحدده لك أما المكتبات الغير موجودة فيكفي حذف خانة الافرادي فقط والملف المرفق فيه تعديل للألوان والعمل جاري على فصل كل مكتبة على حدا والسلام ختام طھط­ظ„ظٹظ„ ط§ظ„ط£ط³ط¹ط§ط± 1.rar

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

السلام عليكم أخي خبور الخير بسم الله ماشاء الله ولاقوة إلا بالله عمل رائع ( ويا بخت اللي تمر على موضوعه ) لكن بعد العمل به وتجربته وكافة الاحتمالات ظهرت مشكلة بسيطة وهي كالتالي : قي حال إلغاء تفعيل الجمع والتعديل على خلية بتغيير الرقم ثم تفعيل الجمع و وضع رقم لجمعه على نفس الخلية فإن القيمة التي وضعت قبل التفعيل تعتبر صفرا مع العلم أننا لو أغينا التفعيل و غيرنا الخلية b10 و b11 وتركنا الخلية b11 المفعلة وعدنا للتفعيل فالإضافة على الخلية b11 يعتبر القيمة السابقة صفرا وإذا انتقلنا للخلية b10 فلا يعتبر القيمة السابقة صفرا آسف على الإطالة والسلام ختام

السلام عليكم أخي الكريم تم التعديل ووضع الملاحظات داخل المرفق بالنسبة لعملية اضافة وحذف الأسطر هام وضروري لحذف أي سطر حتى السطر الأول أو التاني احذف اسم الكتاب فقط فيحذف السطر لكن يجب الإبقاء على سطرين دون حذف يعني لو حذفت الأول والثاني أيضا مع وجود سطرين غيرهما لا مشكلة المهم وجود سطرين على الأقل أما الإضافة فلماذا الإضافة قبل السطرين الأول والثاني هل من ضرورة مع الإشارة بأن عملية الإضافة لا تتم ( تفاديا للأخطاء البرمجية ) عن طريق اسدال قائمة وادراج بل بوضع اسم الكتاب في الخانة الصفراء من تحت العمود الرمادي والسلام ختام طھط­ظ„ظٹظ„ ط§ظ„ط£ط³ط¹ط§ط± 1.rar

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

السلام عليكم أخي الحبيب الملف انتهى بإذن الله وتم ما تريد ماعدا اختيار اللون فأحسست أنه لا معنى لمدخل جديد يعيق العمل ويأخره وإن كنت تريده فأخبرني لأعمل عليه والسلام ختام أخوك في الله بشير القطان /معلم رياضيات/ ط¢ظ…ظ„ ط£ظ† ظٹظƒظˆظ† ط§ظ„ظ…ط·ظ„ظˆط¨11.rar

السلام عليكم

أخي الكريم الملف المرفق بالمشاركة الثانية أرجو تحميله والمعادلة : =if(and(d1<75;d1>150);"a";"b") والسلام ختام

أخي الكريم مابعرف شو صار المهم الملف المرفق والسلام ختام Book1.rar

= if ( AND ( D1 > 75 ; D1 < 150 ); "" ; "" ) = if ( 75 < D1 < 150 ; "" ; "" )

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

السلام عليكم مشكور أخي صالح على المرور ( أرجو أن يكون تعليقك هذا رضا عن الملف ) أخي الكريمhbsqn زر التصغير موجود لكن ليس كما نريد ( كصفحة الويندوز ) جربه وأعطني رأيك فيه وفي مكان وضع الفورم في البداية وحجم التصغير ( فكل ذلك قابل للتغيير من الكود حسب رغبتك ) والعمل جاري على خطأ ظهر معي وهو الاستمرار في ضغط زر العودة بالنسخ والنسخ في السطر الأول ) وكذلك زر النسخ والنسخ في السطر الأخير والسلام ختام ط¢ظ…ظ„ ط£ظ† ظٹظƒظˆظ† ط§ظ„ظ…ط·ظ„ظˆط¨11.rar