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

في المرفق بها جدولين في الجدول Tbl1 بها مرفق داتابيس من نوع accdb قم بفتحه وغير ما تريد فيه

فهرس دورة الأورانج تحميل تطبيق أورانج تطبيق أورانج لتحليل البيانات - الدرس الأول تطبيق أورانج لتحليل البيانات - الدرس الثاني تطبيق أورانج لتحليل البيانات - الدرس الثالث

برنامج المخزون و الفواتير الشامل .... الاصدار الثالث اكسيل 2007 - اكسيل 2010 اليوم بمشيئة الله هو الانطلاق الرسمى لهذة النسخه وبعد انتهاء مرحلة التجربة التى دامت اكثر من شهرين خطوات استخدام البرنامج لأول مره تسجيل البيانات الجديدة داخل البرنامج لعمل فواتير البيع و الشراء و الحركات المالية 1- تسجيل اسماء مناديب البيع وهى خطوه مهمه مطلوبة لتسجيل اسم عميل جديد 2- تسجيل و ادخال العملاء (يتم ربط كل عميل باسم مندوب) 3- تسجيل و ادخال الموردين 4- تسجيل و ادخال اسماء لفئة الصنف وهى خطوه مهمه مطلوبة لتسجيل صنف جديد 5- تسجيل و ادخال الاصناف (ولابد من وجود فئة مدخله مسبقا لكى تستطيع ادخال الصنف) 6- ولا تنسى تسجيل رصيد اول المده فى شاشة البيانات و الجرد الجديد فى هذا الاصدار * واجهة تطبيقية كاملة * برنامج كامل مخزون فواتير ذمم عملاء وموردين واستحقاقات خلال الفترات الزمنية المختلفة * اختصارات سريعة لتنفيذ العمليات و التقارير بسرعة عالية * كشف حساب بطريقة جديدة بمعنى نفترض انه هناك عميل ما علية مديونية بفيمة 15000 فالبرنامج يعطيك كشف حساب تفصيلى للمديونية المستحقة خلال فترات 30 يوم 60 يوم 90 يوم و اكثر من 90 يوم فمثلا فى المثال السابق يكون استحقاق المديونية على حسب فواتير العميل مستحق فى 30 يوم 3000 وفى 60 يوم 6000 وفى 90 يوم 4000 و فى اكثر من 90 يوم 2000 فيكون اجمالى المديونية هم ال 15000 لكن الاستحقاق فى فترات مختلفه وهذا الكشف يفيد كل من يتعامل بالاجل لمعرفة المستحق خلال الفترة التى يريدها وعندما يقوم العميل بسداد جزء من المستحق يتم خصمه من المديونية القديمه بمعنى ان العميل فى المثال السابق قد قام بسداد 1500 فيتم خصمها من ال 2000 وهى مديونية الاكثر من 90 فيصبح كشف حسابة كالتالى مستحق فى 30 يوم 3000 وفى 60 يوم 6000 وفى 90 يوم 4000 وفى اكثر من 90 يوم 1500 فيكون اجمالى المديونية هم ال 13500 * شاشة فواتير جديده تحوى الكثير و الكثير من الاختصارات للعملاء و الاصناف وتوصلك الى عدة تقارير بضغطة زر واحده عرض معلومات عن الصنف و رصيده الحالى داخل المستودع و اخر سعر شراء بمجرد اختيارك للصنف وادخاله داخلة الفاتوره سهولة الغاء وتعديل الصنف داخل الفاتورة عن طريق الدبل كليك ذهاب مباشره الى تقرير صنف معين بمجرد اختياره وضغط تقرير الصنف اكتشف المزيد............ *شاشة لتقرير المديونية خلال الفترات الزمنية المختلفة يجب عليك قراءة ومراجعة شرح البرنامج جيدا حيث توجد العديد و العديد من الاختصارات السريعة التي تنقلك من شاشة الى اخرى بسرعه عالية ولتوفير وقتك داخل البرنامج. كما توفر لك سرعة الحصول على المعلومة المطلوبة. * لتحميل نسخة من الشرح وهى عبارة عن ملف تنفيذي اضغط على الرابط التالى شرح برنامج المخزون و الفواتير الشامل( ملف تنفيذى... 6MB رابط خارجى على موقع ميديا فاير) * او الذهاب الى موضوع شرح البرنامج و مناقشات مشرفى و اعضاء المنتدى داخل المنتدى على الرابط التالى شرح برنامج المخزون و الفواتير الشامل(مشاركة داخل المنتدى) كما احببت ان اقدم مناقشة ونصائح مديري و اعضاء المنتدى للبرنامج لكى يستفيد منها الجميع وهذه المواضيع تم مناقشتها في موضوع شرح البرنامج داخل المنتدى انظر المشاركة التالية لمشاهدة النصائح و المناقشات حول البرنامج واخيرا اقدم لكم البرنامج حجم البرنامج 1.2 MB اختر اسم المستخدم المدير كلمة السر 123 محرر الاكواد 85211 لاتترد فى الاستفسار عن اى شيى داخل البرنامج ضع مشاركتك وسوف يتم الرد عليها كما يمكن مراسلتى على الايميل التالى amroomo@gmail.com اخيرا اتمنى ان يكون هذا البرنامج اضافة الى برامج المخزون و الفواتير وتغيير مسارها على الاكسيل فهذا العمل جديد بكل المقاييس فى افكاره التى اتمنى ان اكون قدمتها بصورة جيدة ويستقيد بها الجميع وَقُلْ رَبِّ زِدْنِي عِلْمًا ========================================================= المرفق المحدث الاخير: SIS 3.152 (Add City).rar

