نجوم المشاركات

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

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

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

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

أخى الحبيب ( محمود الشريف ) ماأروع كلماتكم وأعمالكم فى هذا الصرح ،فهنيئا لهذا المنتدى بأساتذتة الجدد بارك الله فيكم وجعلكم الله ( خير خلف لخير سلف ) تقبل تحيات : أخيك

أستاذى ( مجدى يونس ) شرف لهذا المرفق أن يجتمع عليه كل أساتذة وعباقرة المنتدى شكرا أستاذى على مروركم الكريم وكلماتكم الجميلة المشجعة لتلميذكم بارك الله فيكم

أستاذى ومعلمى وعبقرى الوطن العربى ( عبد الله بقشير ) مروركم وكلماتكم شرف لأى تلميذ يتمنى أن يثنى عليه أستاذة الذى يحبة ويقدرة ويتخذ منه مثلا أعلى يتمنى من كل قلبة أن يكون فى يوما من الأيام فى علمة وعبقريتة تقبل تحيات تلميذكم العاشق لكم

أخى الحبيب ( live8523 ) شكرا أخى الحبيب على مروركم وكلماتكم الجميلة بارك الله فيك وجعل فى العمل الإفادة لكم فهذا هو الهدف الحقيقى منه تقبل تحيات : أخيك

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

شكرا أخى الحبيب جزاك الله عنى خير الجزاء تقبل تحياتى

أستخدم هذه المعادلة أخى وأسحبها لأسفل =SUBSTITUTE(A2;" ";" "&B2) =REPLACE(A1;FIND(" ";A1);0;" "&B1) تقبل تحياتى : أخيك

السلام عليكم ورحمة الله وبركاته اخواني الأعزاء طرحت مسبقا لنموذج فاتورة عربي ونموذج فاتورة انجليزي لكن اليوم سوف اتناول الفاتورة بشكل وفكر جديد حتي تخدم شريحة كبيرة من المستخدمين مع حركات اخي الحبيب / شوقي ربيـع الجديد في النموذج فورم واحد ولكن يمكنك من خلاله الاختيار بين لغة الفاتورة (عربي - انجليزي ) ولغة الايصال (عربي - انجليزي) اختيار سهل للاصناف اختيار طريقة السداد بيان رصيد العميل واترككم مع النموذج أدعو الله سبحانه وتعالي ان يكون النموذج فيه الفائدة لكم ولا تنسونا بدعائكم بصلاح الحال بظهر الغيب فاتورة مبيعات اوفيسنا_2.rar

أقدم لكم كورس SharePoint Admin and Designer 2010 من انتاج مراكز اى تى شير للتدريب للمهندس / احمد ربيع البهوتى تحميل الكورس الحلقة الاولى : Why SharePoint تحميل الحلقة الثانية : Look and Feel Setting تحميل الحلقة الثالثة : Site Collection تحميل الحلقة الرابعة : SharePoint Pages and Change Master Page تحميل الحلقة الخامسة : SharePoint Publishing Feature تحميل الحلقة السادسة : SharePoint 2010 List تحميل الحلقة السابعة : Lookup - Create relationships between lists تحميل الحلقة الثامنة: SharePoint 2010 Library تحميل الحلقة التاسعة: Document WorkSpace تحميل الحلقة العاشرة : Security in SharePoint 2010 تحميل الحلقة الحادية عشر: Site Column in SharePoint 2010 تحميل الحلقة الثانية عشر : Search in SharePoint 2010 تحميل الحلقة الثالثة عشر: Document Set in SharePoint 2010 تحميل الحلقة الرابعة عشر: External List in SharePoint 2010 تحميل الحلقة الخامسة عشر: Database Connection in SharePoint 2010 تحميل الحلقة السادسة عشر : Soap Services Connection تحميل الحلقة السابعة عشر: Rest Service Connection تحميل الحلقة الثامنة عشر: Office Web Apps Within SharePoint تحميل الحلقة التاسعة عشر: WebDav Features تحميل

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

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

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

نسألك العافيه ودوام الصحه اخى وربنا يكثر من امثالك فى افعال الخير

بإذن الله سينظر في طلباتك واتمنى ان تتابع هذا الموضوع لعلك تستفاد منه بإذن الله تعالى http://www.officena.net/ib/index.php?showtopic=51714&hl=

