محمد الورفلي1

السلام عليكم ليس غريب من رجل يحب للخير للناس ويحب ان يساعدهم شكراً الواجب :: الواجب الاول.rar

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

السلام عليكم ممكن دمج كودين في كود واحد Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub On Error Resume Next If Not Intersect(Target, Range("b1:b60000")) Is Nothing Then VBA.Calendar = vbCalGreg If IsEmpty(Target) Then Target(1, 2).Offset(0, -2).ClearContents Else With Target(1, 7).Offset(0, -2) .Value = Date .EntireColumn.AutoFit End With End If End If End Sub الكود الثاني وهو بنفس الغرض ولكن يعمل من خلية مختلفة Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub On Error Resume Next If Not Intersect(Target, Range("c1:c60000")) Is Nothing Then VBA.Calendar = vbCalGreg If IsEmpty(Target) Then Target(1, 2).Offset(0, -2).ClearContents Else With Target(1, 7).Offset(0, -2) .Value = Date .EntireColumn.AutoFit End With End If End If End Sub هذا الملف دمج كودين.rar

السلام عليكم استاذ ياسر بارك الله فيك دئماً نحتاج للحفظ وفرت عليناً الحفظ شكراَ

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

شكراً اخي الفاضل علي ونعم الاخ بارك الله فيك لقد اتعبتك معي نسأل الله ان يكون في ميزان حسناتك(( لقد ابدعت في المعادلة )) واضم صوتي الي صوت ابو الآ =================================================================== الاستاذ الشهابي ذو الطله البهيه دائماَ في اعمالك لقد جعلتني في حيره في اختيار الطريقة كذالك بارك الله فيك ونسأل الله ان يكون في ميزان حسناتك

شكراً استاذ ياسر هذا هو المرفق ما الخطاء في المعادلة 1.rar

دقائق فقط انتظرني

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

للرفع

شكراً ابو الآء اريد معادلات وليس اكواد

السلام عليكم اريد استجلاب جدول حصص لكل معلم وفصل استخراج جدول معلم وجدول فصل.rar

السلام عليكم ورحمة الله وباركاته لقد طرح الاخ مجدي يونس موضوع عن فكرة المنبه وحبيت ان تخرج هذة الفكرة بمنبه للجرس المدرسي ولكن لم يستجيب للطلب احد من الاعضاء الموقرين او هي فكر ليستطيع الاكسل إنشأها والحمد لله بعد عناء والبحث الطويل وجدت هذا البرنامج في الانتر نت وهو يصلح لتنبية بدل من جرس المدرسة التقليدي يريد فقط مكبر صوت ذى جودة عالية http://www.gulfup.com/?LPJjNU

انت رجل تساعد الناس وتبشرهم بالخير بارك الله فيك

جميل جداً هل ممكن نسخه على اوفيس 2003

ممتاز جداً بارك الله فيك

للرفع

هل هذة الفكرة لاتصلح افيدونا

عمل مميز وجميل ( بارك الله فيك )

جميل جداً بارك الله فيك

للرفع

نسأل الله ان يتقبل منك ويجعله في ميزان حسناتك

السلام عليكم استاذي الفاضل (( محمود الشريف )) شرف كبير مرورك

السلام عليكم نتيجة شبيه بالتي في ويندوز سفن علي الاكسيل نتيجة.rar

لقد اضفت ما طلبت للرفع