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

نبا زيد

02 الأعضاء
  • Posts

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

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

كل منشورات العضو نبا زيد

  1. السلام عليكم ان شاء الله هذا طلبك متابعة الطلاب1.xlsm
  2. السلام عليكم عندي ورقة بشكل افقي عند الطباعة لا تظهر كل البيانات تطلع الورقة من الطابعة مقطوعة هذه الحالة فقط عند الطباعة بشكل افقي حاولت باعداد الورقة والطابعة ولم احصل على نتيجة مع العلم - عندي طابعتين نوع ريكو واحدة تظهر البيانات بشكل صحيح ( الطابعة ملونة ) والثانية البيانات مقطوعة ( الطابعة اسود وابيض )
  3. السلام عليكم - أهل العلم والخبرة - اضافة الى علمهم - تواضعهم واهتمامهم بمساعدة الاخرين وكلمتك واي إستفسار سنكون دائما سعداء بمساعدتك والله هذه الكلمات اسعدني - كما سعدتني بالحل والكود الرائع الذي هو المطلوب جزاك الله خير
  4. السلام عليكم - اشكرك على الاهتمام والرد الكود يحتاج الى بعض التعديلات اني استخدمت كود استدعاء بيانات من اعداد الخبير عبدالله بشير ( بدل المعادلات) لانه المعادلات لا تشتغل ويا الكود اصبح طلبي - من الاخوة الكرام وخاصة الأخ (محمد هشام ) أي تغيير في أي خلية باللون الاصفر يذهب هذا التغيير الى الخانة اللي حصل بها تغيير فمثلاً اذا غيرت في شيت استدعاء ( القسم : الحسابات ) وغيرته الى ( القسم : الانتاج) يذهب هذا التغيير من الحسابات الى الانتاج في شيت السجل وكذلك باقي الخانات على الاسم جزاكم الله خير تحويل التغييرات من شيت الاستدعاء الى شيت السجل.xlsm
  5. السلام عليكم ممكن كود اذا حصل تغيير في شيت يحصل التغيير في شيت اخر على الاسم كما في المثال المرفق اذا حصل تغيير - يذهب التغيير الى السجل على اساس الأسم.xlsm
  6. السلام عليكم طلبت من الذكاء الاصطناعي كود لربط ملف الاكسل والاكسس بحث اذا حصل تغيير في الاكسل ينتقل هذا التغيير تلقائي الى ملف الاكسس وهذا الكود هو S Sub ImportFromExcel() Dim db As Database Dim rs As Recordset Dim xlApp As Object Dim xlBook As Object Dim xlSheet As Object Dim i As Integer Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Open("C:\Path\To\Your\Excel\File.xlsx") Set xlSheet = xlBook.Sheets(1) Set db = CurrentDb Set rs = db.OpenRecordset("YourTableName") rs.AddNew For i = 1 To xlSheet.UsedRange.Rows.Count rs.Fields("FieldName1") = xlSheet.Cells(i, 1).Value rs.Fields("FieldName2") = xlSheet.Cells(i, 2).Value ' Add other fields as needed rs.Update Next i rs.Close Set rs = Nothing db.Close Set db = Nothing xlBook.Close False xlApp.Quit Set xlApp = Nothing End Sub ممكن من حضراتكم الكريمة تعديل هذا الكود ليصلح على شغلي وعلى الملفين المرفقين في المشاركة الاولى b
  7. جزاك الله خير اشكرك على الاهتمام تسلم
  8. السلام عليكم كان موضوعي هو عندي ملفين واحد اكسس وملف اكسل عملي على ملف اكسل كنت اقوم بعملية نسخ ولصق (انسخ البيانات من الاكسل الى اكسس) هل توجد طريق (كود) عندما اعمل تحديث بيانات أو اضافة في ملف اكسل تنتقل هذه االتحديثات أو الاضافات أو التغييرات الى ملف اكسس او تصدير البيانات من الاكسل الى اكسس
  9. السلام عليكم ورحمة الله وبركاته حياكم الله عندي ملف اكسل + ملف اكسس اعمل على ملف اكسل --- المطلوب اكرمكم الله - وما ادري هل ممكن عمل هذا الطلب : ربط ملف الاكسل بالاكسس بحيث ما يجري من تغييرات في ملف الاكسل يتغير بالاكسس تلقائيا قاعدة بيانات.zip اكسل.xlsm
  10. السلام عليكم ممكن كود لزحف الجدول لليسار وترقيم العمود كما في الملف المرفق زحف الجدول لليسار وانشاء عمود ترقيم.xlsm
  11. السلام عليكم ممكن اضافة الى الكود بعض الاوامر لعمل تنسيقات للجدول وكما وضحت بالملف عمل تنسيقات بعد الضغط على الزر.xlsm
  12. السلام عليكم عندي دفعات ثانية في عمود سي - وما عنده دفعات اولى في عمود بي هذه الطريق تحذف كل الدفعات في عمود سي ارجو النظر
  13. السلام عليكم توجد طريقة لحذف الصفوف الذين استلموا الدفعتين والابقاء على الذين استلموا دفعة واحدة بدون معادلة أو كود مسح بعض الصفوف بدون معادلة او كود.xlsx
  14. جزاك الله خير تسلم
  15. تمام تم اعادة رفع الملف 111حذف اسماء بشروط.xlsm
  16. السيلام عليكم ممكن طريق سهلة ويا ريت بدون معادلات او كود حذف الاسماء بشروط وكما موضح بالملف واذا لم تتوفر لا باس معادلة او كود جذف الاسماء.xlsx
  17. السلام عليكم يوجد شاشة دخول برقم سري 123 المشكلة عند فتح الملف تظهر شاشة دخول ولكن عند الضغط على كروز يذهب الى الاكسل المطلوب لا يمكن الدخول الى الملف الا بعد كتابة الرقم السري 123 وكذلك خاصية ادراج صورة لا تشتغل - وشكرا شاشة دخول 123.xlsm
  18. السلام عليكم محتاج كود أو معادلة (عند كتابة اسم ، مثلا اسم (مريم) في شيت استدعاء خانة بحث (الاسم) تظهر الاسماء التي تبدا بهذا الاسم محرك بحث - قائمة منسدلة.xlsx
  19. نعم استاذ ولكن المعادلة يحتاج وكما بينت بالملف بيان بعد يوم أو اكثر على الاستحقاق
  20. السلام عليكم معادلة لبيان الاستحقاق وفي حالة الخلية فارغة لا يكتب شيء معادلة لبيان المدة وعدم كتابة شيء في حالة الخلية فارغة.xlsx
×
×
  • اضف...

Important Information