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

hanan_ms

03 عضو مميز
  • Posts

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

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

السمعه بالموقع

100 Excellent

2 متابعين

عن العضو hanan_ms

البيانات الشخصية

  • Gender (Ar)
    أنثي
  • Job Title
    Access_VBA
  • الإهتمامات
    مهتمة بالبرمجة وشبكات

اخر الزوار

بلوك اخر الزوار معطل ولن يظهر للاعضاء

  1. =============================================( صور + مرفق + فيديو ) Update: 🌹 بعد اذن استاذي @ابو جودي ❤️🌹🌹 استعمل جدول الرسائل مع ادوات الميديا من مرفقك 😇 بعد اذن استاذ @Moosak ❤️🌹 عدلة شي بسيط بداله 😇 1- اضافة قائمة لادارج الرسائل فقط عدل على هذا كود بكتابة رقم فقط Dim NMSG_1 As String NMSG_1 = "101" MyMsgBox (NMSG_1), (NMSG_1), (NMSG_1), msg_Information, Btn_OK_Only, Arabic_Center - رقم مسلسل من عند الاضافة رسالة جديدة - تعديل على الرسالة بتصحيح والحذف! - نسيت اضيف رقم الرسالة بصندوق الرسالة عند الفتح كمرجع مع ادارة التحكم او مع العميل 2- اضافة قائمة الاخطاء وتغير كود والدالة عند الخطأ من الرقم الى جهاز و المستخدم ..الخ Dim GiveMeError As Recordset On Error GoTo GiveMe Me.Error = "/" Exit Sub GiveMe: ' MsgBox "Error Number : " & Err.Number & vbNewLine & "Error Description : " & Err.Description Dim strMsg As String: strMsg = "Error Description : " & vbCrLf & Err.Description Dim Title As String: Title = "Error Massage !" Dim SubTitle As String: SubTitle = "Error Number: " & Err.Number Dim Number_MX_Error As String '============( XLong '========================( Sand Error To Tablet Set GiveMeError = CurrentDb.OpenRecordset("Error_All_MSGBOX") GiveMeError.AddNew GiveMeError![Err_Number] = Err.Number GiveMeError![Error_Description] = Err.Description GiveMeError![User] = "Not Now _CommingSoon " GiveMeError![PC] = Environ("username") GiveMeError![Today] = Date GiveMeError![ToTime] = Time() GiveMeError![Name_Form] = Me.Form.name GiveMeError![Click_Button] = "GiveMe_Click()" & " -Name_Button: " & "تفعيل رسالة الخطأ عند الخطأ OnError" 'Me.Error.Caption GiveMeError.Update DoEvents 'Number_MX_Error = DMax("[ID]", "[Error_All_MSGBOX]") MyMsgBox strMsg, Title, SubTitle, msg_Critical, Btn_OK_Only, English_Left, False ' Resume GiveMe Exit Sub 3- تصحيح مسار عند التشغيل 4- اضافة الغاء الصوت او تفعيل ================================( تحديث 1- تعامل مع الدالة مثال اسم الجهاز 2- تغير ابعاد الزر نافذه تحدد اما ارتفاع او عرض ثم الحفظ 3- تغير ابعاد الواجهة 4 5 ....... تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق ☕ =============================================( مرفق + فيديو ) تحميل المرفق https://www.mediafire.com/file/14jm050l7a9q5jx/Link+Tablt+On+MsgBoX+V1-2+Full_Control_Buld_MSGBOX_with+Stly+ON+MS+ACCESS.rar/file
  2. =============================================( صور + مرفق + فيديو ) Update: 🌹 بعد اذن استاذ @Moosak ❤️🌹 عدلة على مرفقك 😇 بضيف له بعد التحديث حقل ادراج نص مع حقل قناع على الرسالة ☕ بامكان للعميل اختيار النمط المناسب له او بس للمطور تخصيص الرسائل وتنسيقها للانجاز وتحكم لكافة الاجهزة ====================( بتحديث يكون نص والعنوان DlookUp من جدول تاخذ الرقم وتسبدله بنص والعنوان لامكانية تغير نص الرسالة والغات الثانية كتغير لغة او التصحيح وتعديل 1- تخصيص الرسائل من الازرار الى الخلفية وحجم الرسالة - نوع الخط -حجم الخط -تحجيم الازرار - تحديد نمط الازار - تغير الالوان - تعين خلفية وايقونة وصوت 2- تغير اتجاه الرسالة من اليمين الى اليسار والعكس -تغير محاذات القراءه يمين ويسار وتوسيط 3- تغير حواف اطار النص 4- حفظ باسم مع تغير الباكيج ........ ====================================( تحديث ) 1- اضافة زر وتحجيمة لتحديث احداثية الزر 2-اضافة الغاء الصوت 3- عداد الوقت للالغاء وغلق الرسالة او مرات عدد ظهور الرسالة حسب الطلب بعض التحسينات وتصحيح واستكمال بعده دمج باكيج الواجهة الرئيسية مع الرسائل الى ثيم tablet = Name packge 1 , Name packge 1 = ( Name packge 1 install تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق ☕ =============================================( مرفق + فيديو ) تحميل مرفق مع باكيج للتجربة https://www.mediafire.com/file/qysrlx6x8g81nos/V1+Full_Control_Buld_MSGBOX_with+Stly+ON+MS+ACCESS.rar/file
  3. استاذ @دروب مبرمج ❤️🌹 =============================================( صور + مرفق + فيديو ) Update: 🌹 1- اضافة تدريج اللوني بطول او العرض 2- اضافة قائمة تخصيص القوائمة -3D - مع الحفظ تنسيق باسم او الرجوع واعادة الضبط 3- اضافة انشاء القوائم 4 من تقارير ونماذج موضوح بالفيديو 4- استكمال الاختصارات للقاعدة البيانات - سطح المكتب - قائمة الويندوز -عند اقلاع وتشغيل الويندوز - مع الازالة 5- اضافة قائمة لضبط مسارات الملفات ===========================( تحديث ) 1- استكمال وتصحيح 2- تغير توجيه النموذج من يسار الى اليمين احتمال صعب ما ينفع الا فتح النموذج مخفي بوضع للتصميم لتمكين تحريك العناصر اقصد النماذج داخل النموذج move #,#,# Save ,Close ,Open بسبب التوزيع عند ملاء الشاشة حتى المحاذات سؤال في دالة بتسهل الحكاية هل يوجد مقترح لتعديل تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق ☕ =============================================( مرفق + فيديو ) تحميل المرفق https://www.mediafire.com/file/t5nn5m8t0khq69n/Update_Full_Control_Editor_Desktop_MsAccess_Up_bar_Form_On_Ms_Access_VX_Full.rar/file
  4. شكرا على ذوقك استاذ @دروب مبرمج❤️🌹 ========================= قبل الواحد ياخذ ماقاسات لضبط كامل الشاشة من غير اظهار بار النافذه ويكون رفيع الان اسهل فقط انسخ الاكواد من غير تعديل من حدث التحميل وعند الفتح وعند تغير الحجم تظهر الواجهة الرئيسية او التقرير كامل الشاشة مع اخفاء البار العلوي للنافذه بوضع نمط = رفيع ========================================(تحديث) 1- تحديث الاختصارات -سطح المكتب -قائمة الويندوز -عند تشغيل البرنامج - متغير للتنبيهات Auto - استكمال 2- استكمال ان شاء القوائم من التقارير وحتى النماذج 3- بيانات المشروع مع بعض الاضافات الجديده وتعديل
  5. =============================================( صور + مرفق + فيديو ) Update: 🌹 1- اضافة ثلاث انواع للتحكم بالنافذه كانت نموذج او كانت تقرير غير دالة الاستاذ @دروب مبرمج ❤️🌹 فدمجة الدالتين شرط اذا كانة نوع النمط رفيع او تغير حجمة =====( ايقاف شريط البار مع زر التكبير ) - تثبيت النافذه بوضع كامل الشاشة - تثبيت النافذه كنافذة حوار - بلا حدود وان كانت كامل الشاشة 2- تغير حواف الاطار مع تطبيق الكل ===========================( تحديث ) هل يوجد مقترح لتعديل تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق ☕ =============================================( مرفق + فيديو ) تحميل المرفق https://www.mediafire.com/file/69jo5felu9yvilc/Update_Full_Control_Desktop_MsAccess_Up_bar_Form_On_Ms_Access_VX_Full.rar/file
  6. =============================================( صور + مرفق + فيديو ) Update: 🌹 1- اضافة تعديل بالاطار بالوان مدرجة مع اضافة تخصيص اخرى 2- اضافة نوافذ التقرير 3- اضافة زر اعادة التشغيل 4-( اضافة قائمة تخصيص كل من النماذج والتقارير الايقونه + عنوان + تثبيت النافذه=( وللاسف يعمل فقط على نافذه واحد وللنماذج فقط من الاستاذ @دروب مبرمج ❤️🌹 5- اضافة واجهة سطح المكتب مع التخصيص مع تدريج الاوان وخيار تحكم بالخلفية من استاذي @ابو جودي ❤️🌹🌹 6- اضافة قائمة انشاء التقارير من قائمة رئيسية الى تفريع بسهوله 7- اضافة التقويم بالواجهة الرئيسية واستكملة التقويم من الاستاذه @safaa salem5 ❤️🌹 8- اضافة Splash عند الاقلاع مع التخصيص 9- اضافة انشاء اختصار للبرنامج - سطح المكتب - قائمة الويندوز - عند اقلاع تشغيل الويندوز - مع تغير اسم البرنامج ===========================( تحديث ) ================================= هل يوجد مقترح لتعديل =============================================( Video ) Caption + Button Only On Click with Link db BE 2 Auto New db And back Link كنت بكمل مع اضافة تحويل جميع العناصر في النموذج الى جميع اللغات بضغطة زر بس لازم لنك وانشاء جدول تلقائي ياخذ الترجمة من قوقل + تعدل على الترجمة + امكانية التحديث لان الترجم اذا كان نفس كابتشن وتمرجم يدوي او مصحح الترجمة = لنك 2 جدول لكل دولة ☕ اداة بسيطة لتحكم بالنوافذ الاكسس وتخصيصها + واجهة الرئيسية + انشاء قوائم تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق ☕ =============================================( مرفق + فيديو ) تحميل المرفق https://www.mediafire.com/file/a9ixhgy5palc6pp/Full_Control_Desktop_MsAccess_Up_bar_Form_On_Ms_Access_VX_Full.rar/file
  7. Update تابع الفيديو للتوضيح 1-اضافة قائمة اختيار اي ايقونة لكل فورم (بنشاء فولدر بجميع ايقونات المختاره ) فقط اختار من القائمة اسم النموذج .Icon X32 Or X48 2- اضافة في القائمة تغير ايقونة قاعدة البيانات والاسم ( صمم ايقونة مع دائرة من 1 الى 100 اذا كان فوق 100 تكون الدائرة لون اصفر خصصها للتنبيهات ) 3- ضغط على الايكون لاستعراض التكبير والتصغير !!! ملاحظة لتفعيل الايقونة واظهارها من خصائص التصميم = تمكين كليهما وغير زر الاغلاق كمثال غير ممكن - مع التبسيط انسخ الكود من حدث عند التحميل وحدث عند الفتح واعلى سطر من غير اي تعديل ثم اذهب الى نموذج جديد اولصق الكود فقط '===============================================( فيديو + مرفق ) Editor Icon with Control_Up_bar_Form_On_Ms_Access_VX_Full.rar
  8. شكرا للمساعدة استاذ @دروب مبرمج ❤️ دالتك تغلق اكسس بوضع غير مغلق امزح بالسمايل حذفة الدالة الي ارفقتها داخل الكود الدالة انا معطتها كاملة بس كنت ناسية
  9. انا قدمة الدالة كاملة فقط تحديد رقم المطلوب من الاعدادة مفصلة داخل الدالة ويجد شرح داخل البرنامج - تغير لون بار العلوي للفورم -تغير لون نص بار العلوي للفورم -تغير لون الاطار المركز من الفورم - تغير لون الاطار الساكن غير مركز من النماذج المفتوحة - بمايمكن تجرب جميع الخصائص الاكسس ونظام الاكسس بتغير الفورم ملاحظة عند الانتهاء اغلق الاكسس ثم اعادة الفتح لبعض خصائص الاعدادة والبعض مثل محرر كتابة الاكواد عند بدايت التشغيل ثم اغلق النافذ لتغير الوان محرر الاكواد يعني لبعض العبث =============================================( فيديو ) تحميل المرفق Control_Up_bar_Form_On_Ms_Access_VX_Full.rar
  10. طلب مساعده اشلون اغير لون الاطار نافذة الفورم ☕ اقصد دالة من خصائص hwn !!! مثلا =============================================( مرفق + فيديو ) Control_Up_bar_Form_On_Ms_Access_V1.rar
  11. ================================================== Update: 🌹❤️ 1- اضافة تذليل للصفح بقائمة عامة لكافة التقارير 2-اضافة تقرير داخل التقرير لاي تقرير يتعامل بالمتغيارات '=======================================(( ) او اذا كان نص يكتب اسم العنصر علامتين تنصيص ( "" ) فصل اذا كان الاسم العنصر المستخرج بدالة بلا علامتين تنصيص كوديشن ) Reports(rpt).Report("up_up").Controls("A1").Picture = Reports(rpt).Report("up_up").Controls("E1") 3- تعديل الدالة يتجنب تغيرات التذليل ملاحظة : في تقارير انت تصميمها وتخصص العلامة المائية افضل بكثير فقط معاينة وطباعة ولكن احتساب التغيرات ومطلب للعملاء بالتخصيص احتمال اكتفي بقدر التحديث ويختلف التقرير عند اضافة جدول داخل التقرير للحسابات تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق ================================= هل يوجد مقترح بتعديل على عرض التقرير او التصميم او طريقة افضل منها ☕ =============================================( Video ) تحميل https://www.mediafire.com/file/nvrnbguo001e5db/Update_AddNew_Report_IN_Report_V3_Ms_Access.rar/file
  12. ================================================== Update: 🌹 1- اضافة قائمة يسار اكلك الماوس عند زر الادمن - اضافة وتحرير اطارات (راسي) -اضافة وتحرير اطارات (افقي) -اضافة وتحرير علامات المائية - تجربة اضافة السابقة تجريبي 2- ( اضافة عرض مباشر للمستخدم للاطارات اذا كان الادمن سمح بالاظهار ويحدد الافقي والراسي من بداية الكود ( اسم التقرير والوضع 3- اضافة العلامة المائية مباشر بنفس حال الاطارات مع تحديد درجة المائية للعلامة 4- دمج الاطار مع اي صورة مائية مباشر الى التقرير جرب علامة مائية برمز الدولة 5- لا يوجد فلاش كوري عند اختيار الاطارات او العلامة المائية تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق ======================================(تحديث السابق ) @Moosak استاذ موسى ❤️🌹 ================================= هل يوجد مقترح بتعديل على عرض التقرير او التصميم او طريقة افضل منها ☕ =============================================( Video ) تحميل https://www.mediafire.com/file/7igz2onr9nnwjw9/Update_V3.rar/file
  13. ================================================== Update: 🌹 1- اضافة قائمة يسار اكلك الماوس - عرض التحرير -الغاء التحرير -خروج 2- اضافة نوعين للتقرير (افقي ,رأسي ) 3- اضافة باكج 3 انواع رأسي مع الاحجام + 3 اطارات ملونة مع اطارات افقي - عند فتح تقرير افقي او راسي كل من النوعين له اطارات الخاصة 4- اضافة صورة وتحويلها الى علامة مائية للتقرير 5- اضافة قائمة لتحديد الخطوط المطلوبة للمستخدم 6- تصحيح خطأ السابق نسيت استعلام ======================================(تحديث !) لجعل نفس التقرير اطار + صور علامة مائية في حلين 1- تقرير فارغ وهو الرسيسي يحمل الاطار والتقرير الفرعي ياخذ صورة علامة المائية 2- اما صوره واحد تضم الاطارة مع العلامة المائية @Moosak استاذ موسى ❤️🌹 كأنه عنده طريقة احسن 😇 للعلم يمكن استخدام الاطار المحجم اختر 10 واختر صور للعلامة المائية ☕ ================================= هل يوجد مقترح بتعديل على عرض التقرير او التصميم او طريقة افضل منها ☕ =============================================( Video ) ============================================== تحميل https://www.mediafire.com/file/27l9mopfhjoq2q7/Update_Add_New_And_Black_Mod_Report_MS_Access.rar/file
  14. استاذ @Moosak اكملة ولكن اشلون اخليهم في دالة ؟ فكرتك اجمل ليش ما تطبقها لي 😁 على فكر بدل ما تستخدم دالة مسج بوكس لعداد الوقت msgbox "",EX, Me.HOK_Time ' يغير نص عنوان الرسالة call Time_EX_Click() ' كود في الوقت لا يعمل الا اذا كان العدد 1 او كود انتقر 0 عند وصول العد التنازلي VbNo=1 😇 ================================================== Update: 1- اضافة ازرار التحكم السمك والمائل وتحت الخط + المحاذات 2- اضافة الاطارات وصور العلامات المائية من غير استخدام جدول 3- اضافة طريقة الاستخدام 4- تصحيح الون الاحمر ================================= هل يوجد مقترح بتعديل على عرض التقرير او التصميم او طريقة افضل منها ☕ =============================================( Video ) Update_V2.5 Add Editor Report after print Contol VBA MS Access.rar
  15. Update: تصحيح بعض الاخطاء 1- عمل قائمة ازرز لاختيار الخط 2- اعتماد تعين خصائص التقرير من غير جدول ================================= هل يوجد مقترح بتعديل على عرض التقرير او التصميم او طريقة افضل منها ☕ ====================================( Video ) Update_Fix_Open_MenuShortClick_ReportAfterPrint_On_Form_Ms_Access.rar
×
×
  • اضف...

Important Information