أخي اضغط الملف الاول بصيغة rar ثم ارفعه

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

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

أخى فى الله الأستاذ الكريم والحبيب / محمد ابو البراء اول مرحب بى بهذا الموقع التعليمى المبارك وبلدياتى بارك الله فيكم ومتشوق لمعرفة كل شىء عن الكنترول خاصة اننى ليس لى علاقة بالتربية والتعليم ولكن وجدت ان هناك اكثر من 200 مشاركه تتحدث عن شيت الكنترول وهو رقم ليس باليسير لذلك أسأل الله لكم أن يعينكم على ما أنتم مقدمون عليه وأن يوفقكم لما فيه الخير دمتم فى أمان الله وحفظه وتقبل منى وافر الإحترام والتقدير

السلام عليكم ورحمة الله وبركاته الاستاذ والاخ / محمد ابو البراء جزاك الله خيرا اعطاك الله الصحة والعافية وزادك من علمه دمتم في رعاية الله وحفظه

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

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

أخى الحبيب ( عباس ) دائما سباق للخير ودائما متميز فى أعمالك ومشاركاتك ، ودائما مشاركاتك تنم على الحميمية والحب لكل زملائك بارك الله فيك وأكثر الله من أمثالك تقبل تحيات أخيك

تابع وبإذن الله سيتم عرض موضوع خاص بالشهادات من اول خطوة الى اخر خطوة بالتفصيل الممل

يسر الله امرك ان شاء الله الاكسل عن الايتام فماهي المدرسة التي بها هؤلاء الايتام وماهو تكلفه كفاله يتيم لمدة سنة ...؟؟؟ .

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

السلام عليكم ورحمة الله وبركاته الاستاذ والاخ الحبيب ابو محمود حفطكم الله سبحانه وتعالى وانعم عليكم بالصحة والعافية كما قال استاذي الشهابي جزاه الله خيرا { هي من روائع ملك المعادلات } فعلا استاذنا الفاضل انها درر من روائع معادلاتكم التي ان شاء ستستمر دون انقطاع زادك الله من فضله علما ومعرفة واغدق عليكم نعمه صباحا ومساء تقبل فائق احترامي وتقديري وبَيّضَ الله وجهك في الدنيا والاخرة دمتم في رعاية الله وحفظه

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

ميروك

جزاك الله خيرا وزادك علما و تواضعا الجزء رقم 2 2 ) لم تاتي النية بعد ليكون خالصاً كله لوجه الله لماذ ؟ ان كل اعمالك لوجه الله لهذا يجب علليك ان تحاول فى ههذه النقطة بالذات وسأظل ألح عليك حتى تشرع فى تصميم برنامج كامل مجانى لوجه الله فهذا ليس بكثير عليك احبك فى الله اخى محمد بارك الله فيك

الأخ الكريم/احمد مجدى السلام عليكم ورحمة الله وبركاته جمعة مباركة الصبر طيب - ليس كل من شاهد يملك أو يرغب بالرد - ومن رغب بالرد قد لا يملك الوقت - فإلتمس لإخوانك العذر أعود لسؤال حضرتكم الفرق بين العبارتين بإختصار : 1- تستخدم ByVal عندما تريد تمرير متغير إلي إجراء Sub ولا تريد أن يغير هذا الإجراء من قيمة المتغير 2- تستخدم ByRef عندما تريد تمرير متغير إلي إجراء وتريد أن يغير هذا الإجراء من قيمة المتغير 3- الأصل Default في آلية تمرير المتغير داخل الإجراء - عند عدم تحديد طريقة التمرير - هو ByRef . في المرفق مثال يوضح الشرح بالأعلي - تقبل تحياتي Book1-ByVal-vs-ByRef.rar

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

أخي العزيز / shaerhamada وبعد اذن الأساتذة الكرام محمد أبو البراء وأم عبد الله وما دام الأرقام عندك في العمود (A ) متسلسلة فالأفضل لك أن تكتب في الأعمد المطلوب جلب أرقام الجلوس فيها في الصفين الأول والثاني يدويا بدون معادلة وتسحبها إلى الأسفل وهذا لن يؤثر على المعادلات في العمود المجاور ( أعمدة الدرجات ) اكتب في السطر الأول 1 2 3 4 5 وفي السطر الثاني 6 7 8 9 10 ثم حدد الصفين بكل الأعمدة واسحبها لأسفل وإن كنت تريد الحل بالمعادلات فحل الأستاذة الفاضلة أم عبد الله ما شاء الله فيه الكفاية لاحظ المرفق ومرفق آخر شرح فديو صامت للطريقة help.rar سحب وإفلات.rar

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

