رجب جاويش

أخى الفاضل جرب المرفق جدول-تصفية-المنح-ابجد-هوز-صحيح.rar

لا شكر على واجب أخى الفاضل محمد

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

تمت اضافة السطر المحدد فى الصورة السابقة

تفضل أخى تعديل.rar

يشرفنى زيارتك الكريمة أخى الحبيب وفى انتظارك ان شاء الله

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

بعد اذن أخى الفاضل سليم جرب أخى هذه المعادلة =IF(H2=943;"نعم";"لا")

أخى الحبيب / ياسر ليست بطة واحدة ولا اثنتان بل ثلاث بطات وأكثر أنت تؤمر وتنور بلشاى كلها

أخى الحبيب / ياسر ( فاكهة المنتدى ) ربنا يبارك فيك ويديم المودة

ربنا يخليك أخى الحبيب / ياسر أحسنت وأبدعت

وجزاك الله كل خير أخى أحمد الحمد لله أن تم المطلوب

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

تفضل أخى الفاضل جرب هذه الفكرة اكرم.rar

تفضل أخى الفاضل =(HOUR(A1)*3600+MINUTE(A1)*60+SECOND(A1))/60 بفرض أن الوقت موضوع فى الخلية A1 برجاء أخى الانتباه بالنسبة لتكرار الموضوع حيث أن هذا الموضوع مكرر مرتين

عذرا أخى فقد نسيت هذه النقطة تفضل تجزئه3.rar

السلام عليكم ورحمة الله وبركاته بعد اذن أخى الحبيب ياسر خليل تفضل أخى جرب الكود التالى Sub ragab() Dim cl As Range, sh As Worksheet Dim ws As Worksheet '======================================= Set sh = Sheets("الرئيسيه") Set ws = Sheets("النموذج") '======================================= Application.ScreenUpdating = False ThisWorkbook.Unprotect "123" ws.Unprotect "123" '======================================= For Each cl In sh.Range("D4:R7") If Not IsEmpty(cl) Then x = Trim(cl) On Error Resume Next If Worksheets(x) Is Nothing Then Sheets.Add.Name = x Sheets(x).Move After:=Sheets(Sheets.Count) ws.Range("A1:k36").Copy With Sheets(x) .Select .Paste .Protect "123" End With End If End If Next '======================================= Application.CutCopyMode = False ThisWorkbook.Protect "123" ws.Protect "123" Sheets("الرئيسيه").Select Application.ScreenUpdating = False End Sub تجزئه2.rar

السلام عليكم ورحمة الله وبركاته أساتذتى الكرام : اللذين أدين لهم بالفضل والعرفان بكل ما تعلمته فى الإكسيل أحبابى وأصدقائى : أعضاء منتدانا العريق ( منتدى أوفيسنا ) أقدم لكم أحدث تعديل فى كنترول الإعدادى رجب جاويش الإصدار رقم 15 للترمين والدور الثانى 2016 يشمل كل الأعمال الخاصة بالترم الأول والترم الثانى والدور الثانى شيت كنترول الإعدادى رجب جاويش الإصدار 15.rar

جزاكم الله كل خير

كل الشكر للمهندس الفاضل / محمد طاهر وبالتوفيق ان شاء الله وكان الله فى العون

أخى الفاضل / الزباري بارك الله فيك وفى أولادك وان شاء الله تراهم من المتفوقين دائما تقبل أرق تحياتى وتقديرى لشخصكم الكريم أخوك / رجب جاويش

أخى الفاضل / جلال الجمال بارك الله فيك وفى أولادك وان شاء الله تراهم من المتفوقين دائما تقبل أرق تحياتى وتقديرى لشخصكم الكريم أخوك / رجب جاويش

أخى الفاضل / الصقر بارك الله فيك وفى أولادك وان شاء الله تراهم من المتفوقين دائما تقبل أرق تحياتى وتقديرى لشخصكم الكريم أخوك / رجب جاويش

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

أخى الفاضل الرجاء مزيد من التوضيح حتى تجد الحل المناسب