علي الشيخ

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

السلام عليكم ورحمة الله وبركاته فضلا المساعدة في التعديل على الكود التالي والتي تتلخص وظيفته في التالي عند الضغط على زر الكود يتم بحث النطاق من G75:G114 وكل خليه يوجد فيها YES (و YES دي نتيجة معادلة معينة موجودة في الخلية) يتم نسخ القيمة في المقابلة الموجودة في العمود B ليتم نسخ كل الخلايا المقابلة لكلمة YES في النطاق الجديد في نفس الشيت بدأ من الخلية B29 الى الخلية B36 Sub test1() Dim rcnt As Long rcnt = Worksheets("ALEX").Range("g" & Rows.Count).End(xlUp).Row For i = 1 To rcnt If Range("G" & i).Value = "YES" Then Range("G" & i).Offset(0, -5).Copy Range("B30").Offset(1, 0).PasteSpecial xlPasteAll End If Next i Application.CutCopyMode = False End Sub أرجو ان يكون المطلوب واضح وشكرا مقدما على المساعدة. test drat 3.xlsm

السلام عليكم ورحمة الله فضلا لدي استفسار بخصوص تجميع بيانات من شيتات مختلفة إلى شيت واحد تجميعي بطريقة معينة وهي كالتالي في المرفق مثال بيه عدد 2 ملف فيهم البيانات المطلوب تجميعها في الشيت الثالث Sample Sheet 1 الشيت الأول Sample Sheet 2 الشيت الثاني Collecting Sheet الذي سيتم فيه التجميع الشيت الأول والثاني وكل الشيتات على نفس الشاكلة فيها نفس تصميم وأماكن الخلايا ولكن البيانات هي اللي متغيرة وفي الشيت أنا موضح كل حاجة إن شاء الله المطلوب عمل زر في الشيت التجميعي بمجرد الضغط عليه يظهر نافذه أختار منها الشيت اللي عاوز انسخ البيانات منها فيتم ترحيلها للشيت التجميعي بحيث مع التكرار لإدراج البيانات من الشيتات المختلفة يتم إدراجها تحت بعضها كأنه ترحيل فواتير على سبيل المثال. اتمنى من حضراتكم المساعدة واتمنى إن الشرح على الشيتات المرفقة واضح. SAMPLE.rar

تسلم إيدك شغال تمام في إشكالية بسيطة بس ألا وهي اني لو اخترت فايل بيعمل نسخ تمام مفيش مشكلة لو شغلت الكود تاني وفتحت نافذة اختيار الملفات وضغطت كانسل بيكمل هو وينسخ نفس اللي كان في الملف الأول. المفروض اني في اي لحظة افتح نافذة اختيار الملفات وبعدين اكنسل انه ما يكملش الكود وشكرا مقدما لحضرتك

عليكم السلام ورحمة الله هل في إمكانية ترفق الملف اللي بتتكلم عنه؟

السلام عليكم جرب أخي المعادلة التالية =ROUND(SUM(F6,E6)/2,0) وممكن تستبدل Round بـ Roundup ليتم جبر الرقم دائما للأعلى أو Rounddown ليتم جبر الرقم للأقل

استبدل هذه الجزئية في الكود الموجود في Module 1 .Display .Subject = "" .To = "" .CC = "" .bcc = "" .HTMLBoDy = strbody & "<br>" & .HTMLBoDy بهذه الجزئية .Subject = "" .To = "" .CC = "" .bcc = "" .HTMLBoDy = strbody & "<br>" & .HTMLBoDy .Send

تحديث للمرفق: تم إضافة إمكانية التعديل على الأكواد Items Coding System V2.rar

العفو أخي اتفضل الملف المرفق لما يكون التاريخ في الخلية A2 أكبر من التاريخ في الخلية B2 سيتم فتح رسالة في الأوت لوك يوجد كود في الصفحة Sheet1 ويوجد كود أيضا " خاص بالأوتلوك" في Module 1 بالإمكان إضافة الإيميلات التي سيتم الإرسال لها مسبقا ومحتوى الرسالة وموضوع الرسالة .. إلخ كل هذا يمكن إعداده مسبقا بحيث تضغط إرسال فقط على رسالة الأوتلوك حتى دي ممكن تكون أتوماتيك ويمكن إعداد كل هذا أيضا من خلال قيم موجوده في الخلايا بمعنى يكون عنوان الرسالة موجود في خلية معينة وجهات الاتصال في خلية معينة ومحتوى الرسالة في خلية معينة وهكذا email via outlook.rar

السلام عليكم أخي ماذا تريد أن يكون محتوى الرسالة المرسلة إلى الأوتلوك هل هو محتوى خلية معينة أم كلام ثابت ؟ وجهات الأتصال تريد إضافتها يدويا أم ثابته أيضا وكمان موضوع الرسالة أو أي ملاحظات أخرى تخص الرسالة التي سيتم فتحها في الأوتلوك

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

