arsalanamin2

جزاك الله خير الثواب

في 3/23/2012 at 23:14, عمرو السيد said:

اولا احب ان اشكر كل اعضاء و مشرفى هذا المنتدى العظيم الذى تعلمت و لازلت اتعلم منه الكثير و الكثير

 

و اليوم اقدم الى الجميع برنامج المخزون الشامل حيث قد طلب منى احد الاصدقاء برنامج لضبط حركه مخزون شركته

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

 

نبذه صغيره عن البرنامج

 

1-برنامج يحتوى على صفحه فواتير المبيعات و المشتريات و المرتجعات

2-و يحتوى على صفحه كشف حسب العملاء التى توضح المدفوع و المستحق خلال فترات معينه

3- صفحه التقارير وتضم

حركه الاصناف

حركه الفواتير

وتقرير شامل بالمبيعات و المشتريات خلال اى فتره انت تحددها

4- كما يمكنك ادخال اى سند سواء كان صرف او قبض من خلال فورم ادخال السندات

5- حركه المخزون و التى توضح الربح و الخساره لكل صنف على حده

 

و المزيد و المزيد من المزايا الاخرى التى سوف تكتشفها بنفسك

 

ملاحظات

تم عمل البرنامج على اكسيل2010

وتم تجربته بنجاح على اكسيل 2010

الرقم السرى للدخول الى البرنامج هو 123

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

 

تم رفع البرنامج على موقع الميديا فير حيث ان حجم البرنامج 2 ميجا بايت

 

كما ارحب براى الاخوه و الخبراء فى البرنامج سواء كان نصيحه او نقد او معلومه جديده

 

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

 

و اخيرا اشكر كل اعضاء ومشرفى هذا الصرح العظيم الذى تعلمت منه

 

التحميل من الرابط التالى

http://www.mediafire.com/file/u34hp2c38h6slc7/برنامج المخزون الشامل.rar

برنامج المخزون الشامل.rar

في 5/25/2011 at 19:28, محمد يحياوي said:

 

 

اخواني الكرام هذه بعض الاكواد المنفصلة و البسيطة التي قد تهم البعض وخاصة المبتدئين مثلي

وارجوا من الاخوة الكرام كل من لديه كود يضيفه وأجر الجميع على الله

 

 

 

وتسهيلاً على اخواننا في متابعة الموضوع اردت وضع فهرس بالمشاركات التي تحتوي على الاكواد

 

 

 

وهنا الفهرس مقسم على ثلاثة أجزاء يحتوي على هذه المشاركات وهذه الملفات من النوع (Pdf)

 

 

 

 

 

 

 

 

............................................................

 

 

 

الجزء الأول من فهرس الأكواد المنفصلة (ملف Pdf)

 

 

 

 

 

 

 

 

الجزء الأول.rar

 

 

 

............................................................

 

 

 

الجزء الثاني من فهرس الأكواد المنفصلة (ملف Pdf)

 

 

 

 

 

 

 

 

الجزء الثاني.rar

 

 

 

............................................................

 

 

 

الجزء الثالث من فهرس الأكواد المنفصلة (ملف Pdf)

 

 

 

 

 

 

 

 

الجزء الثالث.rar

 

 

 

............................................................

 

 

 

 

 

 

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

 

 

 

المحفظة المفرغة من تصميم الاستاذ الكبير خبور جزاه الله خيرا

 

محفظة اكواد_النسخة1.rar

 

 

 

 

 

 

 

 

 

 

أخوكم

 

 

 

محمد يحياوي

 

في 2/18/2016 at 13:29, سليم حاصبيا said:

نفضل اخي هذا مثال مرفق

اما بالنسبة للكود  يصبح هكذا (يجب ةضغ الكلمة المطلوبة في الخلية A1)

Private Sub UserForm_Initialize()
    'تعريف المتغير من النوع النصي
    Dim Word As String
    'تعريف متغير من النوع عدد صحيح
    Dim I As Integer
    
    '[Label] تعيين عنوان لأداة الـ
    Label1.Caption = Cells(1, 1).Value
    
    
    
    'حلقة تكرارية من الرقم 1 إلى طول السلسلة النصية للأداة
    For I = 1 To Len(Label1)
    
        'يساوي قيمة المتغير نفسه زائد [Word] المتغير النصي المسمى
        'حيث يتم استخراج حروف الكلمة [Mid] الحرف الذي يتم استخراجه باستخدام الدالة
        'مع كل حلقة تكرارية يتم التعامل مع حرف واحد فقط في كل مرة
        'بمثابة الضغط على إنتر للانتقال لسطر جديد [Chr(13)] زائد الدالة
        '[Vertical] بالتالي يتحقق الهدف من الكود وهو جعل النص يظهر بشكل رأسي
        Word = Word & Mid(Label1, I, 1) & Chr(13)
        
    'الانتقال للحرف التالي
    Next I
    
    'ليكون العنوان الجديد للأداة [Word] تعيين المتغير المسمى
    Label1 = Word
End Sub

 

 

Book1.rar