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

يمكنك استخدام فرز حسب النوع sort by type بالتوفيق

تفضل Vtext.zip

السلام عليكم ورحمة الله وبركاته النسخة تجريبية وبدون أكواد برامج المواقيت كثيرة وأكثر احترافية وفي كل جوال ولكن بين فترة وأخرى أحب أن أتحدى الأكسل وفي كل مرة يكسب التحدي ويبدى امكانياته الهائلة مواقيت الصلاة.xlsb

السلام عليكم و رحمة الله و بركاتة برنامج حساب الوزن من تصميمي حساب الوزن.xlsx

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

لا يوجد ملف مضغوط في هذه المشاركة غير ملف استاذ جعفر ؟؟؟؟؟؟؟؟ حاول ترفع الملف .

تفضل كليك يمين

تفضل مشروع كامل كلاس ومكتبة اذا تمكنت من صنع ما تريد .. لا تنسانا من نسخة scanPDF.rar

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

والسلام عليكم ورحمة الله وبركاته

مزامنة مع الاستاذ محمد لا اعلم اذا الحلين متشابهين .. lab2.rar

تفضل أخي محاولتي اتمنى تستفيد منها . DD402.accdb

شكرا أخي @Foksh 🙂 طبعا تم تأسيس التصميم على النقطة التي ذكرتها .. لأن كل رقم مخصص له خط واحد ، وحسب ملاحظتي للنمط الذي في الهاتف أنه لا يقبل المرور على نفس النقطة مرتين .. 🙂 لكن في عالم البرمجة كل شي ممكن ، ولو تتبعنا الأفكار اللامتناهية بحجم الكون وحاولنا تطبيقها كلها لن ننتهي أبدا أبدا .. 😁🖐 فاكتفيت بهذا القدر .. والله الموفق 😊🌼 ولك الحرية طبعا في تطوير الملف وتطبيق أفكارك الإبداعية فيه .. وتشاركنا إبداعاتك بالتأكيد 😉👌🏻

السلام عليكم وهذا خيار آخر Sub test2() Dim a, b Dim i&, ii& a = Cells(7, 1).Resize(Cells(Rows.Count, 1).End(xlUp).Row, 2) ReDim b(0 To UBound(a), 1 To 1) For i = 1 To UBound(a) If a(i, 1) & a(i, 2) <> "" And a(i, 1) <> 0 And a(i, 2) <> "" And a(i, 1) <> 0 And _ WorksheetFunction.IsNumber((a(i, 1))) Then b(ii, 1) = i: ii = ii + 1 Next Cells(7, 10).Resize(ii, 2) = Application.Index(a, b, Array(1, 2)) End Sub

عليكم السلام جرب المعادلة في الخلية B2 , اسحب نزولا ويسارا عسى يكون المطلوب =INDEX('1'!$A$1:$AN$74,MATCH($A2,'1'!$A$1:$A$74,0),MATCH($A$1:$AN$1,'1'!$A$1:$AN$1,0)) أو =INDEX('1'!$A$1:$AN$74;MATCH($A2;'1'!$A$1:$A$74;0);MATCH($A$1:$AN$1;'1'!$A$1:$AN$1;0)) حسب الإعدادات لديك تجربة (2).xlsx

وعليكم السلام خيار آخر Sub Test() Dim a Dim i& Application.ScreenUpdating = False a = Cells(7, 1).Resize(Cells(Rows.Count, 1).End(xlUp).Row, 2) With CreateObject("scripting.dictionary") For i = 1 To UBound(a) If a(i, 1) & a(i, 2) <> "" And a(i, 1) <> 0 And a(i, 2) <> "" And a(i, 1) <> "" And WorksheetFunction.IsNumber((a(i, 1))) Then If Not .exists(a(i, 1) & "|" & a(i, 2)) Then .Add a(i, 1) & "|" & a(i, 2), "" End If Next Cells(7, 5).Resize(.Count) = Application.Transpose(.keys) Application.DisplayAlerts = False Cells(7, 5).Resize(.Count).TextToColumns Destination:=Range("E7"), OtherChar:="|", FieldInfo:=Array(2, 1) End With Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub

