اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

  1. ابراهيم الحداد

    • نقاط

      8

    • Posts

      1255


  2. مهندس الاكسل

    مهندس الاكسل

    03 عضو مميز


    • نقاط

      7

    • Posts

      146


  3. husamwahab

    husamwahab

    الخبراء


    • نقاط

      4

    • Posts

      1047


  4. محمد أبوعبدالله

    • نقاط

      3

    • Posts

      1998


Popular Content

Showing content with the highest reputation on 07/14/20 in all areas

  1. السلام عليكم ورحمة الله جرب هذا الملف للامانة العلمية توجد ورقة مخفية بالملف للتمكن من تحقيق الهدف المبيعات.xlsm
    5 points
  2. اليكم رابط برنامج عواصم العالم والدول كاملا اصدار رقم 1 https://top4top.io/downloadf-1654wznys1-rar.html ارجو ان ينال اعجابكم وهو يعتبر متكامل لجميع دول العالم وعواصمها واعلامها والقارة التى تقع فيها كل دولة ومستعد لتلقى اى ملاحظات للتعديل فى الاصدار الثانى واحب هنا ان اشكر مشرفين الموقع والاستاذ محمد طاهر للتشجيع المستمر وانا لم اتعلم شيئ الا من هذا الموقع الرائع وهذا رابط اخر علــى الميديا فاير اطلس العالم 1
    3 points
  3. السلام عليكم بعد اذن استاذنا العزيز @محمد أبوعبدالله تفضل اخي الكريم نموذج فيه كود لمسح الحقول ( تاريخ الغياب و حقل ساعة الغياب و سبب الغياب) تحياتي تفريغ حقول معينة من الجدول.rar
    2 points
  4. وعليكم السلام ورحمة الله وبركاته اولا اجعل حقل التاريخ غير منضم ثانيا غير معيار استهلام التحديث الى تاريخ الحقل الذي بالنموذج forms!Form![نص16] 243.rar تحياتي
    2 points
  5. جرب المرفق دمج عمودين على التوالى (1).xlsx
    2 points
  6. السلام عليكم ورحمة الله اخى الكريم معاذ بارك الله فيك بصراحة العبقرية الحقيقية فى هذا الرد الجميل منك لقد اخجلتم تواضعنا
    2 points
  7. السلام عليكم ورحمة الله وبركاته : أما بعد : ارجو من سعادتكم مساعدتي في تصميم قاعدة بيانات لخدمة المعتمرين من جميع النواحي وهي كالتالي : 1- بيانات الزائرين : رقم الزائر (احنمال يكون رقم الهوية الوطنية للزائر) الهوية الوطنية اسم الزائر تاريخ الميلاد العمر الحالة الاجتماعية الجنسية تاريخ الاصدار تاريخ الانتهاء مكان الاصدار رقم الجوال 2- الدفعات المالية: رقم الزائر ( الهوية الوطنية) اسم الزائر المبلغ المدفوع المتبقي مجموع المبلغ الكلي للزائرين 3- المواصلات: وسيلة النقل رقم الباص اسم سائق الباص عدد الركاب مشرف الباص مشرف التغذية على الباص اسماء الزائرين في كل باص توزيع تلقائي للزائرين على الباصات تعديل على التوزيع التلقائي لو تطلب الأمر 4- السكن : رقم العمارة الدور اسم الشقة 5- الشقق: اسم الشقة عدد الغرف عدد الاسرة بالشقة 6- اسم الشقة: عدد الزائرين في كل شقة عدد الاسرة في كل غرفة 7- المصاريف والمشتريات: مصاريف السكن: ( تشمل على المبلغ الاجمالي لقيمة الايجار ) مصاريف الباصات : ( تشمل على مبلغ الاجمالي لقيمة الايجار) مصارف التغذية في الباصات : ( تشمل على مبلغ التغذية ) المشتريات : الجوائز احتياجات المطبخ والتجهيزات مبالغ المشتريات اليومية ( تشمل على اليوم - التاريخ - المورد- المبلغ) مصار يف المنتزهات والرحلات في الأخير تكون هنالك تقارير يومية : 1- نقارير المشتريات اليومية 2- تقارير عن اجميع المصروفات والمشتريات 3- تقارير عن مبلغ الرحلة الكلي 4- تقارير عن اسماء الزائرين 5- تقارير عن السكن شامل لكل حاجة
    1 point
  8. تتفضل. الكود يعمل 100/100 بعد التعديل. تم التجربة Sub Button3_Click() Dim OutApp As Object Dim OutMail As Object For i = 3 To Cells(Rows.Count, 1).End(xlUp).Row Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(0) With OutMail .To = Range("A" & i).Value .CC = Range("B" & i).Value .Subject = Range("C" & i).Value .HTMLBody = Range("D" & i).Value .Send End With On Error GoTo 0 Set OutMail = Nothing Set OutApp = Nothing MsgBox Range("A" & i).Value Next i End Sub إيميللات (1).xlsm
    1 point
  9. الى الاستاذ الفاضل / ابراهيم الحداد لك كل الشكر والتقدير متعك الله بالصحة والعافيه والف شكر لك ولكل اعضاء المنتدى الاستاذ الفاضل / احمد يوسف المحترم كالعاده وبدون مقارنه افضل منتدى وافضل اعضاء وادارين علما وخلقا اتمنى من الله ان يجعل علمكم فى ميزان حسناتكم
    1 point
  10. 1 point
  11. تمام هذا المطلوب الاستاذ الكريم علي بارك الله فيك وجزاك خيرا
    1 point
  12. وعليكم السلام-ضع هذا الكود فى حدث Thisworkbook Private Sub Workbook_Open() UserForm1.Show End Sub Backup of work2.xlsm
    1 point
  13. البرنامج موجود اسفل الفيديو على اليوتيوب انا حملته من هناك وسانشره هنا للاستفادة المستخدم / خالد الرقم السري / 123 برنامج عقاري.accdb.rar
    1 point
  14. نعم هو يحقق الغرض وبوضوح سلمت يداك وهذا الذي يعمل عليه البعض ولا غبار عليه من حيث تحقيق النتائج ولكن قد يرى البعض أن التميز يكمن في عدم استخدام الأعمدة المساعدة، لأن وجودها يحتاج لمتابعة ربما وعرضه للتغيير والأهم أنه اضافة يمكن الاستغناء عنها بالغوص بعمق الاكسل (المظلم) حيث تحبك المعادلات تتخيل إليك المعادلة كخط انتاج يغذي نفسه بنفسه ولا يحتاج إلى مواد وخلطات مساعدة هناك يا صديقي تجد متعة حبك المعادلات، مشكلته الوحيدة أنه عميق ومظلم بقدر عمق مطلوبك
    1 point
  15. من بعدك أستاذنا ومنكم نتعلم، وعلى خطاكم نسير
    1 point
  16. رائع و خقيقة مهندس كنت افكر بهكذا معادلة و قد وجدتها قبلي
    1 point
  17. معادلة تمام، مبدع باقي الكود 😄 معادلة تمام، مبدع باقي الكود
    1 point
  18. ملف العمل تجدوه اسف الفيديو في صندوق الوصف لا تبخلوا علينا بوضع متابعة لصفحتي وتفعيل الجرس ولايك للفيديو فديتكم
    1 point
  19. 1 point
  20. أعتذر قلت رأيي بدون ان أجرب و كنت أعتقده صائباً انت هنا تضرب 59% بالرقم 2 والنتيجة 1.18 المفروض 118 ( يمكن ضرب النتيجة في 100) =H4*200
    1 point
  21. شكرا لك مهندس اكسيل ، فعلا هذا المطلوب بارك الله فيك واعجز عن شكر العباقرة امثالك .. لك مني كل الحب والتقدير شكرا من القلب
    1 point
  22. تم عمل المطلوب بالتوفيقضبط معادلة الاسماء - مع المعادلات.xlsx
    1 point
  23. هذه محاوله منى للمساعدة والله اعلم ="d"&A2&"y"&RIGHT(YEAR(B2);2)&"m"&MONTH(B2)
    1 point
  24. بالخدمة اخي العزيز في اي وقت وانا اتشرف بك كاخ وصديق husamwahab1974@gmail.com
    1 point
  25. بالرغم من انك لم ترفع بيانات في ملف (امر مخالف لقوانين المنتدى) اليك هذا النموذج Abou_yousef.xlsm
    1 point
  26. اخي العزيز السلام عليكم استخدم المرفق الاخير لان فيه تعديلات ليس فقط المنع اما بالنسبة للحجر الممنوعة فكما اخبرتك سابقا يوجد جدول tblBlock يتم وضع الحجر الممنوعة فيه الطريقة هي اكتب رقم المركز ومقابله رقم الحجرة ثم كرر العملية بوجوداكثر من حجرة انظر المرفق الاخير فيه مثال تطبيقي ملاحظةهذين الجدولين : يوجد جدولان مخفيان جدول للمراكز والاخر للحجرات منهما يتم ارجاع القيم لذا الافضل وضع القيم المراد اختبارها في هذين الجدولين
    1 point
  27. السلام عليكم ورحمة الله انظر الى هذا الملف ربما يكون هذا مطلبك ملف توضيح.xlsm
    1 point
  28. الحمد لله وانا بخدمتك اخي العزيز ملاحظة : اعتماد المرفق الاخير للتجربة
    1 point
  29. تفضل هذا التعديل لقد تم ادراج جدول فيه رقم المركز ومقابله رقم الحجرة الممنوعة بالنسبة للخطا اعتقد انك اضفت مراكز او حجرات لانه مبني على 16 مركز و18 حجرة وهي محاولة لحين الوصول للنتيجة المطلوبة ,الافضل ارسال الملف الذي فيه الخطا ملاحظة: عند الضغط على زر توزيع سيظهر في جدول المراكز المتبقي لذا لاعادة البيانات تم وضع زر ريسيت Corrected-dd.rar
    1 point
  30. من باب الاستنارة برأيك أستاذنا الكبير ابراهيم الحداد هل ممكن استخدام هذا الكود؟ وم المحاذير من استخدامه؟ مع الشكر لتوضيحك، لأني مبتدأ في برمجة VBA للاكسل Sheets("ورقة1").Range("B2:G1414").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("E1:E2"), CopyToRange:=Range("B4:G4"), Unique:=False طبعا الكود عبارة عن تسجيل ماكرو لعملية AdvancedFilter والملف مرفق، وأكرر شكري أستاذي الكريم المصنف1 (1).xlsm
    1 point
  31. وعليكم السلام-تفضل تم عمل كل المطلوب فى الصفحة الأولىSURGICAL_ALL (10) ROTA SURGICAL JULY TRILE 2.xlsm
    1 point
  32. عزيزى/برنامج الجدول المدرسىASC مميز وفيه كل التقارير وينفع التصدير للاكسل جربه واى مساعدة انا تحت امرك
    1 point
  33. وجزاكم الله خيرا بالتوفيق اخي الكريم تحياتي
    1 point
  34. 1 point
  35. اشكرك استاذ منير واسف انا لم أرى مساهمتك ومساعدتك لى الا اليوم واكرر شكرى لحضرتك
    1 point
  36. تفضل استاذنا الفاضل ولا تنس قراءة شرح الاستاذ ياسر العربي https://www.mediafire.com/file/0cpcrr2gf6wg6r3/VB6setup-generic.exe/file
    1 point
  37. التحويل بواسطة برنامج VB6 نسخة خفيفة حوالي 30 ميقا وتعلمتها من المنتدي ويوجد شرح مفصل للطريقة بالمنتدى للاستاذ ياسر العربي حيث قام بشرح تفصيلي لربط الاكسل بالفيجوال بيسك والتحكم بملف الاكسل عن طريقه واما التحويل الى EXEفهي ميزة موجودة بالفيجول بيسك. https://www.officena.net/ib/topic/65629-سلسلة-دروس-الفيجوال-بيسك-6-والاكسيل-من-علي-مصطبة-ياسر-العربي/ تحياتي
    1 point
  38. بسم الله الرحمان الرحيم السلام عليكم بعد غيابي الطويل عن هدا المنتدى العزيز لاسباب ........؟ اتركوها على الله لم اشاء ان اعود خالى اليدين لدى ارتأيت ان اضع بين ايديكم هدا الملف المتواضع وهو عبارة عن برنامج خاص لاصحاب محلات بيع الموبيلات كنت قد صممته لاحد اصدقائي بدون اطالة الباسوورد 123 لاغلاق الفورم وفتح ملف الاكسل Alt + b الباسوورد 111118 ارجو ان ينال اعجابكم تحياتي لكم Archivé Mobile V 1.001.rar الملف الاصلي بدون عمله ملف تنفيذي
    1 point
  39. يكفى ان تضع عدد الورثة فى الخلايا المحددة ..تظهر النتائج فورا ..ستختفى بعض القرابات لحجبها بما هو اقرب ..هناك اربع مربعات تقبل الوصايا ..نقدية كانت أو بجزء شائع او معا شريطة ان تضع التركة فى المكان المحصص اعلاه ..قد تتجاوز الوصايا التلت الشرعى ..انتقل الى اجازة الورثة للوصايا .اتبع الملاحظات التى بالبرنامج ..ورقة حسابية قد تم العمل فيها لسنوات حتى تكون بهذه الصورة فريضة مع وصايا.rar
    1 point
  40. احبابنا فى المنتدى الغالى السلام عليكم ورحمة الله وبركاته ظروف الحياة قد تبعدنا لكن لن تنسينا المنتدى الذى تعلمنا منه الكثير والكثير . النهرده لى طلب من خبراء المعادلات : أولا عندى جدول حصص فى شيت Table 1- فى شيت Classes مطلوب معادلة بحث عن جدول الفصل ( ملحوظة : اسم الفصل متغير فى الورقة بغير خلية اخرى) . 2 - فى شيت Teachers مطلوب معادلة بحث عن جدول المعلم ( ملحوظة : اسم المعلم متغير فى الورقة بغير خلية اخرى) . الملحوظة المهمة فى الطلب الثانى : ان المدرس أحيانا يدرس مادة منفردا أو احيانا مشتركا مع مدرس أو مدرسين آخرين كما فى حصص المجالات مثلا مثال السبت الحصة الاولى فى فصل ..... عربى مختار السبت الحصة الثانية فى فصل ...... عربى مختار السبت الحصة الثالثة فى فصل ...... مجالات مختار + سيد + محمود السبت الحصة الرابعة فى فصل ...... مجالات مختار + سيد + محمود كيف احصل بالمعادلات ( معادلات اكسل أو udf ) على جدول كل مدرس على حده . لأنى جربت الاكواد واجهتنى بعض المشاكل خاصة مع كبر عدد الفصول ملف التطبيق : test 1.xlsm
    1 point
  41. تفضل ، جعلتها دالتين textNum و Numtext فصل الحروف عن الارقام دالة .rar
    1 point
  42. اخي قلم الأكسيل الملف يعمل بالطريقتين طريقة اخي ياسر واخي رمهان قد يكون لديك مشكلة بالاكسيل معلومة: كانت لدي مشكلة مع الاكسيل ولم استطع حلها الا عندما قمت بعمل يوزر جديد ومسحت اليوزر القديم الحروف المعكوسة.rar
    1 point
  43. وهذه محاولة مع الاساتذة Function ramhan(xinput As String) As String Dim i As Integer, xsum As String, xletter As String xletter = "ابتثجحخدذرزسشصضطظعغفقكلمنهوي" xinput = Replace(xinput, "أ", "ا") xinput = Replace(xinput, "إ", "ا") xinput = Replace(xinput, "ة", "ه") For i = 1 To Len(xinput) xsum = xsum & mid("يوهنملكقفغعظطضصشسزرذدخحجثتبا", InStr(1, xletter, mid(xinput, i, 1)), 1) Next i ramhan = xsum End Function بالتوفيق
    1 point
  44. اخوانى السلام عليكم الدالة ReverseCell احدى الدوال المدمجة فى الأفيس تؤدى هذا الغرض موجودة فى أوفيس 2010 فما فوق ولا أدرى أن كانت فى 2007 أو 2003 الكود الذى قدمه أخى علاء يعمل وهو لنفس الدالة ReverseCell ويعتبر هنا دالة من النوع UDF يستعملها اللى ما عندوش الدالة المدمجة كأصحاب أوفيس 2003 مثلا سؤال لأخى أحمد أبوزيزو : ازاى حولت ملف الــ PDF الى اكسل أبحث عن طريقة بكود وليس عن طريق منتديات التحويل أو البرامج ؟ ملحوظة صغيرة أرجو أن تتقبلوها بصدر رحب : كلمة محتوايات خطأ والصواب محتويات وأطلب من الإدارة المراجعة والتصحيح . هذا المرفق التالى تطبيق للدالة عكس محتويات الخليه.rar
    1 point
  45. السلام عليكم ورحمة الله أختي الكريمة (معذرة على ما سبق)، وضعت لك حلا في الملف المرفق حيث التسلسل يكون حسب رقم العميل وكود الطلب والشهر نفسه، أرجو أن يكون هذا المطلوب... أخوك بن علية تسلسل بعدة شروط_2.rar
    1 point
  46. الاخوه الكرام حلول جميله ورائعه ولكن اريد حل اخر وبطريقه اخرى ارجو مشاهده المرفقتسلس.rar
    1 point
  47. الاخت الكريمة صفا saffaa بارك الله فيك لقد بدأت في تنزيل الروابط فعلا في الموضوع الثاني لي وهو موضوع بعنوان ((( مغارة الكتب والبرامج للاكسس )) يمكنك تنزيلهم من هناك والله الموفق لكم جميعا انشاء الله
    1 point
×
×
  • اضف...

Important Information