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

وعليكم السلام اليك التعديل على الوحدة النمطية ايضا قمت ببعض التصرف والتعديل على مسميات المتغيرات ، حيث المسمى الموجود في المثال لا يعين على الفهم Public Sub circl(Rpt As Report, TxtCtrl As Control, TxtDegree As Integer) Dim ctrl As Control Dim Degr As Double Dim sr_y As Single, sr_x As Single Dim Hei As Integer, Wid As Integer Dim lft_wid As Single, top_hei As Single 'تستطيع التغيير في حجم الدائرة من خلال الارقام ادناه sr_y = 0.9 sr_x = 200 Hei = TxtCtrl.Height * 1.9 Wid = TxtCtrl.Width * 1.09 top_hei = (TxtCtrl.Top + TxtCtrl.Height) \ 2 + sr_x Set ctrl = TxtCtrl ' اسم الحقل الذي يوضع عليه الدائرة If Not IsNull(ctrl) Then Degr = (ctrl <= TxtDegree) ' سوف يتم وضع الدائرة إذا كان الحقل المسمى (الدرجة) يحتوي على الرقم 49 فأقل If Degr Then Rpt.DrawWidth = 24 lft_wid = ctrl.Left + (ctrl.Width \ 2) ' تغيير الرقم يؤثر في مكان الدائر يسار أو يمين Rpt.Circle (lft_wid, top_hei), Wid \ 2, vbRed, , , sr_y ' التغيير في الرقم يؤثر في الدائرة من ناحية الاتساع End If End If End Sub Rpt.DrawWidth = 24 الرقم في هذا السطر المسؤول عن سمك محيط الدائرة فكرة_وضع_دائرة_على_رقمUP.rar

السلام عليكم اهل المنتدى الكرام أقدم اليكم برنامج : لجميع الانشطة ( تجارى – صناعى – خدمى – مقاولات ) مطابق تمام لمعايير المحاسبة الدولية كافة المعاملات ( حسابات ختامية – مراقبة مخازن – عملاء – موردين – شئون عاملين – استيراد – تصدير – مستخلصات – مراكز تكلفة – خطوط انتاج – مقايسات - باركود) يشمل البرنامج :- - حسابات الاستاذ كاملة وموازين المراجعة والارباح والخسائر والمركز المالى - تكاليف العمليات وتحليل تكاليف المشروعات وبنود الاعمال بشكل تفصيلى واجمالى - مستخلصات المشروعات - الايرادات - ومستخلصات مقاولين الباطن - منظومة الاجور والمرتبات بشكل متكامل ويمكن تعديلها حسب قانون الدولة - حسابات ضريبة المبيعات والارباح التجارية والصناعية وضريبة كسب العمل وطباعة الاقرارات الضريبية - مراقبة المخازن ومتابعة كروت الصنف وتسعير المنصرف بثلاثة طرق ( الوارد اولا يصرف اولا – المتوسط المرجح – اخر سعر ) - امكانية قرائة وطباعة الباركود وبدون الحاجة لطابعة خاصة - حسابات النقدية بالصندوق والبنوك وتعدد العملات - تكاليف الاستيراد وحساب تكلفة المشتريات المستوردة - حسابات تكاليف خطوط الانتاج وحساب تكلفة الوحدة من المنتجات - تعدد المستخدمين للبرنامج وصلاحيات خاصة لكل مستخدم وسهولة اضافة وحذف مستخدم وسهولة تعديل الصلاحيات - امكانية اضافة مجموعة شركات داخل البرنامج وكلمة مرور لكل شركة - يصلح البرنامج للعمل فى مصر وفى دول الخليج العربي - البرنامج يشمل روابط شرح تفصيلى لكل اجزائه واسم المستخدم وكلمة السر admin 123 وهذا هو البرنامج: بارك الله فيكم The_fastest.rar

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

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

السلام عليكم استعمل هذا الكود في حدث عند فقد التركيز: Me.code = Replace(Me.code, "-", "") و هذا الكود لإستبدال الشارطة بــــ(/): Me.code = Replace(Me.code, "-", "/") و هذا الكود لإستبدالها بــمسافة: Me.code = Replace(Me.code, "-", " ")

فضلا اخي الكريم افتح لكل موضوع سؤالا جديدا يخصه

السلام عليكم راجع هذا الموضوع أخي

يعمل بكفاءه عاليه

قم بتحويل عمود المعادلة الي فورمات general ثم ادخل المعادلة مرة اخري انظر المرفق ملف.xlsx

Dim dbs dbs = Shell("winword.exe", vbMaximizedFocus)

السلام عليكم ورجمة الله احببت اخواني بالمساهمة في مشروع بسيط لادارة الشيكات الواردة والصادرة check bank.rar

طيب وحياتك تديني رايك بكل صراحة في المرفق ده .... المرفق عبارة عن سجلات منسقة على فورم ...... سهلة ......... لا لا استنى مش اي فورم الفكرة فيه تضليل السجل اللي حضرتك مشاور عليه بالمارس علشان ما تهش وسط البيانات ..... انا شايف انها فكرة عبقرية ...... انت رايك ايه علشان رايك بيهمني !!!!!! المرفقات نفس المثال السابق مع شوية احترافيه حتلاقيه في مثال اجنبي ......بص عليه وقارن المرفقات 2 ColorRecords2000.zip FormatByCriteriaVer2.rar

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