السلام عليكم ورحمة الله كود بسيط لمنع تكرار رقم السند ونوعه في نفس السنة اوفي نفس الشهر وهكذا مثلا اريد ان افتح على شاشة الفواتير اولا اعمل استعلام جديد لنفرض اسمهqq7 بجدول الحركات التي يتم ترحيل الفواتير والقيود اليها نجلب في الاستعلام حقول رقم السند ونوعه والتاريخ نفرض ان حقل التاريخ قي جدول الحركات اسمه date وحقل رقم السند اسمه number ونوع السند اسمهtype نضع عمود جديد في الاستعلام اذا اردنا عدم التكرار في السنة الواحدة Year: Format([Date],"yyyy") واذ اردنا عدم التكرار في الشهر الواحد Year: Format([Date],"yyyymm") نذهب لىشاشة الفواتير وضع في حقل رقم الفاتورة بعد التجديث Dim I As Integer I = DCount("number", "qq7", "Year = " & Format(Me!date.value, "yyyy") & "" & " and [type]='" & "فاتورة" & "'" & " and [number]=" & Me.number.value) If I > 0 Then MsgBox "هذا الرقم مكرر في نفس السنة ونفس نوع السند !! اختر رقما آخر" Undo Exit Sub ولاقتراح رقم السند للمستخدم Me.Text7 = Nz(DMax("number", "qq7", "Year = " & Format(Me!date.value, "yyyy") & "" & " and [type]='" & "فاتورة" & "'"), 0)

السلام عليكم تقصد شرح معادلة التسمية MinV والتي هي: =SMALL(شيت!$A:$A;1+COUNTIF(شيت!$A:$A;0)) هذه المعادلة تحدد أصغر قيمة في العمود A من شيت "شيت" غير المعدومة (بمعنى آخر القيمة الأكبر مباشرة من قيمة الصفر المتكررة في هذا العمود)... بن علية حاجي

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

السلام عليكم ورحمة الله انسخ هذا الكود و الصقه فى موديول وخصص له زر Sub NumeicData() Application.ScreenUpdating = False For i = 4 To Range("N" & Rows.Count).End(xlUp).Row If Cells(i, "B") = "الإســـــــــم /" Then p = p + 1 Cells(i, "Q") = 1000 + p Else Cells(i, "Q") = "" End If Next Application.ScreenUpdating = True End Sub

بارك الله فيك وجزاك الله خير اخي ابا ياسين

اخي الكريم الضريبه المضافه 5% تقدر تعمل الاجمالي Me.الضريبه= Me.الاجمالي * (0.05)

:: نعم يمكن ذلك بواسطة ... Tap Control

والله يا اخي برمجيا انا ضعيف في الاكواد ولكن الاخ جعفر ان شاء الله ما بيقصر

هذا معنها السعر يساوي اسم الصنف

مين ليه غير يا شفان برافو عليك

سلمت يداك اخي فكرة ممتازه

السلام عليكم ورحمة الله لا تترك اى مسافات بين هامش الخلية و بين علامة "=" اعد كتابة المعادله و ستصل الى النتيجة المرجوة باذن الله

السلام عليكم عليك تغيير "تنسيق الرقم" في الخلية إلى التنسيق "Standart" وظهرت النتيجة بهذا الشكل لأن التنسيق في الخلية هو "رقم عشري" بـ 16 منزلة (رقم عشري) بعد الفاصلة... والله أعلم

السلام عليكم ورحمة الله وبركاته اخي الكريم لابد ان تعرف ان هناك اولويات في عملية الحساب في برنامج اكسيل او مفهوم اكسيل في عمليات الحساب - ينفذ برنامج اكسل العمليات الحسابية بالترتيب الأتى:1- الأقواس ( )2- الأسس ^3- الضرب والقسمة * / (والألوية لمن يأتى على اليسار أولا)4- الجمع والطرح + - (والأولوية لمن يأتى على اليسار أولا)

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

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