أخى وحبيبى / أبو محمـود جاحد من ينكر ضوء الشمس ..

تم الحل والحمد لله. أورد الحل للإفادة. جزاكم الله خيراً الحل الأول: ( الأسرع والأفضل بنظري ) Sub hbsqn() Dim i As Long Dim x As Integer Application.ScreenUpdating = False For i = Range("A" & Rows.count).End(3)(1).Row To 2 Step -1 If Range("A" & i).Value = Range("A" & i - 1).Value Then Range("A" & i - 1).EntireRow.Delete End If Next i x = 9 Do Until x = 0 Range("A" & Rows.count).End(3)(0).Select Do Until ActiveCell.Row = 1 If ActiveCell.Value + 1 <> ActiveCell.Offset(1).Value Then ActiveCell.Offset(1).EntireRow.Insert ActiveCell.Offset(1).Value = ActiveCell.Value + 1 ActiveCell.Offset(1, 1).Value = 33 ActiveCell.Offset(1, 2).Value = "" ActiveCell.Offset(1, 3).Value = ActiveCell.Offset(, 3).Value End If ActiveCell.Offset(-1).Select Loop x = x - 1 Loop Application.ScreenUpdating = True End Sub الحل الثاني: Sub FormatClosingBalance() Dim rng As Range Dim i As Long Set rng = Selection rng.Copy rng.PasteSpecial xlPasteValues For i = rng.Rows.Count To 2 Step -1 Select Case rng(i - 1, 1) Case rng(i, 1) Rows(i - 1).Delete Case Is = rng(i, 1) - 1 'Do nothing here Case Is < rng(i, 1) - 1 Rows(i).Insert Cells(i, 1).Value = rng(i + 1, 1) - 1 Cells(i, 2).Value = 33 Cells(i, 4).Value = rng(i - 1, 4) i = i + 1 Case Else 'Headers dont match row 2 End Select Next i rng.Columns(3).Delete 'Delete this if you don't need to delete the Amount Column End Sub

مليون مبروك للسيدة الفاضلة الاستاذة // ام عبدالله ويارب عقبال الترقية الكبيرة ترقية زواج ابنائك وترقية الحج الاكبر بارك الله فيكم ... تقبلى وافر احترامى

لم يرحلها شيء لإن العمود الأول فارغ ؟ والكود بيأخذ اخر صف به بيانات من العمود الأول جرب التعديل التالي Public S As String Public Sub Ali_Rn() Dim W As Workbook, Wr As Workbook Dim Sh As Worksheet Dim iC, Sn$ Dim Shet As Worksheet Dim Path$, My_F$, A_Num, i%, Lc&, L_A&, C Dim Rng As Range Dim A_Lst As Range SPd False Ali_Clr Sn = "المبيعات اليومية بالتفصيل" On Error Resume Next Set Wr = ThisWorkbook Path = ThisWorkbook.Path & Application.PathSeparator My_F = Dir(Path & "*.xlsx") Do While My_F <> "" If Not My_F = Wr.Name Then Workbooks.Open Filename:=Path & "\" & My_F Set W = Workbooks(My_F) For Each Sh In W.Worksheets With Sh SPd False Set Rng = .Range(.Cells(2, 1), .Cells(500, 35)) With Rng S = Replace(W.Name, ".xlsx", "") Set A_Lst = .Cells(2, .Columns.Count).End(xlToLeft) A_Num = A_Lst.Column End With If Sh.Name = Sn Then iC = 2 Else iC = 1 L_A = .Cells(.Rows.Count, iC).End(xlUp).Row Set Shet = Wr.Worksheets(.Name) With Wr.Worksheets(.Name) Lc = .Cells(.Rows.Count, iC).End(xlUp).Offset(1, 0).Row For C = 1 To A_Num For i = 2 To L_A .Range("A" & Lc - 1).Cells(i, C).Value = Sh.Cells(i, C).Value .Range("A" & Lc - 1).Cells(i, A_Num + 1).Value = S Next i Next End With End With A_Num = 0: R_Num = 0 Next W.Close 0 SPd True End If My_F = Dir Loop SPd True End Sub Private Function SPd(Bn As Boolean) With Application .Calculation = IIf(Bn, -4105, -4135) .EnableEvents = Bn .ScreenUpdating = Bn .DisplayAlerts = Bn End With End Function Private Sub Ali_Clr() Dim Dh As Worksheet For Each Dh In ThisWorkbook.Worksheets Dh.UsedRange.Cells.ClearContents Next End Sub ولا عليك نحنو بالخدمه لاتتردد بأي سؤال

