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

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

  1. د.كاف يار

    د.كاف يار

    الخبراء


    • نقاط

      5

    • Posts

      1,681


  2. صالح حمادي

    صالح حمادي

    أوفيسنا


    • نقاط

      3

    • Posts

      1,745


  3. سليم حاصبيا

    سليم حاصبيا

    أوفيسنا


    • نقاط

      2

    • Posts

      8,723


  4. kha9009lid

    kha9009lid

    الخبراء


    • نقاط

      2

    • Posts

      1,347


Popular Content

Showing content with the highest reputation on 11 ماي, 2021 in all areas

  1. السلام عليكم و رحمة الله تعالى و بركاته دكتورنا كيف حالك. إن شاء الله تكون بخير هذا مثال لإظهار رسالة في شريط المهام دون الحاجة لأي برنامج آخر بالأكسس فقط عرض رسالة على شريط المهام.accdb
    3 points
  2. لإضافة عمود جديد استخدم اضافة عمود جديد ALTER TABLE table_name ADD column_name varchar(255);
    2 points
  3. استخدم دالة Trim Trim([num]) num اسم الحقل الذي توجد مسافة او فراغ في بدايته اخي عزيز لو وضعت موضوع جديد افضل من رفع موضوع قديم وكل عام وانتم بخير
    1 point
  4. سبب المشاكل كلها هي الخلايا المدمحة
    1 point
  5. اظن انه ليس هناك حاجة لاستعمال البوزرفورم (فقط اضغط الزر GO في الصفحة Target ) الكود Option Explicit Sub AL_in_One() Dim T As Worksheet Dim Sh As Worksheet Dim arr(), itm Dim Max_ro%, k% Dim Adr1%, Adr2% Dim F_rg As Range arr = Array("First", "Second", "Third") Set T = Sheets("Target") T.Range("A1").CurrentRegion.Offset(1).Clear k = 2 For Each itm In arr Set Sh = Sheets(itm) Max_ro = Sh.Cells(Rows.Count, 2).End(3).Row Set F_rg = Sh.Range("o2").Resize(Max_ro).Find("*", lookat:=1) If Not F_rg Is Nothing Then Adr1 = F_rg.Row: Adr2 = Adr1 Do T.Range("B" & k).Resize(, 21).Value = _ Sh.Range("B" & Adr2).Resize(, 21).Value T.Range("W" & k) = Sh.Name & ": (" & Adr2 & ")" T.Range("A" & k) = k - 1 k = k + 1 Set F_rg = Sh.Range("o2").Resize(Max_ro).FindNext(F_rg) Adr2 = F_rg.Row If Adr2 = Adr1 Then Exit Do Loop End If Next itm If k > 2 Then With T.Range("A2").Resize(k - 2, 23) With .Font .Size = 14: .Bold = True End With .InsertIndent 1 .Borders.LineStyle = 1 .Interior.ColorIndex = 20 End With End If End Sub Fares_hasan.xlsm
    1 point
  6. طيب الحمد الله باقي نقطة اخيرة اذا جرب هذا التعديل DATA2000.mdb.zip
    1 point
  7. 1 point
  8. تسلم استاذنا الفاضل بارك الله فيك ونفعنا وايك بعلمك
    1 point
  9. وعليكم السلام-جرب هذا الفيديو أو جرب هذا الموقع Microsoft Has Stopped Working
    1 point
  10. في خدمتك اخي ازهر وجزاك الله خيرا على الدعوة الطيبة
    1 point
  11. أما عن السؤال الأول فلا علم لي بـ ازور ولكن أعتقد أنها كـ الأسكيوال تحتاج ان تكون مالك لقاعدة البيانات أو لك وصول عليها بصلاحية مشرف لتستطيع التعديل علي قاعدة البيانات أما عن السؤال الثاني فاسم العمود ليس بمشكلة يمكنك اختيار ما تريد المهم نوع البيانات الخاصة بالعمود.
    1 point
  12. تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه لغه xml دعنا الان نبدا في تصميم شريط ريبون جديد RibbonXml تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه لحفظ الصور داخل القاعده البيانات button اضافه مكتبه برمجيه تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه مواضيع أيضا ذات صله تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه في الاكسيس يتم اضافه شريط ريبون لاعطاء البرنامج شكل احترافي مبسط لسهوله الاستخدام من قبل المستخدم النهائي للبرنامج في اصدار اوفيس 2003 كان من السهل تصميم شريط ادوات يشبه شكل الريبون بشكل مبسط لانه كان بنظام قوائم منسدله مبسطه لكن بدايه من اصدار اوفيس 2007 تطور شكل الريبون ليعطي شكل مصور بالقوائم بشكل احترافي و تم تعديل طريقه تصميمه ليكون بناء علي نموذج بلغه xml لغه xml هي لغه تنتمي للغهHTML و هي شبيه بها في قواعد كتابه اللغه الي حد كبير و هي اختصار لـ eXtendable Markup Language و هي لغةالترميز القابلة للتوسع . XML صُمّمت لتخزين و نقل البيانات يمكن استخدامها في تصميم بعض البرامج للاندرويد او تصميم المواقع وغيرها دعنا الان نبدا في تصميم شريط ريبون جديد في البدايه نحتاج الي اضافه جدولين جدول لحفظ كود xml و جدول لحفظ الصور المصغره التي نريد وضعها علي الشريط( يمكن ان هذه الصور في ملف مستقل خارج قاعده البيانات الا ان هذا الامر قد يؤثر ببعض المشاكل عند محاوله نقل ملف قاعده البيانات من جهاز الي اخر ) سنقوم بانشاء الجدول الاول جدول حفظ كود xml و سنقوم بحفظه باسم USysRibbons id AutoNumber RibbonName Text RibbonXml Memo او Long Text حيث ان RibbonName يمثل اسم شريط الريبون RibbonXml يمثل مكان حفظ كود xml و تم وضعه هذا الحقل Memo او Long Text حتي يتناسب مع الاكود التي تزيد عن 255 حرف حيث ان short text او text اقصي قدره استعابيه لها في الاكسيس 255 حرف يعد اسم جدول USysRibbons من جدول النظام و بمجرد حفظها لن تظهر بشكل افتراضي و يجب اظهار جداول النظام حتي نستطيع التحكم بها و أيضا أذا اردنا ان يكون شريط الريبون مصور والصور داخل قاعده البيانات سنقوم باضافه جدول باسم tblImagesRibbons idImage AutoNumber imageRibbon Attachment حيث ان imageRibbon من النوع”Attachment” و ذلك تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه لحفظ الصور داخل القاعده البيانات يفضل ان تكون صيغه هذه الصور من النوع ico لتكون متناسقه مع شريط الريبون الان دعنا نتعرف علي كود xml و أيضا طريقه كتابه هذا الكود ليتناسب مع الاكسيس نبدا بكتابه معرف التالي <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="fncRibbon" loadImage="fncLoadImage"> <ribbon startFromScratch="true"> <tabs> <!-- نص الكود هنا --> </tabs> </ribbon> </customUI> و نلاحظ أيضا التشابه الكبير في بين لغه xml و لغه html و طريقه صياغه الاوامر البرمجيه هذا الوسم يتوافق مع اصدار اوفيس 2010 فيما فوق و أيضا نحتاج طبعا الي بعض الخبره البسيطه في قواعد كتابه لغات xml او لغه htmlلنتمكن من كتابه هذا الكود نقوم باضافه الوسم <tab id="MyTab1" label="اسم القائمه"> </tab> وذلك بعد الوسم tabs في كل مره نريد اضافه قائمه جديده و أيضا لاضافه مجموعه جديده داخل القائمه نستخدم الوسم group و يكون بالصيغه التاليه <group id="MyGroup1" label="اسم المجموعه"> </group> button و لاضافه الازرار داخل الجروب نستخدم الوسم button <button id = "bt1" label = "الاسم الظاهر للزر" image="1.ico" size="large" onAction = "fncOnAction" /> و نلاحظ أيضا ان المعامل id يكون لاعطاء اسم برمجي عند استدعاء هذا الزر برمجيا و يختلف هذا المعامل عن معامل label فهو للاسم الظاهر للمستخدم النهائي بينما الخاصيه imageتستخدم لاضافه صوره علي هذا الزر و المعامل onActionيستخدم لحجز متغر في الكود البرمجي عند استدعاء الزر البرمجي او عند الضغط علي هذا الزريتم اعطاء ارقام او اسماء لكل زر بحيث لا يتكرر اي اسم حيث انه في حاله تكرر اي اسم سيتوقف كود xml و لن يظهر شريط الريبون في التصميم ليظهر الكود بشكل كامل كما يلي <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="fncRibbon" loadImage="fncLoadImage"> <ribbon startFromScratch="true"> <tabs> <tab id="MyTab1" label="الاعدادات"> <group id="MyGroup0" label="اعدادات"> <button id = "bt00" label = "اعدادات النسخ الاحتياطي" image="00.ico" size="large" onAction = "fncOnAction" /> </group> </tab> </tabs> </ribbon> </customUI> يتم تخزين جميع الصور في جدول الصور الذي سبق و ان قمنا بتصميمه tblImagesRibbons اضافه مكتبه برمجيه نحتاج في هذا العمل لأضافه مكتبه برمجيه التي تسهل علي الاكسيس استدعاء الصور من الجداول و أيضا يمكن ان نستخدم المكتبه البرمجيه Microsoft office 16.0 object libraryحيث يمثل الرقم 16 لرقم اصدار الاوفيس و بالتالي سيختلف من اصدار الي اصدار اخر و في حاله عدم عثورنا علي هذه المكتبه البرمجيه يمكن البحث عنها داخل ملفات النظام و هي موجوده ضمن الملف MSO.DLL نقوم أيضا باضافه داله برمجيه لتشغيل ازار شريط القوائم و نستخدم الامر البرمجي Select Case و ذلك للمرور علي كافه ازار التشغيل في الشريط ففي حاله الضغط علي زر يقوم هذا الكود بتحديد الزر و تشغيل الكود الذي يخص هذا الامر Public Sub fncOnAction(control As IRibbonControl) Select Case control.Id Case "bt0" MsgBox "مرحبا" Case "bt1" MsgBox "22222222" Case Else MsgBox "عفوا لا تمتلك صلاحيه الوصل " & control.Id, vbInformation, "انتبه" End Select End Sub تصميم شريط ريبون احترافي في الاكسيس – بايقونات احترافيه يمكن استخدام الداله dlookup لاستخراج الصور من الجدول لاضافتها في الشريط يجب تشغيل xml بمجرد تشغيل قاعده البيانات و أذا قمنا باي تعديل علي هذا الكود لن يظهر تاثير هذا التاثير الا عند اعاده فتح ملف قاعده البيانات من جديد لمزيد من المعلومات يمنكم زياره رابط الموضوع علي موقع المحاسب العربي https://acc-arab.com/2020/05/blog-post_92.html يمكنك تحميل برنامج المحاسب العربي مصمم بشريط ريبون احترفي من هنا مواضيع أيضا ذات صله شاهد أيضا تحويل صيغه ملف الاكسيس برمجيا من accdb الي accde تعرف أيضا علي الاستعلامات في الاكسيس شاهد أيضا مشاكل نقل ملفات قواعد البيانات من جهاز الي اخر و طرق حلها تعرف ايضا علي انشاء كشف حساب عميل او مورد بالاكسيس شاهد أيضا ايقاف الحفظ التلقائي في الاكسيس
    1 point
  13. تحفة جميلة فريدة .. شكرا ابا غفران ومع فرحي بالتحفة فأنا اشد اعجابا بالحوار بين القامات العلمية وتجسيدهم للامانة العلمية
    1 point
  14. الله الله الله ... أسأل الله في هذه الساعات المباركات أن يوفقكم ويسعدكم سعادة لا شقاء بعدها أبدا،،، تميز
    1 point
  15. وبارك عليك اخي اما السؤال فلا يمكن وضع نصوص او كلمات او احرف او رموز داخل حقل نصي ولكن ممكن انشاء وحدة نمطيه تحدث البيانات المرتبطة وتغير حقل الربط لاى شئ تريدة بشرط يكون مفهرس وبارك الله فيك اخى ووفقك الله دائماً الى ما تحت وترضي . كود ممتاز اخى @kha9009lid شكراً لمشاركة الخبرات
    1 point
  16. تفضل أخي الكريم خط السير 2021 (1).rar
    1 point
  17. جرب هذا التعديل لعله يوافق مرادك كل ما فعلته هو التعديل علي قيمة اليسار والأعلي للدائرة لاحظ المرفق القديم والمرفق الجديد لتري ما تم من تغير في القيم خط السير 2021.rar
    1 point
  18. السلام عليكم تم تقديم المحاضرة باللغة الانجليزية ضمن اجتماع متطوعي فرع معهد إدارة المشاريع ، و اعادة تقديمها باللغة العربية لمنتسبي جروب زكاة العلم و التسجيلات متاحة كما هو مبين أدناه لمن لم يستطع الحضور تسجيل المحاضرة باللغة الانجليزية من هنـــــــــا تسجيل المحاضرة باللغة العربية من هنـــــــا (بدأ التسجيل بعد بدء المحاضرة ب 5 دقائق، فالمقدمة غير مسجلة)
    1 point
  19. مميزات الفورم السحرى 1-الفورم يستكشف جميع الجداول المصممة فى اى ملف اكسل 2- التعامل مع تلك الجداول من حذف واضافة وبحث وترحيل 4- ضبط عرض أعمدة اليست بوكس من خلال ضبط أعمدة الجدول 3- الفورم يكتشف المعادلات ويحميها تلقائيا 5- الفورم السحرى يكتشف اعمدة التواريخ تلقائيا 6- الفورم يقبل تدعيم الجداول بالصور تلقائيا 7- الفورم يحدد اوتوماتيكيا المكان الجغرافى للجداول داخل ملف الاكسل وهناك كثير للميزات ستكتشفها بنفسك عند العمل على الفورم السحرى هذا شرح مصور الاخ الرائع عماد الغازي بالمناسبة أشكره من كل قلبي على هذا الشرح جزاه الله خيرا الفورم_السحرى.rar
    1 point
  20. بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته وبعد ايه الاخوة الكرم ارجو افادتي في موضع البحث ، حيث اني عملة استعلام بحث ولكن هنك مشكلة في البحث حيث ان المدخل قد يكتب مثلاً اسم ( فاطمة ) او ( فاطمه ) او ( احمد ) او ( أحمد ) .... الخ مم جعل امر البحث بالاسم امر مزعج ارجو الافادة ، ان كن هنك حل واتمنا من الله عليكم ان يكون الحل مرفق بي مثل لسبب اني بطي الفهم ووعد مني اني سوف ادعو لكم جميعاً ولكن من يقد لي الحل سوف اخصه انشاء الله بالكثير من الدعاء هذا والله يحفظكم ويرعاكم سبحانك الله هم لا علم لنا الى ما علمتنا انت علام الغيوب اخوك ورطن مبتلش المزنوقي
    1 point
  21. في المرفق مثال لبعض الأمثلة تفيد في التحكم في النصوص أرجو أن تجدوا منه ولو قليل من الفائدة ولكم تحياتي edet_text.zip
    1 point
  22. اخواني الاعزاء كل عام والجميع ومنتدانا الجميل بخير عندي مشكلة وهي كيف من الممكن ان الون سجل فارغ في تقرير او ألون سجل محدد في تقرير ؟؟؟؟؟ الشكر الجزيل مقدما اي مساعدة سوف اكون من الممتنين لها
    1 point
  23. السلام عليكم ورحمة الله وبركاته سؤالي يكمن في التالي : على أفتراض أن لدي أربعة حقول أسمائهن كالتالي : Text1, Text2, Text3, Text4 الحقل الأول عبارة عن كمبو بوكس يتم أختيار شيئ منه الحقل الثاني يكتب شيئ فيه وكذلك الحقل الثالث هل يمكن أن تجمع هذه الحقول الثلاثة مباشرة للحقل الرابع دون أن تكتبها بنفسك. لنفترض أخترت من الحقل الأول "Mohd" والحقل الثاني طبعت رقم "2" والثالث "3" ما أريده أن يظهر مباشرة في الحقل الرابع "Mohd23" أتمنى أن يكون سؤالي واضحا.
    1 point
  24. مرحبا اخواني لدي برنامج وفيه عدة تقارير وسويت تعديل على واحد منها ولمن حفظت التعديل وطلبت عرض التقرير أصبح يطلب مني ادخال قيمة معلمة ويطلب معلومة من داخل التقرير مع ان هذه المعلومة متكررة بالتقرير يعني مثلا تاريخ صرف المبلغ مع انه فيه عدة تواريخ للصرف ارجو التكرم بحل هذه المشكلة وشكرا للجميع
    1 point
  25. اخواني السلام عليكم عملت نموذج تقوم بتسجيل بيانات الاصناف فيه مثل رقم الصنف واسم الصنف ومواصفات الصنف وعملت الباركود على النموذج . فاريد ان اقوم بطباعة تلك البيانات على طابعة الباركود فماذا يلزمني لقوم بطباعة تلك البيانات على شريط الباركود هل اقوم بتصميم تقرير على الاكسس بحجم ملصق الباركود اوماذا تحياتي للجميـــــــــــــــع
    1 point
  26. اخواني مرتادي واعضاء منتدانا الرائع الحقيقة ان الموضوع هذا معروف لدى معظمكم ولكن ماجعلني اذكره سببين الاول ان هناك الكثير من مرتادي المنتدى هم من المبتدئين والذي اظنهم لايعرفونه والسبب الاخر هو ان اجعل هذا المنتدى يضم اكبر قدر من المعلومات التي قد يحتاجها من يعمل بالاكسس وخصوصا انه لا توجد اي مشاركة سابقة في هذا الموضوع (على حد علمي)... من المعروف لدى الجميع انه عند البدء بتشغيل تطبيق الاكسس يظهر لنا شعار الاكسس الذي يبين رقم المنتج والترخيص وغير ذلك ... فاذا اراد اي شخص ان يخصص قاعدة البيانات الخاصة به ويستبدل شعار الاكسس بشعار يخص الشركة او المؤسسة واسم البرنامج و المبرمج واي بيانات يريدها فما على هذا الشخص سوى اعداد الشعار الجديد في برنامج الرسام التابع للويندوز والقيام بحفظ الصور بنفس اسم التطبيق الخاص به ووضعها في نفس المجلد الذي يوجد فيه هذا التطبيق وبالتالي وعند فتح التطبيق سيتم استبدال شعار الاكسس بالشعار الذي وضعه صاحب البرنامج... في الاخير اود اعلامكم باني قد ترددت كثيرا قبل وضع المشاركة ولكن وللاسباب التي ذكرتها سابقا قررت عمل هذة المساهمة والتي ارجو ان تفيد ولو حتى شخص واحد وارجو من كل من لديه ملاحظة او اضافة بان لايبخل باضافتها...مع تحياتي للجميع,,,
    1 point
  27. السلام عليكم جميعا ورحمة الله وبركاتة عندي نمودج معمول بالاكسس لإدخال البيانات واريد السجل الاول رقم (1) ان يكون محمي من التغيير او مخفي لا يظهر بتاتا ادا ممكن لانه ضروري ؟ فمن لدية الخبرة متكرما وله الشكر الجزيل
    1 point
  28. أخواني الإعزاء خطر ببالي سؤال وهو هل بإمكان عمل كود في برنامج الأكسس بحيث أن البرنامج لا يقبل أي إدخال أو إلغاء أو تعديل خلال الفترة ما بين الساعة 7:45 مساءا إلى 7:30 صباحا أو بين أي فترة يمكن تحديدها. إذا كان الجواب بالإيجاب فكيف وأين يوضع الكود وهل هذا الكود يجب وضعه في كافة النماذج. (علما أن البرنامج قد يكون مفتوحا خلال تلك الفترة) للأستفسار مثلا أو قبل إغلاق البرنامج.
    1 point
  29. السلام عليكم ورحمة الله وبركاته الملف المرفق وجدته في أحدى المنتديات الأجنبية،،، يحتوى على مثال لطريقة البحث في جميع السجلات عن كلمة كاملة أو جزء منها وإظهار النتيجة في نموذج فرعي SubForm. أتمنى أن يكون مفيداً ، وأرجوا المعذرة ان كان الموضوع مكرراً. SearchEngineDemo.rar
    1 point
×
×
  • اضف...

Important Information