وعليكم السلام ورحمة الله تعالى وبركاته تفضل اخي ربما هدا ما تقصد Option Explicit Sub Test() Dim i&, F&, K&, R&, lastrow& Dim Rng As Variant Dim Réf As Variant Dim DelRng As Range Dim sh As Worksheet: Set sh = Sheets("Sheet1") lastrow = sh.Columns("A:F").Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row Application.ScreenUpdating = False sh.Range("E7:F" & lastrow).ClearContents Rng = sh.Range("A7:B" & lastrow).Value ReDim Réf(1 To UBound(Rng, 1), 1 To UBound(Rng, 2)) F = 1 For i = LBound(Rng, 1) To UBound(Rng, 1) If Rng(i, 1) <> "" And Rng(i, 1) <> "الصافي" And Rng(i, 2) <> "" Then For K = LBound(Rng, 2) To UBound(Rng, 2) Réf(F, K) = Rng(i, K) Next K F = F + 1 End If Next i sh.Range("E7").Resize(F - 1, UBound(Réf, 2)).Value = Réf With sh For R = lastrow To 7 Step -1 'حدف العناوين 'If .Cells(R, "A").Value = "" Or .Cells(R, "B").Value = "" Or .Cells(R, "A").Value = "الصافي" Then If .Cells(R, "A").Value = Empty Or .Cells(R, "B").Value = Empty Then Set DelRng = .Range(.Cells(R, 1), .Cells(R, 2)) DelRng.Delete Shift:=xlUp End If Next R End With Application.ScreenUpdating = True End Sub 222222.xlsm

السلام عليكم ورحمة الله إذا كانت القيمة المراد تقريبها موجودة في الخلية A2 (مثلا) فيمكن استعمال المعادلة التالية (في أي خلية أخرى): =IF(MOD(A2;100)<=50;100*INT(A2/100);100*(INT(A2/100)+1)) أو =IF(MOD(A2,100)<=50,100*INT(A2/100),100*(INT(A2/100)+1)) والله أعلم

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

الملف مفتوح مواقيت الصلاة مفتوح.xlsb

وعليكم السلام ورحمة الله وبركاته موجودة أسماء المدن لكل دولة بس غريبة غير ظاهرة لديك هذا مثال لمدن مصر بالعربية والانجليزي

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

ماشاء الله تبارك الله عمل جميل ومتميز وشاهدت فيديو العرض كاملا وبكل صدق اعجبني العمل ربما تكون ملاحظتي على استخدام الالون لبعض الحقول وهي لا تعيب العمل وانما رأي شخصي مع تمنياتي لك بالتوفيق بخصوص تسعير العمل الاخوان @محمد أبوعبدالله و @alaa aboul-ela ماقصروا وكتبوا كل ماكنت اود قوله

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

السلام عليكم بالنسبة لتقييم البرنامج فهو ما شاء الله واضح انه متعوب عليه ولا ازيد على النقاط التي ذكرها استاذنا الفاضل اخي @kha9009lid بالنسبة لنقطة السعر سعر البرنامج يتوقف على عوامل كثيرة منها على سبيل المثال لا الحصر 1 - حاجة الزبون اليه (مثال : الصيدلية يختلف احتياجها عن السوبر ماركت للبرنامج ) 2 - هل البرنامج يغطي جميع ما يحتاجه الزبون ام لا ( احيانا تجد طلبات لم تخطر بالبال وهذه ما اكثرها ) 3 - المنافسة ( هل الزبون لديه خيارات غيرك ام لا ) 4 - خدمة ما بعد البيع بالسنبة للعميل ( هل يثق في وجودها ام لا - وما هي انواعها ) 5 - حالة الزبون المادية بالنسبة لمشروعه ( ضخم - متوسط - صغير ) والله اعلم