فيصل الحربي

معليش اتعبتك معايه ..كدا تمام ,,,يعطيك العافية

السلام عليكم .. مساعدة في دالة IF الشرطية مطلوب حساب المتبقي على يوم صرف الراتب كما هو موضح موظفي التأمينات "الحالة الأولى: الراتب يصرف اول يوم من كل شهر الحالة الثانية إذا صادف يوم 1 الجمعة فإنه يصرف يوم الخميس سواء كان الشهر 31 او 30 او 29 او 28 الحالة الثالثة إذا صادف يوم 1 السبت فإن الراتب يصرف يوم الأحد 2 الحالة الرابعة اذا كان يوم الصرف يكتب Today مكان عدد الأيام المتبقية للصرف" الموظفين "الحالة الأولى الراتب يصرف يوم 27 من كل شهر الحالة الثانية إذا صادف يوم 27 الجمعة فإنه يصرف يوم الخميس 26 الحالة الثالثة إذا صادف يوم 27 السبت فإن الراتب يصرف يوم الأحد 28 الحالة الرابعة اذا كان يوم الصرف يكتب Today مكان عدد الأيام المتبقية للصرف" تحديث: مطلوب أن يكون يوم الصرف متغير ينفع مع 1 في الشهر أو 27 أو 25 تحديث2: المطلوب بالمعادلات فقط حتى تعمل على اكسل الموبايل الرواتب.xlsx

أخوي في الله بارك الله فيك و أجزل لك المثوبة تمام 100 %

تم رفع المرفق لماذا VBA لأن المطلوب ادخال رقم في الخلية A1 والتي تعتمد الحسابات عليها فإذا كانت هناك معادله في الخلية A1 فستحذف المعادله مع الادخال الجديد في اليوم التالي vba.rar

السلام عليكم ورحمة الله وبركاته المطلوب بارك الله فيكم الخلية رقم A1 فارغة بعد ادخال الرقم الدال على تاريخ اليوم و ليكن 18 في الخلية رقم A1 تتم مقارنة محتوى الخلية فإذا كان الرقم المدخل يساوي أو أكبر من تاريخ اليوم فيتم وضع الرقم كما هو ( 18 ) اما إذا كان الرقم المدخل اقل من تاريخ اليوم فيتم وضع زيرو في الخلية رقم A1 طبعا العملية محتاجه VBA وفي حدث بعد التغيير للشيت =IF(DAY(TODAY())<=E1,E1,0)

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

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

بارك الله فيكم لكن المطلوب برمجيا عبر VBA أو الماكرو التلقائي عند فتح المصنف

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

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

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته مبرووك عليكم الشهر الفضيل - جعلنا الله و اياكم من صوامه و قوامه المطلوب : لدي شيت فيها جدول المرتبات والمطلوب عند النقر المزدوج على أحد خلايا جدول المرتب ان يقوم بعمليات رياضية ( ضرب / طرح / جمع / قسمه ) لعدة خلايا في نفس الصف الذي تم النقر المزدوج عليه ثم يضع النتيجة في خليه محدده الملف المرفق مثال 1 اذا تم النقر المزدوج على الخلية D2 يقوم الكود بعمل التالي يجمع قيمة الخلية D2 مع الخلية E2 ثم يقوم بضرب الخلية D2 في الخلية F2 ثم يطرح ناتج الضرب من المجموع ثم يضع ناتج العملية في الخلية C8 مثال 2 اذا تم النقر المزدوج على الخلية C3 يقوم الكود بعمل التالي يجمع قيمة الخلية C3 مع الخلية E3 ثم يقوم بضرب الخلية C3 في الخلية F3 ثم يطرح ناتج الضرب من المجموع ثم يضع ناتج العملية في الخلية C8 شاكرا لكم و مقدرا تعبكم Book1.rar

بارك الله فيك أخي احمد تمام 100 % يعطيك العافية

بارك الله فيك ابا عبدالله * السجل رقم 16 ( المضخه 15 ) الــ frequency الخاص بصيانتها كل 180 يوم لذا ستكون مواعيد صيانتها كتالي : المضخة 15* 22/8/2006* 18/2/2007 *17/8/2007 *13/2/2008 *11/8/2008* 7/2/2009* 6/8/2009 *2/2/2010 *1/8/2010 *28/1/2011* والتاريخ 28/01/2011 هو المطلوب إدراجه في العمود ( تاريخ الصيانة القادم) بحيث انه يكرر الفترات حتى يصل الى الفترة التي تكون بعد تاريخ 01/11/2010 ثم يضع الجدوله الصحيحة وهي هنا = 28/01/2011 أكرر شكري لتعبك معي . ===

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته لدي ورقة أكسل ( 55400 سجل / سطر ) إصدار 2003 و أحد الأعمدة به تاريخ عمل الصيانة و عمود آخر مطلوب ان يكون به تاريخ الصيانة القادم بناء على عمود به عدد أيام الــ Frequency ماهي المعادلة التي أستطيع بها ملء العمود ( تاريخ الصيانة القادم ) لتطبيقها على جميع السجلات ( 55400 سجل ) . مع ملاحظة اذا كان الناتج لتاريخ الصيانة القادم قبل تاريخ 01/11/2010 فإنه يتم وضع التاريخ للصيانة القادم بعد 01/11/2010 و بارك الله فيكم Book1.rar

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

السلام عليكم ورحمة الله وبركاته أبارك لكم هذا العمل . ===

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

السلام عليكم ورحمة الله وبركاته أخي محمد : تقبل الله منك حجك وكتب لك بكل خطوة حسنه و حجا ميرورا وسعيا مشكورا لقد إشتقنا لك في هذه المدة البسيطه إشتياق الولد لرؤية والده ، فحياك الله بين أبنائك .

وعليكم السلام مجهود رائع تستحق الشكر عليه

بارك الله فيك ابو مازن

بسم الله الرحمن الرحيم أشكر لك سعيك يا أبو مازن لقد وضعت رجلي على بداية الطريق و إليك الحل كاملا Dim k, m As String k = Selection.Text ActiveCell.FormulaR1C1 = k & " - A" m = Len(k) With ActiveCell.Characters(Start:=m + 1, Length:=m).Font .ColorIndex = 3 End With تحياتي

بسم الله الرحمن الرحيم بارك الله فيك فلقد أصبت الهدف 10 / 10 لكن ما ذا لو أردت بأن يجعل حرف -A باللون الأحمر فما هي الطريقه ... ؟

السلام عليكم ورحمة الله وبركاته ما هي مواضيعك التي لم تجدها ؟

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته واجهتني صعوبة في تعديل 7500 سجل في ورقة أكسل بعض السجلات ارغب في إضافة كلمة أو حرف ( -A ) باللغة الانجليزية إلى نهاية ما هو مكتوب يعني لو افترضنا ان النص الموجود في الخلية المراد التعديل فيها هي : FAISAL ALHARBI وبعد التعديل تكون FAISAL ALHARBI -A طبعا عن طريق ماكرو لتسهيل عملية تعديل السجلات . شاكرا لكم جهودكم

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