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

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

  1. ابوخليل

    ابوخليل

    أوفيسنا


    • نقاط

      3

    • Posts

      12,160


  2. gamal gamal

    gamal gamal

    عضو جديد 01


    • نقاط

      3

    • Posts

      48


  3. أبو إيمان

    أبو إيمان

    04 عضو فضي


    • نقاط

      3

    • Posts

      745


  4. Ezril

    Ezril

    03 عضو مميز


    • نقاط

      2

    • Posts

      149


Popular Content

Showing content with the highest reputation on 04 ماي, 2023 in all areas

  1. احببت ان افرد موضوعي هذا بعنوان مستقل 1-لان غالب او جميع الدروس هنا تتعامل مع واتساب ويندوز 2-وحتى يكون تطوير هذا العمل مستقلا ولا يحدث خلط بين الامثلة المثال المرفق تم تطبيقه على واتساب ويب واليكم بعض التوجيهات والملاحظات : كانت مشكلتي في محاولات سابقة انه في كل مرة يتم الارسال وفتح الواتساب ويب .. فانه يطلب ربطا جديدا بالجوال وبحمد الله توصلت الى حل هذه المشكلة التي كانت عائقا حقيقيا .. يكتفى بالارتباط مرة واحدة فقط الآن : عند كل ارسال يفتح الواتس ويب بشاشة جديدة .. فان كانت هناك نسخة مفتوحة من قبل فانه يتجاهلها وتصبح غير فعالة وهذه لا مشكلة فيها لأنه يفتح على الحساب نفسه . ارجوا من اخوتي واحبتي الذين يمرون من هنا تجربة المثال وافادتي بنتيجة التجربة ، من اجل الانتقال الى الخطوة التالية وهي ارسال المرفقات ملحوظة : المرفق sendwatsWebAll .. هو النسخة المحدثة والمطورة بعد أخذ آراء وتجارب الإخوة sendwatsWeb.mdb sendwatsWebAll.rar
    2 points
  2. السلام عليكم اخوانى الكرام حاولت أن أبدء فى تصميم برنامج بالأكسيس لمكتب المحامى لكن لم أستطع إكماله لعدم الإلمام بالعلاقات والدوال وغيرها . فهل من مساعدة . ولكن لم أستطع معرفة كيفية اضافة جلسة أو جسات مستقبلية لكل قضية وربطها بإسم الموكل .... وشكرا لكم جميعا ..... اضافة سبب حيث أنه لدى برنامج كامل لمكتب المحامى ولكنه لا يعمل على ويندوز 10 أو 11 ولكن يعمل فقط على xp و 7 لأن البرنامج قديم جدا جدا وقاعدة بياناته ملف امتداده mde ولم أجد له حل حتى الان .... وهذه صور نسخة برناج المحامى الكامل بالمرفقات https://up6.cc/2023/05/168316103878081.jpg https://up6.cc/2023/05/168316103880122.jpg https://up6.cc/2023/05/168316103881393.jpg https://up6.cc/2023/05/168316103882614.jpg https://up6.cc/2023/05/168316103883635.jpg مشروع المحامى الجديد.rar
    1 point
  3. تمت التجربة وتم الارسال
    1 point
  4. ضغط عمل اشوي عندي بنفس وقت رفع طلب للمكتب محامات برفعلك برنامج مباشر ربط link بالاكسل والغاء الربط مع استيراد وتصدير في اقرب وقت ابشر الربط مع الاكسل لا يمكن تعديل ملف! ولكن تستطيع مع العكس ربط بالاكسس
    1 point
  5. ازريل لوفهمت المثل مارديت هذا الرد أنا بفهمك ......... انا ارسلت برنامج للتعليم ( تعليم الصيد ) أما الرد على البرنامج عاوز برامج جاهز بدون تعب ( السمكة ). بإختصار أما أنت لست طرف ولا موجه إليك ماكتبت . وعلى فكرة أنا مو من عادتي أرد . لكن وجب التنويه . لاترد ... لأني مابتابع
    1 point
  6. مطلوب عمل بطاقات بدالةVLOOKUP (1).xlsx اولا هتخلى الاسم بالعمود B وعلى اساس الاسم باقى البيانات هتظهر vlookup واتبع باقى التعليمات بالاكسل
    1 point
  7. شكرا لك عمي @ابوخليل على هذي الرائعة 🙂 .. أعتذر عن الغياب وعدم التفاعل خلال هذي الفترة .. بعيد قليلا عن عالم التقنية .. ولي عودة قريبا إن شاء الله .
    1 point
  8. تم اضافة العديد من الصور أخى الكريم Ezril وشكرا لحضورك ومتابعتك ...
    1 point
  9. @gamal gamal 1- صور شاشة فقط من برنامج القديم لكل نموذج - (صور شاشات برنامج كامل) - ليتسنى لنا اعطائك برنامج متطور (هذا هو مطلوب وبعدها ابشر نبدأ معاك) 2- ونبدأ لتسجيل مواعيد الجلسات مع الاطراف وحفظ مرفقات من كتب واحكام (مع بعض اقتراحاتك في تطوير ) 3-فقرات العقود واتسنباطها وجمعها اقصد برامج تكون خارج قاعده لحالها آخر شي مع اضافة ربط الورد وتسطيع اكمال برنامج في اي وقت بالطلب الاسأله برنامج مفتوح المصدر مع بعض الموجودين حالياً والغايبين لا تلومهم chatGPT جننهم! وراهم شغل
    1 point
  10. هاك برنامج مفتوع المصدر من منتدانا أوفيسنا أقرأه جيداً وانشاء الله يفيدك ووافني بالرد . SchoolTest.accdb
    1 point
  11. جزاكم الله خيرا لقد وضعت مثالا ليكون المطلوب أكثر وضوحا البيانات في العمود من Dإلى F بيانات غير الاسماء مرتبطة بكل اسم قدد تتشابه وقد تختلف ملاحظة : عند تكرار الاسماء ووصول الى الحد الاقصى تظهر رسالة ويقوم الكود بحذف الاسم الزائد عن العدد المحدد ( هذا ممتاز جدا ) لكن مع حذف الاسم يمسح تنسيقات حجم الخط ولونه ونوعه والمطلوب المحافظة على هذه التنسيقات طلب اخير عند تفريغ الشيت من البيانات يمسح التنسيقات countif_V6.xlsm
    1 point
  12. البرنامج كما ذكرت لك
    1 point
  13. السلام عليكم تم انجاز العمل حقا اخذ الكثير من الوقت ، ولكني تتبعت تفاصيل الارسال واسباب الخلل يمكنكم الاطلاع على خطوات الارسال بمجرد مشاهدة الشاشة اذا قابلتك مشكلة او خلل في الارسال فسيكون حتما من شيء واحد فقط وهو ( زمن الانتظار بين الأمر والذي يليه ) اخترت اطالة الزمن في بعض الاوامر كمسألة احتياطية ( يمكنكم التجربة بتعديل الزمن .. ولكن لا تنسى اخذ نسخة من الكود للرجوع الى الحالة الاصلية ان استدعى الأمر ) حاليا يرسل الرسائل النصية مع المرفق ( الصور فقط .. ويمكن تطويره لارسال انواع الملفات الأخرى ) امكانية ارسال نص فقط بدون مرفقات احتاج العمل الى اضافة وحدات نمطية لنسخ النصوص ولنسخ الصور وللتحكم بفتح واغلاق لوحة المفاتيح ختاما اشكر كل من استفدت منه لانجاز هذا العمل .. سواء منتديات اجنبية او في منتدانا هذا واخص اخي جعفر واخي موسى واختي الكريمة لمياء . sendWa.mdb
    1 point
  14. بعدد إذن الاخ كريم وإثرائا للموضوع جرب هذا البرنامج ABBYY Fine Reader أستخدمه منذ فترة وكان يأتي على اسطوانة التعريفات مع بعض الماسحات الضوئية والميزة يسمح بالتصدير الى صيغ متنوعة وأيضا يسمح بالتحويل من الماسح الضوئي أو ماكينة التصوير مباشرة ممتاز جدا يحول الانجليزي بكفاءة عالية جدا مع أخطاء لا تكاد تذكر ويحول العربي أيضا لكن قد يختلف بعض التنسيقات ولكن قد يحدث خطأ في بعض الصور في الملف
    1 point
  15. وعليكم السلام معادله مقدار الدرجات =IF(F4="","",VLOOKUP(F4,'بيانات المعلمين'!$A$2:$K$212,10,0)) =IF(F5="","",VLOOKUP(F5,'بيانات المعلمين'!$A$2:$K$212,10,0)) معادله الملاحظات =IF(F4="","",VLOOKUP(F4,'بيانات المعلمين'!$A$2:$K$212,9,0)) =IF(F5="","",VLOOKUP(F5,'بيانات المعلمين'!$A$2:$K$212,9,0)) تجربة 1.xls
    1 point
  16. السلام عليكم و رحمة الله ربما تفيدك هذه المعادلة =IFERROR(DATEDIF(NOW();DATE(VALUE(1960+MID($B2;2;2));VALUE(MID($B2;4;2));VALUE(MID($B2;6;2)));"m");"على المعاش")
    1 point
  17. شكرا لك اخي الكريم نعم انا كنت اريد تعديل هذه الجزئية. قمت بتجربة تعديل ونجحت اصبحت هكذا Path = "f:\delivery\" fname = Range("G8").Value .Attachments.Add (Path & fname & ".pdf")
    1 point
  18. وعليكم السلام ورحمة الله وبركاته عدل xls إلى xlsx في هذا السطر
    1 point
  19. السلام عليكم ورحمه الله وبركاته وبها نبدأ عدل f2 الى TextBox1 Private Sub TextBox1_Change() ActiveSheet.Unprotect "2212" Application.ScreenUpdating = False ActiveSheet.ListObjects("data").Range.AutoFilter Field:=7, Criteria1:="*" & TextBox1 & "*", Operator:=xlFilterValues Application.ScreenUpdating = True ActiveSheet.Protect "2212" End Sub واجعل Linkedcell فارغه
    1 point
  20. الأن فهمت انت عاوز السمكة مش عاوز تتعلم الصيد .
    0 points
×
×
  • اضف...

Important Information