أليك أخى ماطلبت مشكلة تكرار.rar

أليك أخى كل ماطلبت مشروع الخبز.rar

وهذه طريقة بالمعادلات فى الخلية( B1 ) وأسحبها إلى أخر الأعمدة =INDEX(عمود!$F:$F;(INT((COLUMNS($A$2:A2)-COLUMNS($A$2))))+7;COLUMN($A$1:A1)) فى الخلية ( B2 ) وأسحبها إلى أخر الأعمدة =INDEX(عمود!$H:$H;(INT((COLUMNS($A$2:A3)-COLUMNS($A$2))))+7;COLUMN($A$1:A2)) تقبل تحيات : أخيك

اخواني اقسم بالله انني استفدت من هذا الموقع كثيرا فجزا الله القائمين عليه وجميع الاعضاء وجميع الخبراء بالاكسيل اخواني لدي طلب او مجموع طلبات لهذا البرنامج المرفق ويترتب على عمله ميزات كثيره ستشملني ان انا اكملته على الوجه المطلوب ومنها رخصه شهر ومكتب خاص فيني كعسري برتبة عريف مع مميزات اخرى في الدورات والترقيات و و و.. فأسال الله ان يوفق جميع من يساندني ويشاركني فأنا لااستغني عنكم وانتم خير معين لي بعد الله. الطلبات شاشة دخول مميزة الشكل (عسكريه) بصلاحيات 02عند نقل او تقاعد اي شخص بمجرد كتابة (منقول) بخانةالرتبه الاخيره تنتقل كامل معلوماته في شيت اخر. 03 اريد الغاء القائمه المنسدله والبحث عن المطلوب حسب الرتبه عن طريق الازرار في الاعلى 04عند امر الطباعه كتابة العنوان حسب المطلوب (مثلا) العقداء عند الضغط على الزر تظهر في ورقة الطباعه بيان العمداء وهكذا دون اكتبها كل مره 05الطباعه فقط من (a) الى (k) حتى لو اضفت خانات اخرى من بعد (k) 06عند الادراج لشخص جديديكون الترتيب حسب الآتي: أ-الرتبه ب-تاريخ الترقيه ج-الرقم حاولت يكون عن طريق الاكسس البرنامج ولكن عجزت عند ادراج شخص يكون ترتيبه في الاخير وانا اريد حسب رتبته ومن ثم حسب تاريخ الترقيه ومن ثم الرقم واذا تساوو في تاريخ الترقيه يكون الاقدم حسب الرقم .. والله اني وعدت المسئول وتفلسفت لاني كنت اشتغل على الاكسس شي بسيط وعلى الاكسيل شي بسيط ايضا كما ترون ولكن وقفت الى هنا وعجزت واحسست ان العمل غير مرضي بالنسبة لي اما بالنسبه للمسئول فأنبسط بهذا وقدم الدعم النفسي بخطاب شكر من القائد فطمعت في المزيد بمساعدتكم ولمساتكم عسى الله لايعدمني منكم...ولكم خالص شكري وعرفاني لكم.. مثال.rar

جزاك الله خيراً كيف نحسب مرتبي لمعلم خريج 1981 وحصل على الدرجة الثانية عام 24/10/1994 وعلى الدرجة الاولى عام 1/5/2002 وعلى درجة مدير عام 1/7/2008 وحصل على علاوة تشجيعية في 28/5/2000 وفي 16/5/2007 وفي 7/6/2009 ولكم جزيل الشكر.

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

أداة تحويل صيغ المعادلات الى اكواد بالمرفقات ملف أداة تحويل صيغ المعادلات الى اكواد Convert__formulas2Code.rar