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

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

  1. ابو جودي

    ابو جودي

    أوفيسنا


    • نقاط

      6

    • Posts

      6,818


  2. jjafferr

    jjafferr

    أوفيسنا


    • نقاط

      5

    • Posts

      9,814


  3. الحلبي

    الحلبي

    04 عضو فضي


    • نقاط

      3

    • Posts

      750


  4. مجدى يونس

    مجدى يونس

    أوفيسنا


    • نقاط

      3

    • Posts

      3,336


Popular Content

Showing content with the highest reputation on 30 أبر, 2019 in all areas

  1. السلام عليكم ورحمة الله وبركاته لقد أنشأت برنامج بسيط وجمعت به الأكواد التي نسنتخدمها باستمرار وصممته بحيث تكون الواجهة عبارة عن شاشة يتم تجميع بها الأكواد المراد نسخها الي شاشة الفيجوال بيسك لمشاهدة كيف يعمل البرنامج من هذا الرابط بنك الأكواد - demo-24-4-2019.accdb
    2 points
  2. فورم بحث فى سورة الكهف وتفسيرها مع صوت الشيخ كل سنة وانتم طيبين رمضان على الابواب اتبع شرح الفيديو وضع ملف الصوت بنفس طريقة الشرح الفيديو الصور رابط الملف حمل الملف
    2 points
  3. وعليكم السلام 🙂 المفروض انها تفتح ، إلا اذا لم تكن عملت تحديث للاوفيس 2007 !! فهناك بعض الميزات الموجودة في 2010 والتي تم إضافتها الى تحديثات 2007 🙂 واليك روابط حزم التحديث الموجودة للاوفيس 2007: Microsoft Office 2007 System (with 2007 Microsoft Office Suite Service Pack 1 (SP1)) Microsoft Office 2007 System (with 2007 Microsoft Office Suite Service Pack 2 (SP2)) Microsoft Office 2007 System The 2007 Microsoft Office Suite Service Pack 3 (SP3). جعفر
    2 points
  4. نعم ، يبدأ بالرقمين 00 (في الواقع هناك ارقام اخرى فيها 00 ، لهذا السبب يجب ان نبدأ بمسافة ثم صفرين "00 ") ، ولكن لا نعطيه طول ، وانما نقول له لما ينتهي الرقم ونحصل على "مسافة فارغة" بعده ، فهذه المسافة هي تعطي الطول الصحيح ، وبغض النظر عن طول الرقم ، يعني بالنسبة لبرنامجي انا ، الكود يكون: iMobile_x: Mid([All],InStr([All]," 00")+1,InStr(InStr([All]," 00")+2,[All]," ")-InStr([All]," 00")-1) وبالنسبة الى برنامجك ، الكود يكون: iMobile_x: Mid([Comment],InStr([Comment]," 00")+1,InStr(InStr([Comment]," 00")+2,[Comment]," ")-InStr([Comment]," 00")-1) جعفر
    2 points
  5. وعملا بالحكمة التى تقول من كل بستان زهرة ومن كل شجرة ثمرة هذا المرفق هو خلاصة القول من خلاصة إبداعات وأفكار اساتذتى الكرام .. طبعا هذا من وجهة نظرى المتواضعة ------------------------------------------------------------------------------------------------------------------- uae-com-LastUpdate.rar
    2 points
  6. الاخوه الكرام السلام عليكم ورحمة الله وبركاته فى البدايه اعتذر لكل من راسلني ولا استطيع الرد عليه بسبب انشغالي الدائم ان شاء الله وبعونه تعالي سوف يتم نزول الاصدار الرابع قريبا جدا خلال شهر رمضان الكريم اعاده الله عليكم وعلينا باليمن و الخير و البركات البرنامج مجاني 100% للاستخدام الشخصي ومفتوح المصدر و ارجو من الاخوه الجدد قبل مراسلتي قراءه كافة الردود فى هذا الموضوع. حيث انني اجبت علي الكثير من الاستفسارات تم نزول الاصدار الرابع من هنا
    2 points
  7. بسم الله الرحمن الرحيم فكرة وياريت الكل يتفاعل لتنشط القسم اثبت حضورك بكلمة صباح البركة استيقظنا على عظيم هبات اللهروحٌ عادت..ونعم زادت..صباح أطل..وأمن أظل..من أدام التسبيح : فرجت أسراره ومن أدام الحمد : تتابعت عليہ آلخيراتومن أدام الاستغفار : فتحت لہ المغاليق اللهم اجعل أيامنا سعيدةوهمومنا بعيده وفرجنا قريب .. وسرورنا يزيد وعيشنا رغيد واجعلنا ممن قلت فيهم " لَهُمْ مَا يَشَاءُونَ فِيهَا وَلَدَيْنَا مزيد" ياسر العربي
    1 point
  8. فورم اكسل استدعاء بيانات وصور العاملين الفيديو الصور الملف على الرابط التالى http://www.mediafire.com/file/r92gpfff79v1wgz/بيانات+وصور+الموظفين.rar
    1 point
  9. اخواني الاعزاء ـ السلام عليكم ارغب في ان اعمل صلاحيات للمستخدمين من حيث الدخول علي شاشات او نماذج قاعدة البيانات بمعني ان اضع ثلاثة علامات من نوع : نعم/لا الاولي تفيد فتح النموذج الثانية تفيد التعديل علي النموذج الثالثة تفيد الحذف ويكون الشكل عبارة عن نموذج رئيسي به اسم المستخدم ـ وكلمة المرور ـ مرفق به نموذج فرعي به اسماء النماذج وعلامات نعم/لا ( اؤكد علي نموذج فرعي به اسماء النماذج حتي ولو اكتبها يدويا) المنتدي يحتوي على كثير من امثلة صلاحيات المستخدمين ولكن لم اري منهم صلاحيات الدخول علي الشاشات ( النماذج) بعض الامثلة سببت لي عقدة نفسية لدرجة ان دخلت المنتدي لكي اسأل واعرف من لديه مثل ذلك بعيد عن الاكواد المطولة والتعقيدات اكون شاكر له جزاكم الله خيرا
    1 point
  10. بسم الله الرحمان الرحيم السلام عليكم اولا ما هو النص التنبئي باختصار هو تنبئ البرنامج او الدالة او الكود بالكلمات التي تبحث عنها من خلال كتابة اول حروف الكلمة مثل مايحدث اثناء البحث عن طريق محرك البحث قوقل هذا الموضوع ليس جديد فهناك كود في المنتدى يعتمد على مربع نص وليست بوكس لاكني منذ فترة حاولت تطبيق الامر على الكمبوبوكس الى ان وفقني الله الى ذلك وها انا الان اشارككم الموضوع ما هي الفائدة من هذا الموضوع كثيرا ما يكون لدينا قاعدة بيانات كبيرة مثلا الاصناف في الفواتير و غالبا متكون عمليات الادخال خاصتا مكررة و كثيرة فهذه الطريقة ستساعدك كثيرا في ادخال الاصناف بسلاسة وسهولة بدل عناء اعادت كتابت الصنف مرارا وتكرارا لا اطيل عليكم في المرفق تجد مثال توضيحي احدهما مطبق على الشيت وهو مايهم اصحاب ادخالات الفواتير والثاني مطبق على الفورم صورة توضيحية بالنسبة للمثال المطبق على الشيت كما في الصورة من جهة اليمين عند الضغط على اي خلية ملونة بالاخضر تظهر كمبوبكس اكتب داخلها اي حرف لتجلب لك الكلمات التي تحمل تلك الحرف كما في الصورة يمكنك التنقل بين النتائج بواسطة سهم الاعلى والاسفل من الكبيور اضغط انتلر لادخال النتيجة في الخلية وانتقال الكمبو الى اسفل الخلية المفعلة بالنسبة للمثال المطبق على الفورم كما في الصورة من جهة اليسار نفس الامر كما في المثال الاول فقط الاختلاف في ان ادالبحث يكون من الفورم ارجو ان يكون الموضوع مفيد للجميع تحياتي للجميع تنويه تم استبدال المرفق بعد 23 تحميل texte prédictive 2007 2003.rar
    1 point
  11. بعد اذن الاخوة انظر الموضوع التالي عله يفيدك
    1 point
  12. ali mohamed ali 06 عضو ماسي 1,194 2,847 مشاركات بلد الإقامة:Egypt الإهتمامات:accounting أبلغ فريق الموقع عن مخالفة قام بنشر December 20, 2018 وعليكم السلام اخى الكريم تفضل هذا ملف لأستاذنا الكبير عبدالله باقشير له منا كل المحبة والإحترام القاموس الشخصي بحث استماع اضافة تعديل حذف.xls كان عليك خاصية البحث فى المنتدى هذا العمل من استاذنا عبدالله باقشير { وَقُل رَّبِّ زِدْنِي عِلْمًا } [ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ] ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله القاموس الشخصي بحث استماع اضافة تعديل حذف.xls
    1 point
  13. الله عليك يا أستاذنا .. شغال like a charm. المهم .. أين السائل اللى شغالنا لهذه الدرجة ولم يعبأ بالنتيجة
    1 point
  14. بعد إذن أستاذنا الجليل مجدي يونس الشرط الأول =IF(SUM(Y4:Z4)<33600;E4) اما الشرط الثاني المطلوب غير واضح المبلغين اللذان تريد طرح الفرق بينهم لم تذكرهم ممكن تكون المعادلة على حسب فهمي =IF(SUM(Y4:Z4)<33600;E4;E4-G4)
    1 point
  15. استاذى القدير ومعلمى الجليل ووالدى الحبيب الاستاذ @jjafferr نفس الاشكالية "00971" حضرتك اعتمد فى رقم الموبايل على انه يبدا بمفتاح الامارات طيب وما العمل لو كانت هناك ارقام لدول اخرى
    1 point
  16. السلام عليكم 🙂 همم ، ماشاءالله ، يعني عندكم فرح ، وكل الخبراء حاضرين مع الاخ Barna ، وانا ما اشارك !! مشاركتي تختلف عن مشاركاتكم ، بالاستعلام ، وبس ، وبجميع الحقول 🙂 . . اما بالنسبة الى الاخطاء ، فما اردت ان امضي وقت اكثر على الاستعلام وتصدي مكان الخطأ ، فلما نلحق هذه البيانات في الجدول ، فلن تظهر هناك ، وفي التقرير تم ايقافها 🙂 جعفر 1054.uae-com.accdb.zip
    1 point
  17. اهلا اهلا اهلا استاذى الجليل ومعلمى القدير الاستاذ المبجل استاذ @AlwaZeeR من انا حتى اسمح لكم استاذى حتما انتم تتقدمون لانه اذا حضر الماء بطل التيمم فشأنى ككل طلاب العلم اتلهف دائما الى طرحكم المبارك جزاكم الله خيرا وكل عام وانتم الى الله اقرب واسمح لى استاذى ان ارفق الحل على طريقتكم uae-com_2.rar ولكم لى سؤال اعتمد الكود على بداية الرقم بـ 009 ماذا لو مان هناك رقم يبدا بـ 0020101111111111
    1 point
  18. اخواني الافاضل اسف لتاخري للرد فكنت اجرب جميع الامثله اعلاه واحاول دراسة كل واحد علي حده بعد الاطلاع والبحث عرفت ان مفهوم صلاحيات المستخدمين له اكثر من معني كل معني يحمل معه طريقة معينة ولاداعي للتطرق لها هنا النوع الذي اريده ويمكن الاخ / qathi هو الوحيد الذي يفهم قصدي فيه بعد الدخول في نموذج اسم المستخدم وكلمة المرور النموذج المعروف وكلنا نعرفه جيدا ودخلنا الاسم حلبي وكلمة المرور 1 مثلا ودخلنا علي البرنامج المطلوب ننشأ نموذج ونسميه "users" مثلا او اي اسم يكون فيه اسم المستخدمين جميعا وننشأ به نموذج فرعي عبارة عن جدول يحتوي علي اسماء النماذج كلها وامام كل اسم نموذج خانة الاختيار نعم / لا بحيث اذا قمنا بالتأشير علي علامة الصح امام اسم النموذج فتكون الصلاحية للاسم الظاهر اعلاه بفتح هذا النموذج وطبعا العكس صحيح وحتي لا انسي ان اشكر الاخ / ALI Sadiq لمساعده لنا وبدون مجاملة المثال جزاك كل الخير وبارك الله فيك جميل جدا جدا جدا وفيه المطلوب بالحرف والذي اريده ولكن عند تطبيقي له فشلت ويحتاج لبعض الوقت ولا انسي استاذي / جعفر بس يبدو ان مطلوبي لم يصله زين ربنا يكرمك يارب ودايما نغلبك معنا وطبعا استاذي وباشمهندسنا ابو جودي ياريت اخي محمد نحاول نعمل المشروح اعلاه فهو ايضا به المطلوب خصوصا نموذج الصلاحيات بس بدون كبر حجم قاعدة البيانات ربنا يرحم والديك في الدنيا والاخرة وتعفو في صحتك جزاكم الله خيرا
    1 point
  19. السلام عليكم ورحمة الله وبركاته طيب تفضل الاخ الحبيب الاستاذ @Ali Sadiq مشكورا بوضع رابط لموضوع اعتقد به نفس المطلوب الاخ الحبيب الاستاذ @qathi بالفعل تلك كانت المحاولة الاولى لى لتطوير هذا النظام الرائع ولا اخفيكم لم اكن وقتها ملم بالكثير من المفاهيم عن هذا العلم ومعك كل الحق انا واجهنى فيما بعد مشكلة فى خوارزمية التشفير هذه ان اردتم التعديل على المرفق الذى تفضل به الاخ الحبيب الاستاذ @ابو البشر تحت امركم للعلم انا اطبق هذا النظام حاليا للتعامل مع مجموعة المستخددمين وليس كل مستخدم بعينه واعرف قد تكون هناك طرق ابسط مثل هذه واعى ان كل الطرق تؤدى الى روما ولكن لولا اختلاف الاذواق اخبرونى ايهما تريدون تطويره بما يناسبكم وان شاء الله انا تحت امركم
    1 point
  20. إيه ده يا راجل .. ايه الإبداع ده .. بارك الله فيك ونفع بك بعد إذنك أنا لم أستطع أن أعدل فى الكود حتى يتلائم مع ما طلب أ/AhmedEmam (بكل صراحة إستخصرت أحذف منه شيئ لروعته) ولكن أخفيت بعض الكائنات حتى يتلائم مع ما طلبه. وأعتذر عن ذلك إن قبلت وإلا فاحذف المرفق .. شكرا لك مرة أخرى. تحياتى test (1).zip
    1 point
  21. السلام عليكم ضع هذا الكود مكان الكود السابق خلف زر الأمر Dim curPath As String Dim i As Integer curPath = CurrentProject.Path & "\REPORT_SALES.xlsx" Do Until Dir(curPath) = "" i = i + 1 curPath = CurrentProject.Path & "\REPORT_SALES" & i & ".xlsx" Loop DoCmd.OutputTo acOutputTable, "REPORT_SALES", acFormatXLSX, curPath, 0
    1 point
  22. السلام عليكم يجب حذف العلامة ' من الأمر ChDir ThisWorkbook.Path' حتى يصبح من الشكل ChDir ThisWorkbook.Path أي القيام بـ إعادة تنشيط هذا الأمر داخل الكود... ويكون الكود كاملا بالشكل التالي: Sub Create_Links() Set MyFile = CreateObject("Scripting.FileSystemObject") ChDir ThisWorkbook.Path For Each cell In Range("A2:A" & Range("A60000").End(xlUp).Row) If MyFile.fileexists("الملفات\" & Cells(cell.Row, 1).Value) = False Then Cells(cell.Row, 2).Value = "لا يوجد مستمسك": GoTo 1 ActiveSheet.Hyperlinks.Add Anchor:=Cells(cell.Row, 2), Address:="الملفات\" & Cells(cell.Row, 1).Value, TextToDisplay:="الملفات\" & Cells(cell.Row, 1).Value 1 Next End Sub المصطلح "لا يوجد مستمسك" (الذي وضعته لأحد الإخوة في موضوع مشابه سابق منذ أيام) يمكن تغييره بالمصطلح "لا يوجد ملف بهذا الاسم في المجلد".... بن علية حاجي
    1 point
  23. اداة تفعيل الماكرو لاكسيل 2003 2007 2010 2013 بضغطة واحدة علي هذه الاداة تفعل الماكرو لاكسيل لكل الاصدارات مع تحياتي ان اعجبتك الاداه لا تبخل علي بالرد khalednr.rar
    1 point
  24. نعم ، لأن هذا الكود معمول خصيصا لارقام هذا الموضوع ، وانت قمت في الكود بحل هذه الاشكالية بوضع الرقم 14 (اي طول رقم الهاتف) ، والذي لا يحل مشكلة ارقام سلطنة عمان وهي 13 رقم ، مثل 0096812345678 ، فالطريقة التي يمكن ان نحل هذه المشكلة ، هي بأن يكون هذا الرقم متغير ، نأخذ قيمته من النموذج الرئيسي مثلا ، سواء لطريقتي او طريقتك 🙂 جعفر
    0 points
×
×
  • اضف...

Important Information