وعليكم السلام اذا تركت الاكسس يختار تصاميم وازرار والوان الوندوز ، فهذا ما ستحصل . جعفر

آسف أخي حربي العنزي فالملف لا يدعم صيغة mdb لأن به حقول من نوع مرفقات

نعم لكن هذا يعود لخصائص نموذج من قبل ان افكر في هذه الطريقة كان جربت كم طرائق لكن وحينئذ انا غيرت خاصية النموذج قفل السجل اي ( Record Locks ) يساوي All Records تم تغير الى No Locks والان مافی المشکلە enbld.rar

المتصفح الذي كنت استعمله ، والذي هو جزء من مايكروسوفت ، ويمكن تخاطب البرامج برمجيا ، فهو المتصفح Internet Explorer ، وهناك طرق لإستعمال متصفح الكروم والفايرفوكس ، ولكني لم اتطرق اليها. ولكن ، البرنامج المرفق ، ينتج لك قاعدة بيانات مستقلة ، تخاطب الموقع الذي تريده ، ولكن ، عندما تنقر على الزر "Open Browser" ، فتستطيع برمجيا ان تجعل المتصفح مخفي (اذا شئت). جعفر

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

اعصابك اعصابك انت محق ، وانا اعتذر منك ، تلخبطت الاسماء عليّ هذا الرابط الصحيح جعفر

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

وعليكم السلام تفضل، اقرا هذا الرابط جيدا جعفر

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

السلام عليكم كود اخي ابو خليل شغّال تمام ، بشرط ان تكون اعدادات النموذج تسمح بإصطياد ازرار الكيبورد قبل الذهاب الى الكود ، هكذا: . جعفر

لاحظ الصورة

السلام عليكم اليوم اضع لكم شرح حل لموضوع تفعيل الماكرو عن طريق لغة برمجة الفيجوال بيسك 6 بداية الشرح اولا سنقوم بعمل مشروع جديد ليظهر معنا فورم واحد وهو المطلوب لكي يتم ربط الاكسيل مع الفيجوال لابد من وجود مرجع يعتمد عليه البرنامج للتعامل مع الاكسيل وهذه صور من دروس سابقة لمعرفة كيفية اضافة مرجع لبرنامج الاكسيل داخل المشروع الخاص بنا صور من درس سابق لربط الفيجوال بالاكسيل بعد ان قمنا باضافة المرجع الخاص بالاكسيل نأتي لمشروعنا دا شكل الفورم وكوده هتضيف صورة او ليبل حسب ما تشوفه مناسب ليك ودا بدون اي اكواد عادي نأتي للكود نضع في الحدث load الكود التالي Private Sub Form_Load() Dim Start, Finsh Form1.Show Start = Timer Finsh = Start + 5 Do Until Finsh <= Timer DoEvents Loop Unload Me Excel.Workbooks.Open App.Path + "\yasser.xlsm" Excel.Application.Visible = True End Sub الكود عبارة عن اعلان عن متغيرين بداية ونهاية البداية تساوي التايمر النهاية تساوي التايمر + اي وقت تضيفه لفترة عرض الفورم كشاشة افتتاحية وبعد كدا ندخل في حلقة تكرارية حتى تكون النهاية اقل من او تساوي الوقت وبعد تحقق الشرط يتم غلق الفورم وفتح ملف الاكسيل وعرضه في الوضع المرئي وبكدا يكون انتهينا من الدرس الكل مستغرب فيين كود تفعيل الماكرو اقوله مفيش ليه اقوله لان تشغيل ملف الاكسيل عن طريق ملف تنفيذي يجبر وحدات الماكرو على العمل حتى وان كانت غير مفعله الفكرة موجودة من زمان بس محدش كان واخد باله منها لاننا كنا بنقوم بربط ملف عادي وليس به اي وحدات ماكرو وطبعا نقوم بتحويل الملف لملف تنفيذي بعد الانتهاء بالنسبة لمن لديه اي صعوبات في التعامل مع الفيجوال6 يتابع الدروس من اولها حتى يتثنى له انهاء هذا العمل اما بخصوص من لديه الرغبة في وضع هذه الشاشة الافتتاحية ولا يريد ان يشغل باله اقوله ايضا سأقوم بعمل ملف به خيارات لضبطه كما تحتاج للردود او الاستفسار يرجى الدخول على هذا الرابط مرفق السورس كود للبرنامج لمن لا يريد وجع دماغه تقبلو تحياتي ياسر العربي يتبع vb6 &vba.rar

أخي الفاضل تفضل الملف أرجو أن يفي الغرض كلمة المرور 123 سندات V.3.3.rar

السلام عليكم جرب الملف المرفق لعل فيه ما تريد.... بن علية حاجي سجل المحل.rar