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

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

على الرغم ان السيد @sandanet وصلت الى النتيجة واعطاه السيد @jjafferr طرائق مختلفة بالاكواد و اخرى لكن ساضع هنا هذا الكود هم بيوفي الطلب وهو DoCmd.SetWarnings False DoCmd.RunSQL "DELETE DISTINCTROW tbl2.* FROM tbl1 INNER JOIN tbl2 ON (tbl1.degree = tbl2.degree) AND (tbl1.fullnames = tbl2.names);" DoCmd.SetWarnings True تحياتي للجميع

الــدرس الثاني : الجملة الشرطية ( IF ) تعتبر الجملة IF من أشهر الجمل الشرطية و أكثرها استعمالا في جميع لغات البرمجة ولها عدة صيغ كلها تبدأ بــIf و تنتهى بكلمة End If ما عدى صيغة واحدة. وتستخدم الجملة IF لتنفيذ عمليات معينة حسب شرط محدد, يعني إذا تحقق الشرط ينفذ و إلا فلا. طرق استعمال الجملة ((if: 1- الصيغة ( If –Then ) : - وصيغتها العامة : IF condition THEN statements - ومعنى هذه الصيغة : انه اذا تحقق الشرط (condition ) فسيتم تنفيذ الامر ( statements ) مثال : " مسن" IF age >=65 THEN category = 2- الصيغة ( If – Then – End If ) : صيغتها العامة : IF condition THEN statements1 Statements2 END IF تقوم هذه الصيغة بتنفيذ مجموعة من الاوامر اذا تحقق الشرط (Condition) بدلا من تنفيذ امر واحد. مثال : If age >= 25 Then category ="شباب" travail ="السن مقبول" End if 3- الصيغة ( If – Then – Else ) : صيغتها العامة : If condition Then statements1(التعليمات المنفذة في حال تحقق الشرط ) Else statements2(التعليمات المنفذة في حال عدم تحقق الشرط) End If - هذه الصيغة تنفذ مجموعة الأوامر (statements1 ) عندما يتحقق الشرط (condition ) و عندما لا يتحقق الشرط فإنها تنفذ مجموعة الأوامر (Statements2). مثال : If grade >= 50 Then Text1 ="ناجح" Else Text1 ="راسب" End If 4- الصيغة ( If – Then –ElseIf ) : - صيغتها العامة : If condition1 Then statements1( التعليمات المنفذة في حال تحقق الشرط الأول) ELSEIF condition2 THEN statements2(التعليمات المنفذة في حال عدم تحقق الشرط الأول و تحقق الشرط الثاني) ELSE statements2(التعليمات المنفذة في حال عدم تحقق جميع الشروط السابقة) End If مثال : If grade >= 90 Then Text1 ="ممتاز" ElseIf grade >= 80 Then Text1 ="جيد جدا" ElseIf grade >= 70 Then Text1 ="جيد" ElseIf grade >= 60 Then Text1 ="مقبول" Else Text1 ="راسب" End If ملاحظات: - في الصيغة الأخيرة ( If – Then –ElseIf ) اذا تحقق احد الشروط فان البرنامج ينفذ العملية ثم يذهب الى نهاية الجملة و لا يتحقق من الشروط الباقية. - في حالة أردنا إستعمال شرطين معا أو أكثر نستعمل العبارة And. - في حالة أردنا تحقق أحد شرطين ليتم تنفيذ العملية نستعمل Or

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

والف تحية لك استاذ @محمدنجار وشكرا لك على المساعدة

IsDate: تستخدم هذه الدالة لفحص ما إذا كان المتغير الممرر لها تاريخ أم لا حيث تعيد true إذا كان المتغير تاريخاً و تعيد false إذا لم يكن تاريخاً. IsDate(«تعبير») IsDate("12/03/2017")=True IsDate("أوفيسنا")=False Now: تستخدم هذه الدالة لإستخراج تاريخ و وقت النظام الحاليين. Now() و تكون النتيجة بالشكل التالي: 15-03-2017 10:18:15 Time: تستخدم هذه الدالة لإستخراج وقت النظام الحالي. Time() و تكون النتيجة بالشكل التالي: 10:18:15 Timer: تستخدم هذه الدالة لإستخراج عدد الثواني منذ منتصف الليل. Timer() MonthName: تستخدم هذه الدالة لإرجاع اسم الشهر المحدد . MonthName(«اختصار», «شهر») MonthName(3,True)="مارس" MonthName(8)="أوت" TimeSerial: تستخدم هذه الدالة لإرجاع متغير من نوع تاريخ يحتوي على الوقت لساعة و دقيقة و ثانية محددة. TimeSerial(«ثانية», «دقيقة», «ساعة») TimeSerial(10, 56, 13)=10:56:13 Weekday: تستخدم هذه الدالة لإرجاع متغير "عدد صحيح" يمثل رقم اليوم في الأسبوع. Weekday(أول أيام الأسبوع, التاريخ) Weekday("15/3/2017", vbSunday)=4 WeekdayName: تستخدم هذه الدالة لإرجاع اسم اليوم المحدد من الأسبوع. WeekdayName(«أول أيام الأسبوع», «اختصار», «يوم من الأسبوع») WeekdayName(3, True, vbSunday)="الثلاثاء" و هذه هي القيم المستعملة لتحديد أول أيام الأسبوع: vbUseSystem سيتم استخدام إعدادات النظام vbSunday يمثل يوم الأحد vbMonday يمثل يوم الاثنين vbTuesday يمثل يوم الثلاثاء vbWednesday يمثل يوم الأربعاء vbThursday يمثل يوم الخميس vbFriday يمثل يوم الجمعة vbSaturday يمثل يوم السبت

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

السلام عليكم شوف نكدر بواسطة ذاك الكود بنعمل اي اطار مربعات ما نريد وتكدر تتغير بكيفكم Database2.rar

بسم الله الرحمن الرحيم في موضوع أريد برنامج لشركة نقليات للاخ احمدالمصري على الرابط http://www.officena.net/ib/index.php?showtopic=46765&hl= طلب مني الاخ برنامج خاص بشركة نقل وقد اتممته بفضل الله وحمده واردت طرحه في المنتدى لتعميم الفائدة اسم المستخدم 123 الباسوورد 123 وكل ماهو مغلق 123 ارجو ان ينال اعجابكم تقبلو تحيات اخوكم في الله شوقي ربيع برنامج تسيير شركات النقل الصفيرة.rar

اليك حل لنقطة ثانية غدا ان شاء الله راح اشرح لك بالتفصيل اتفضل مع شرح بسيط عملنا استعلام كيو3 لكي يظهر الاسماء اللي في كلا من جدولين وهذا هو كود استعلام كيو 3 SELECT الرئيسي.[الاسم الكامل], الرئيسي.الرتبة, الرئيسي.[تاريخ اخر ترقية] FROM Tarqia INNER JOIN الرئيسي ON Tarqia.[الاسم الكامل] = الرئيسي.[الاسم الكامل]; وبعدين عملنا استعلام اخر لكي يظهر الاسماء اللي في جدول الترقية ومش موجود في استعلام كيو3 وهذا كود الاستعلام الثاني SELECT Tarqia.[الاسم الكامل], Tarqia.الرتبة, Tarqia.[تاريخ اخر ترقية] FROM Tarqia LEFT JOIN q3 ON Tarqia.[الاسم الكامل] = q3.[الاسم الكامل] WHERE (((q3.[الاسم الكامل]) Is Null)); اذا ما فهمت مني غدا ان شاء الله راح اشرح لك بالتفصيل مثال.rar

اتفضل خذا هذا الاستعلام UPDATE Tarqia INNER JOIN الرئيسي ON Tarqia.[الاسم الكامل] = الرئيسي.[الاسم الكامل] SET الرئيسي.الرتبة = [Tarqia]![الرتبة], الرئيسي.[تاريخ اخر ترقية] = [Tarqia]![تاريخ اخر ترقية]; وبالنسبة نقاط 2 في الحقيقة مافي شي في مخي لكي اعمله لانو لازم بيكون حقل بيكون يساوي حقل اخر اذا الاسم بيكون مخالف عن الاسم الجدول هذه الطريقة ما يفي بالغرض الا اذا كان بينهما حقل بيكون مساوى ولكن اظن ان استاذنا @jjafferr سيفتح لنا طريق تحياتي مثال.rar

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

اتفضل ما تريد اخي @وضاح النوبه غير مسموح للعميل بالتجاوز للحد المسموح له.rar

السلام عليكم جرب هذا: Private Sub Worksheet_Change(ByVal Target As Range) Dim ict1 As Range Set ict1 = Intersect(Target, Range("A3:A5, D9:D50, G9:G50, R9:R50")) If ict1 Is Nothing Then Exit Sub With Application .EnableEvents = False .Undo .EnableEvents = True End With End Sub

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

الله اكبر انا مش مستحق لكل هذا الكلام اخي هذا واجبنا تحياتي

واخيراً اتفضل هذا ارفق اي عدد تريد من المرفقات و اي نوع تريد وافتحه مباشرتا خارج القاعدة تحياتي اضافة عدة مرفقات لموظف واحد وفتح المرفق.rar

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

تفضل .. اسف يجب علي الخروج الان ... مساءا اكون في خدمتك .. Maint Car System_up.rar

السلام عليكم ورحمة الله وبركاته اساتذتى فى هذا الصرح العظيم . الساده اعضاء اوفيسنا موضوع اليوم هو استخدام دالة VLOOKUP فى البحث عن قيمه معينه فى مجموعة صفحات بشكل بسيط وسهل فقد رايت استخدامات مشابهه ولكن كانت بشكل اصعب . والان اقدمها لكم بشكلها البسيط وعلى فكرة انا اعشق هذه الداله ارجوكم لاتنسونى فى دعاؤكم اترككم مع الملف والمثال العملى vlookp.rar

الاستاذ الفاضل / ابو عصام السلام عليكم اعتقد ان طلب سيادتكم بعيدا عن انواع الحماية " مجرد إعتقاد" ولكن فى العموم جرب المرفق التالى وهو أحد إبداعات الاستاذ الكبير والاخ الفاضل / ياسر خليل " ابو البراء" وستجد الكثير من الموضوعات التى تتحدث عن انواع الحماية http://yasserkhalilexcellover.blogspot.com.eg/2016/09/kill-workbook-from-hd.html شاكر فضلك *** وجزاكم الله خيرا

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

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

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

سؤال : هل تريد ان يغير فقط الرتبة ام تاريخ الترقية و الخ ... اذا تريد ان يغير فقط الرتبة اليك هذا الحل لكن اعرف انك تريد ان يغير التاريخ الترقية ايضا و كم من الحقول اخر لكن ما اعرف اي حقول لذا اتفضل مع هذا الاستعلام يوفي بالغرض اولا عملت جدول اخر باسم الترقية وشوف المرفق راح تعرف غير الرتبة في جدول الترقية و افتح الاستعلام وشوف الجدول الرئيسي واليك الاستعلام تحديث UPDATE Tarqia INNER JOIN الرئيسي ON Tarqia.[الاسم الكامل] = الرئيسي.[الاسم الكامل] SET الرئيسي.الرتبة = [Tarqia]![الرتبة]; مثال.rar

::: تفضل ان كنت فهمت مرادك .. بالتوفيق .... تحية للاستاذ شفان. 003-2.rar

Dim x As String x = TextBox2 x.Text = "أكتب رقم جديد" Range("A2").Select Range("A1:F20").Select Selection.copy Sheets.Add.Name = x Range("A1:F20").Select ActiveSheet.Paste Application.cutcopymod.false

افتح نموذج في وضع تصميم وفي حدث الحالي اكتب هذا في اول او في الاخر الكود اللي فيه Option36_AfterUpdate تحياتي

نعم استخدم هذا الكود Dim i As Integer Dim co As Integer co = DCount("*", "[qe]") DoCmd.GoToRecord , , acFirst For i = 0 To co - 1 DoCmd.SetWarnings False DoCmd.RunSQL "UPDATE ÇáÑÆíÓí SET ÇáÑÆíÓí.ÇáÑÊÈÉ = [Forms]![Frm2]![Text3] WHERE (((ÇáÑÆíÓí.[ÑÞã ãÚÑÝ])=[Forms]![Frm2]![ÑÞã ãÚÑÝ]))" DoCmd.SetWarnings True DoCmd.RefreshRecord DoCmd.GoToRecord , , acNext Next استعلام تحديث.rar

السلام عليكم شوف التعديل البسيط ده فى رقم المورد يمكن يلبي طلبك اسم المورد.rar

شكرا استاذ صالح للشرح والتوضيح ربي يوفقك لكل خير

وما هو الحال لشهر 1 و 2 و 14 يوم من شهر 3 لهذه السنة هل ما يحسبه

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

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

شوف عذا الرابط فيه ماتريد تحياتي

وجدتها من خلال الكود التالي : For i = 0 To DeleteList.ListCount - 1 If DeleteList.Selected(i) = True Then strName = strName & vbCrLf & _ DeleteList.Column(1, i) & vbCrLf & _ MyAndLT End If Next strName = Left(strName, Len(strName) - Len(MyAndLT)) If Me.DeleteList.ItemsSelected.Count = 1 Then If MsgBox("ÇäÊ ÈÕÏÏ ÍÐÝ ÇáãæÙÝ " & vbCrLf & _ strName & vbCrLf & _ "åá ÇäÊ ãÊÃßÏ ãä Çäß ÊÑíÏ ÍÐÝ åÐÇ ÇáãæÙÝ ?", vbCrLf & _ vbYesNo + vbMsgBoxRtlReading + vbMsgBoxRight + vbQuestion, "ãÍÇæáÉ ÍÐÝ ãæÙÝ ") = vbNo Then Exit Sub If Me.DeleteList.ItemsSelected.Count > 1 Then If MsgBox("ÇäÊ ÈÕÏÏ ÍÐÝ ÇáãæÙÝíä " & vbCrLf & _ strName & vbCrLf & _ "åá ÇäÊ ãÊÃßÏ ãä Çäß ÊÑíÏ ÍÐÝ åÄáÇÁÇáãæÙÝ ?", vbCrLf & _ vbYesNo + vbMsgBoxRtlReading + vbMsgBoxRight + vbQuestion, "ãÍÇæáÉ ÍÐÝ ÇßËÑ ãä ãæÙÝ ") = vbNo Then Exit Sub strSQL = "DELETE FROM tblShiftEmploDetils WHERE DetailID IN (" & strSet & ")" CurrentDb.Execute strSQL

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

الحمد لله ،،،

وعليكم السلام تفضل جعفر

الدرس الثالث: الدالة Select Case تشبه الدالة Select Case إلى حد كبير الدالة If و لكنها تختلف عنها بالتعدد أي أنها تكون في الشروط المتعددة. طريقة الاستعمال: الصيغة الأولى: Select Case Expression Case Expression_1 Statement_1 Case Expression_2 Statement_2 Case Expression_n Statement_n End Select تقوم الدالة Select Case باختبار حالة الكائن أو المتغير Expression و مقارنتها أو مطابقتها مع الحالات الموجودة بداخلها. و عند تحقق الشرط مع إحدى الحالات يقوم البرنامج بتنفيذ التعليمة Statement التابعة لهذه الحالة. و عند عدم مطابقة الكائن أو المتغير لجميع الحالات فإن البرنامج لا يعطينا أي نتيجة. مثال1: كتابة الأرقام من 1 إلى 4 بالحروف Select Case me.le_nombre Case 1 Me.y = "واحد" Case 2 Me.y = "إثنان" Case 3 Me.y = "ثلاثة" Case 4 Me.y = "أربعة" End Select أضفنا مربع نص اسمه le_nombre لإدخال الأرقام و مربع نص اسمه y من أجل ظهور النتيجة. الصيغة الثانية: Select Case Expression Case Expression_1 Statement_1 Case Expression_2 Statement_2 Case Expression_n Statement_n Case Else Other_statement End Select في هذه الصيغة عند عدم تحقق الشرط مع جميع الحالات يتم إرجاع التعليمة الإستثنائية Other_statement مثال2: نفس المثال الأول Select Case me.le_nombre Case 1 Me.y = "واحد" Case 2 Me.y = "إثنان" Case 3 Me.y = "ثلاثة" Case 4 Me.y = "أربعة" Case Else me.y = "هذا الرقم غير موجود" End Select هذا عندما نضيف أي رقم يختلف عن 1 أو 2 أو 3 أو 4 يطبع لنا "هذا الرقم غير موجود" مثال 3: برنامج كتابة ملاحظات التلاميذ حسب الدرجة Select Case Me.Degre Case 0 To 30 Me.y = "ضعيف" Case 30 To 49 Me.y = "دون الوسط" Case 50 To 69 Me.y = "مقبول" Case 70 To 89 Me.y = "جيد جدا" Case 90 To 100 Me.y = "ممتاز" Case Else Me.y = "هذه الدرجة خاطئة" End Select هنا إستخدمنا To معناه إلى مثلا: من 0 إلى 30

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

الجزء الاول : تعريف بالدالة INDIRECT وهى من دوال البحث والمراجع فى الاكسيل ومن اسم الداله INDIRECT الغير مباشره هى تعرض محتوى خليه بناء على اسم مرجع معين يكتبه المستخدم فى شكل نصى وتتكون من وسيطين .... بداخل الرابط فى المدونه وفيديو على اليوتيوب تفاصيل اكثر انتظروو ان شاء الله الموضوعات القادمه ------ هذا ومن كان من توفيق من الله وماكان من خطا او نسيان او ذلل لسان فمنى ومن الشيطان ------ برجاء مشاركة الجميع (زكاة العلم نشره) ولاتنسونا بصالح دعاؤكم خبير اكسيل Mohamed Elrify -------------------- رابط المدونه http://excelfinancial1.blogspot.com.eg/2016/12/indirect.html -------------------- رابط الفيديو على اليوتيوب https://youtu.be/YaufG1poucc

السلام عليكم ورحمة الله وبركاته اليكم هذه الصيغ المتقدمة فى الاكسيل - دمج عمودين فى عمود واحد -تحويل عمود الى صف والعكس -تحويل عمود الى جدول والعكس ولاتنسونا بصالح دعاؤكم رابط مدونة صيغ دمج وتحويل - Copy.rar

السلام عليكم ورحمة الله وبركاته زكاة العلم نشره تاريخ صلاحية انتهى او تاريخ استحقاق انتهى واردت ان يظهر امامك مشطوب فى هذه الحاله نعرض عليكم الطريقة واتمنى .ان تفيدكم رابط الموضوع على مدونة خبير اكسيل http://excelfinancial1.blogspot.com.eg/2016/04/blog-post_15.html شطب(1).rar

تفضل ربما كان المطلوب انشاء_قائمه_منسدله_في_كل_خليه salim.rar

مجموعه من اعمال الاكسيل التى وفقنى الله فى تقديمها عام 2015 . نسال الله ان يتقبل منا ومنكم صالح الاعمال . تقبلوا تحياتى Mohamed Elrify . ----------------------------------------------------------------------- مكتبة اكسيل باللغه العربيه http://download-pdf-ebooks.net/49-1-library-books برامج مصممة بالاكسيل ------------------------------------------------------------------------ برنامج المصروفات الاصدار الثالث http://www.mediafire.com/…/%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D… ملف اكسيل حسابات عامه من قيود اليومية وحتى الميزانية http://www.mediafire.com/…/%D9%85%D9%84%D9%81+%D8%A7%D9%84%… اداره حسابات تكاليف مشاريع المقاولات (احمد هلال) http://www.mediafire.com/…/%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D… اعداد المقايسة التقديرية لعملية مقاولات (احمد هلال) http://www.mediafire.com/…/%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D… برنامج احتساب اجور العماله في شركات المقاولات (احمد هلال) http://www.mediafire.com/…/%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D… اعداد قائمة التدفقات النقدية بالطريقة الغير مباشره ل 4 فترات او سنوات بالاكسيل http://www.mediafire.com/…/%D8%A7%D8%B9%D8%AF%D8%A7%D8%AF_%… برنامج توزيع فئات النقديه http://www.mediafire.com/download/r07i8zmae6hu67c/TRUNK.xlsx جدول اعمار الديون http://www.mediafire.com/…/%D8%AC%D8%AF%D9%88%D9%84+%D8%A7%… دفتر الحضور بالاكسيل http://www.mediafire.com/…/%D8%AF%D9%81%D8%AA%D8%B1+%D8%A7%… صيغ متقدمة ------------------------------------------------------------------------ ابجدة الاسماء بالمعادلات http://www.mediafire.com/…/%D8%A7%D8%A8%D8%AC%D8%AF%D8%A9+%… الداله FORCAST والداله TREND http://www.mediafire.com/…/%D8%A7%D9%84%D8%AA%D8%A8%D8%A4%D… دالة عد الاسماء بدون تكرار http://www.mediafire.com/…/%D8%B9%D8%AF+%D8%A7%D9%84%D8%A7%… دالة HYPERLINK http://www.mediafire.com/…/%D8%AA%D8%B9%D9%84%D9%85+%D8%AF%… انشاء مخطط تكرارى بالمعادلات. بدون انشاء رسم بيانى http://www.mediafire.com/…/%D8%A7%D9%86%D8%B4%D8%A7%D8%A1+%… دالة VLOOKUP بشرطين http://www.mediafire.com/…/%D8%AF%D8%A7%D9%84%D8%A9+VLOOKUP… الترقيم التلقائى بالاكسيل http://www.mediafire.com/…/%D8%AA%D8%B1%D9%82%D9%8A%D9%85+%… القيمة المستقبلية fv http://www.mediafire.com/download/14it43a76cnc7qj/fv.rar الداله LARGE و SMALL http://www.mediafire.com/…/%D8%A7%D9%84%D8%AF%D8%A7%D9%84%D… صيغه تقريب الربع الى اقرب واحد صحيح http://www.mediafire.com/…/%D8%AA%D9%82%D8%B1%D9%8A%D8%A8+%… دالة TRUNK http://www.mediafire.com/download/r07i8zmae6hu67c/TRUNK.xlsx الرصيد التراكمى بشرط http://www.mediafire.com/…/%D8%A7%D9%84%D8%B1%D8%B5%D9%8A%D… استخراج البيانات او القيم بدون تكرار بخمس طرق مختلفه http://www.mediafire.com/…/%D8%A7%D8%B3%D8%AA%D8%AE%D8%B1%D… توليد سلسلة تواريخ http://www.mediafire.com/…/%D8%AA%D9%88%D9%84%D9%8A%D8%AF+%… استخدام دالة VLOOKUP , INDIRECT فى البحث فى العديد من الصفحات http://www.mediafire.com/downl…/oq5dho0m1ykq85o/vlookp_2.rar استخراج بيانات بشروط http://www.mediafire.com/…/%D9%85%D8%B9%D8%A7%D8%AF%D9%84%D… دالة الجمع الشرطى من صفحات متعدده http://www.mediafire.com/…/%D8%A7%D9%84%D8%AC%D9%85%D8%B9+%… المجموع الفرعى بشرط http://www.mediafire.com/…/%D8%A7%D9%84%D9%85%D8%AC%D9%85%D… استخراج اى رقم سواء فى بداية او وسط او نهاية سلسله نصيه http://www.mediafire.com/…/%D8%A7%D8%B3%D8%AA%D8%AE%D8%B1%D… التقريب لاقرب 10 جنيها http://www.mediafire.com/…/%D8%A7%D9%84%D8%AA%D9%82%D8%B1%D… حالة عملية لدالة VLOOKUP فى تحديد سعر صنف ضمن مجموعة اسعار لهذا الصنف http://www.mediafire.com/…/%D8%A7%D8%B3%D8%AA%D8%AE%D8%AF%D… البحث عن اخر قيمة او نص فى عمود او فى صف حتى مع وجود فراغات http://www.mediafire.com/…/%D8%A7%D8%AE%D8%B1+%D9%82%D9%8A%… استخدام الداله max , min بشرط http://www.mediafire.com/…/%D8%AF%D9%88%D8%A7%D9%84+MAX+%2C… البحث عن اخر سعر بناء على شروط كاسم الصنف او المنتج والعميل http://www.mediafire.com/…/%D8%A7%D8%AE%D8%B1+%D8%B3%D8%B9%… تنسيق الارقام السالبة باللون الاحمر ووضعها بين قوسين http://www.mediafire.com/…/%D8%AA%D9%86%D8%B3%D9%8A%D9%82+%… حالة عملية متقدمه باستخدام الدالة VLOOKUP , MATCH , IFERROR https://www.youtube.com/watch?v=G5QV4V3OOt0 معامل الارتباط http://www.mediafire.com/…/%D9%85%D8%B9%D8%A7%D9%85%D9%84+%… دالة عد الالوان https://www.facebook.com/…/61…/%D8%A7%D9%8A%D9%85%D9%86.xlsm معادلة للتعامل مع التواريخ الهجريه http://www.mediafire.com/…/7e…/%D9%87%D8%AC%D8%B1%D9%89.xlsx المعادلة frequency https://www.facebook.com/download/441176896082998/aaa.xlsx مخططات استخدام الصور فى الرسم البيانى http://www.mediafire.com/…/%D8%A7%D8%B3%D8%AA%D8%AE%D8%AF%D… مخطط بيانى لعرض البيانات الربع سنوية http://www.mediafire.com/download/39owukjsxx4nz41/CHART.xlsx موضوعات ------------------------------------------------------------------------ طريقة عمل نسخه احتياطية من ملف اكسيل https://www.youtube.com/watch?v=1xHS1snXRKs تحليل التعادل بالاكسيل 4 http://www.mediafire.com/…/%D8%AA%D8%AD%D9%84%D9%8A%D9%84+%… تحديد نقطة التعادل في حالة تعدد المنتجات http://www.mediafire.com/…/%D8%AA%D8%AD%D8%AF%D9%8A%D8%AF-%… أدوات التحليل ماذا لو ؟ pdf http://www.mediafire.com/…/%D8%A7%D8%AF%D9%88%D8%A7%D8%AA+%… أدوات التحليل ماذا لو ؟ excel file http://www.mediafire.com/…/%D9%85%D9%84%D9%81%D8%A7%D8%AA+%… فنون وأساليب التنبؤ بالاكسيل فيديو + pdf +excel files https://www.youtube.com/watch… ميزه وخاصية ممتازه وهى Flash Fill (تعبئة سريعة) https://www.youtube.com/watch?v=OZyrmcInZLU الجديد فى اكسيل 2016 http://www.mediafire.com/…/6vda4ed2a27qf…/New+EXCEL+2016.rar وفى النهاية نسال الله ان يعيننا على الاستمرار وان يوفقنا للخير صفحة خبير اكسيل صفحتى على الفيس بوك

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

كل ما ذكره الاستاذ بعاليه يسري علي قاعدة بيانات بصيغة mde 2003 اما بعد تعدد اصدرات الاكسس 2007 و 2010 و 2013 اصبح التشفير اقوي تشفير عكسي وحتي الان لم اجد شخص قام بتحويل قاعدة بيانات بصيغة accde بل ازيد واقول لم ولن يستطيع احد ان يعيد قاعدة بيانات بصيغة accde غير ميكروسوفت فقط واتحدي كان في الماضي علي اصدار اكسس 2003 يمكن فعل اي شئ من الوصول للتصميم النموذج الي الاكواد.. الخ اما الان لا مايكروسوفت فقط + الاستاذة زهرة بالتوفيق

السلام عليكم تفضل المرفق كشف حساب.rar

أحسن و افضل حل لمعادلة التفقيط في اكسل 2010 فى برنامج EXCEL الكثير منا يحتاج الى تفقيط مبلغ معين (من الأرقام الى الحروف) سواء باللغة العربية أو الإنجليزية ولا يوجد معادلة جاهزة داخل البرنامج لتنفيذ ذلك ولكن يمكن عمل ذلك واليكم الطريقة طريقةإستخدام معادلتى التفقيط لأى مبلغ باللغة الإنجليزبة أوالعربية:- 1- أبحث عن الـFolder المسمى XLSTART عل ى جهاز الكمبيوتر الخاص بك وغالبا ستجده فى program files وداخل Microsoft office 2- أنسخ الملفين الموجودين داخلالفولدر المسمى معادلة التفقيط (فى المرفقات) وهما Copy of Copy of EHAB و Copy of Copy of PERSONALوضعهما داخل الفولدر المسمى XSTART السابق الإشارة اليه فى الخطوة رقم1 3- انت الأن جاهز لإستخدام المعادلات 4- لاستخدام المعادلة داخل أى Excel sheet كالأتى إذهب الى الخلية التى تريد ان تكتب داخلها التفقيط وأذهب الى Formula tab واضغط على الأيقونة Insert function وفى المكان المخصص لـ Or select a category إختار User Defined بعدها ستجد المعادلات المطلوبة , إختار المعادلة المطلوبة إذا كانت باللغة العربية أو الأنجليزية وستظهر فى الخلية التى أنت واقف عليها وإختار الخلية الى بها الأرقام المطلوب تفقيطها وأضغط Enter ستجد المبلغ بالحروف المطلوبة مع تحياتىمعادلة التفقيط.rar