اذهب الي المحتوي
أوفيسنا

waelac27

عضو جديد 01
  • Posts

    28
  • تاريخ الانضمام

  • تاريخ اخر زياره

مشاركات المكتوبه بواسطه waelac27

  1. الاخ الفاضل اليك الحل

    اكتب في الخلية G7

    في الشيت الاول رقم الاعتماد ثم اذهب لشيت تقرير واضغط زر تقرير وارجوا ان ينال هذا الحل مرادك

    والله ولي الذين امنوا وصلي اللهم علي سيدنا محمد خاتم النبييين وعل آله وصحبه وسلم

    L.C_waelac27.rar

  2. السلام عليكم بافتراض انه يوجد لدينا كود البحث التالي

    Private Sub CommandButton1_Click()

    On Error GoTo 2010

    Columns("a:xx").Find(ComboBox1, MatchCase:=True).Activate

    Exit Sub

    2010 MsgBox "الاسم غير موجود"

    ComboBox1.Value = ""

    end sub

    فهل يمكن وضع كود البحث التالي أو find nex

    وأيضاً البحث السابق او

    FindPrevious

    ولكم جزيل الشكر والعرفان

  3. الاخوة الطيبين/ تحية طيبة وبعد

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

    Exception occurred

    ارجو من الاخوة المشاركين القاء الضوء عليها وطرق حل المشكلة

    شكراً

  4. السلام عليكم ورحمة الله

    قمت بالشروع في عمل برنامج للفواتير بالشركة التي اعمل بها ولكن واجهتني بعض المشاكل منها مثلاً

    1- بافتراض لدينا فورم بها العديد من التكست بوكس عند وضع قيمة في احداها وضغط مفتاح الادخال لا ينتقل الادخال او المؤشر الي التالي بل ينتقل الي تكست بوكس بعيد فهل يوجد حل لذلك

    2- قمت بوضع المعادلة التالية داخل التكست بوكس

    Private Sub t1_Enter()

    Range("a18").Formula = "=c18*d18"

    End Sub

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

    3- قمت بعمل كود الحفظ باسم save as ولكني اريد ان تظهر نافذة الحفظ باسم واختار منها ما اريد من حفظ

    4- اريد في البرنامج الغاء الفاتورة من داخل الفورم اي كود يحذف الملف فهل ممكن ذلك وشكراً لمن يجد في نفسه القدرة على المساعدة وايجاد الحلول للآخرين

    سلام من الله على عباده المخلصين

  5. السلام عليكم ورحمة الله

    لي بعض الاسئلة اتمني من اصحاب العلم عدم البخل علينا

    ----------------------------------------------

    1- بافتراض قيامنا بعمل برنامج معين ونريد وضع صلاحية له مثل صلاحية قدرها ثلاثة شهور او صلاحية للبرنامج ينتهي في 31/12/2010

    2- هل يمن عن طريق فورم معين وازار تم وضعها عمل بروتكنت وان بروتكت بباسور وورد محفوظ مقدماً بحيث اذا عملت بروتكت للبرنامج عن طريق CommandButton يتم عمل الحماية وعند الغاؤها عن طريق CommandButton آخر يظهر الباسورد الموضوع مقدماً.

    3- هل يوجد امر معين يوقف الفورم بحث اذا تحقق شرط معين يتوقف الفورم ولا يظهر مرة اخري

    4- هل يوجد امر لايقاف الماكرو او عدم اظهاره في قائمة الماكرو

    برجاء تصحيح الكود التالي

    Private Sub Workbook_Open()

    If Sheets("lock").rang("d4").Value >= 27756 Then GoTo 100

    100 Sheets("invoice").Visible = xlveryhidden

    ElseIf Sheets("lock").rang("d4").Value >= 27756 Then GoTo 200

    200 Sheets("reg").Visible = True

    Else: If Sheet("reg").rang("a1").Value >= 102 Then GoTo 300

    300 Sheets("invoice").Visible = True

    Sheets("lock").Range("a1:f100").ClearFormats

    Sheets("reg").Visible = xlveryhidden

    End If

    End Sub

  6. اولاً : السلام عليكم ورحمة الله وبركاته

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

    ثانياً: لي بعض الاسئلة

    1-هل يمكن حماية الكومبو بوكس في شيت الاكسل من الحذف وكذلك من عمل نسخ وخلافة او حتي تحريكه.

    2- هل يمكن اخفاء خلية معينة بالكود اي عدم اظهار معادلات خلية معينة.

    3- هل يمكن تنفيذ المعادلة التالية بالكود

    f8=index(:c101;iv1)

    وشكرا

  7. الاخوة الافاضل السلام عليكم ورحمة الله

    مرفق ملف مبيعات هل يمكن عمل فورم لتلك المبيعات بحيث اذا بحثت اواستعلمت باسم العميظهر مبيعاته وارقام فواتيرة وكذا اجمال كل عميل وشكراً

    وجزاكم الله خيرا على هذا المنتدي الرائع ( افضل منتدي عربي في مجال الاوفيس ومساعدة وتنمية مهارات المبتدئين والمحترفين ايضاً)

    حاولت تحميل المرفق ع الموقع ولم استطع

    رابط الملف

×
×
  • اضف...

Important Information