السلام عليكم ضع الملف الذي به المشكلة او ملف مصغر منه للمساعدة بشكل أفضل

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

العفو أخي وأكيد هتلاقي مساعدة لكل متطلباتك بإذن الله

السلام عليكم في الملف المرفق أنا استخدمت الـ Pivot Table بعيدا عن الأكواد التي شخصياً أتجنبها كلما كان أمكن لو انت تستخدم أوفيس 2013 أو 2016 هيظهرلك الـ Slicer التي تساعدك على الفلترة بشكل سهل وأنيق لو إصدار أقدم مش هتظهر عندك ولكن هيظل الـ Pivot Table يعمل ويتحدث تلقائيا في كل مرة يتم فيها فتح الملف من جديد أو يتم تحديثه يدويا بالضغط على Refresh All الجدول موجود في Sheet1 يتم الفلترة بناء على الأشهر أو الشهور التي يتم اختيارها لكل كود موظف بإجمالياته من الاستقاطاعات والاستحقاقات مع إجمالي كلُ على حدى عند الطباعة يتم طباعة كل كود موظف في ورقة مستقلة ويمكن التنسيق في الطباعة كما تريد اتفضل ألقي نظره عسى يكون المطلوب أو ع الأقل فكره مبدئية يمكنك التطوير فيها بما يتماشى مع متطلباتك طباعة كل كود فى ورقة مستقلة.rar

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

السلام عليكم اتفضل أخي شوف المرفق بعد ظهور نتائج البحث في الليست بوكس عند الضغط مرتين على أي سطر يتم إدراج العمود الأول ( اللي به الكود على حسب ما فهمت ترتيب جدول نتائج البحث) إلى التكست بوكس الموجود في اليوزفورم 2 ومن ثم إظهار اليوزرفورم 2 بحث بفورم ممتاز2.rar

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

السلام عليكم في الويندوز عندك ادخل المسار التالي بعد ما تقفل كافة البرامج المفتوحة ويفضل تعمل ريستارت قبل ما تنفذ الخطوات C Windows System32 المفترض وجود ملف يسمى Fm20.dll اذا لم يكن موجود يمكن تحميله بكتابة اسمه في جوجل أو ممكن نجبهولك مفيش مشكلة ثانيا في حالة وجود الملف او اضافته الخطوة الثانية من قائمة ستارت تشغيل Run واكتب التالي Regsvr32.exe fm20.dll واضغط انتر المفترض يظهرلك رسالة كالتالية تفيد نجاح تثبيت الملف DllRegisterServer in c:\windows\system32\fm20.dll succeeded. اضغط أوكي وجرب تفتح الاكسل عسى خير ان شاء الله

السلام عليكم يبدو أنه يمكن أن تكون المشكلة في اللغة العربية للويندوز نفسه وليس لبرنامج الإكسل جرب الخطوات التالية كليك يمين على أيقونة ستارت ومن ثم اختر Control Panel ثم اختر Clock, Language, and Region ثم Language هتلاقي في الشمال Change date,time or number formats هتفتح نافذه اضغط على Administrative ثم Change system Locale وأختر اللغة العربية Arabic ثم أوكي اوكي حتى تغلق كل النوافذ وتعمل ريستارت وان شاء الله تفيدك

السلام عليكم أنا استخدم أوفيس 2016 ولم يظهر معي خطأ في الكود من النافذه اللي في الصورة فضلا تضغط Debug وتصور الشاشة

السلام عليكم هناك ما يسمى بالسعر المتوسط المرجح ويكون حسابه كالتالي الكمية الأولى = 1000 حبة السعر الأول = 2 جنية الكمية الثانية بتساوي 700 حبة السعر الثاني = 1.5 جنية فيكون طريقة الحساب لمتوسط السعر المرجح = ((الكمية الأولى x السعر الأول) + (الكمية الثانية x السعر الثاني )) / الكمية الإجمالية 1000*2 = 2000 700*1.5 = 1050 إجمالي السعر = 3050 متوسط السعر المرجح = 3050/ الكمية الإجمالية ( 1700) = 1.79 جنية للحبة بمعنى أنه يجب أن تبيع الكمية المتواجدة بسعر 1.79 للواحدة وهكذا إذا أضفت كميات جديدة بأسعار مختلفة يتم الحساب بنفس الطريقة ده ملف بسيط فيه الطريقة ويمكن زيادة الكميات والأسعار بما تراه مناسبا حساب متوسط السعر .rar

السلام عليكم على حد علمي المشكلة في اللغة العربية وليست طبيعة الملف المحول إليه سواء إكسل أو ورد لأن المواقع لا تدعم اللغة العربية وأغلب البرامج كذلك لا تدعم اللغة العربية إلا برنامج وحيد جربته من قبل ولكنه ليس مجاني واسمه PDF Grabber يحول إلى اللغة العربية بشكل سليم.

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

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