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

عبدالله بشير عبدالله

الخبراء
  • Posts

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

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

  • Days Won

    31

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

  1. جسب فهمي لطلبك طبعا C9 خلية اللصق التابتة يمكنك تغييرها Sub COPYPASTE() ActiveCell.Copy Range("C9").Select ActiveSheet.Paste End Sub
  2. اخي الفاضل لو قمت بالبحث بالمنتدى لوجدت حلا لطلبك كما اخبرك استاذنا الفاضل محمد صالح في المرفق التالي كود لطباعة الكل وطباعة اختيارية عن طريق الفورم وهذا الكود للعلامة الاستاذ عبدالله باقشير شهادة مرتب.xls
  3. الملف بعد تحويل الى رقم SA2.xlsx
  4. ارفق الملف حتى يتمكن الزملاء من معرفة سبب المشكلة
  5. وعليكم السلام ورحمة الله وبركاته السبب هو الارقام الموجودة تم تخزينها الى نص ستجد في زواية الخلية علامة انقر عليها تظهر لك خيارات اختر تحويل الى رقم او يمكنك تضليل كل الخلايا والنقر عى العلامة في اول خلية واحتر تحويل الى رقم فيتم تحويلها كلها مرة واحدة شاهد الصورة المرفقة
  6. الجدول في ملف الوورد غير موجود بملف الاكسل جهز الجدول في ملف الاكسل وان شاء الله احوله الى وورد تحياتي
  7. وعليكم السلام ورحمة الله وبركاته كيف حالك استاذ خيري حسب فهمى لطلبك ارفق لك هذا الملف اظافة الى طلبات اخرى من مشاركة اخرى https://www.officena.net/ib/topic/109798-نرنيب-الطلبة-حسب-المدرسة-ككل-وحسب-الفصل/ تحياتي SA.xlsm
  8. ارفق الملف لتحديد سبب المشكلة
  9. لو ارفقت ملفا لكان اجدى مرفق ملف به كود بسيط جدا الكود لا تغير به شئ سوى مدى ورقة الاكسل تحياتي ... الملف المرفق من احدى المواقع الاجنبية تحويل الى وورد.xls
  10. تم التعديل خطأ بالمعادلة.xlsx
  11. وعليكم السلام ورحمة الله وبركاته جرب الملف تلوين المكرر.xlsm
  12. وعليكم السلام ورحمة الله وبركاته حسب فهمى لطلبك ارجو ان يكون بالملف المرفق طلبك النقل البري بيانات الموظفين (2).xlsm
  13. طلبك غير واضح بالنسبة لى ارجو تحديد المعادلة في اي عمود واي خليةوهل البيانات في ملفك صحيحة حت يتم التطبيق عليها
  14. المعادلة للاستاذ نزار سليمان عيد والكود للسيد عبدالله باقشير خفظهما الله تم تحويل المعادلة الى كود لعدد الف صف تحياتي يومية.xlsb
  15. السلام عليكم اكتب المعادلة التى تريد تحويلها الى كود وايشر خيرا ان شاء الله وان كانت معادلة الاستاذ نزار هي المطلوبة فاعلمنى .
  16. وعليكم السلام ورحمة الله وبركاته فكرة رائعة وعملية هدية مقبولة وان شاء الله في ميزان حسناتك كل العام وانت بخير
  17. وعليكم السلام رحمة الله وبركاته وكل عام وأنتم بخير Application.ScreenUpdating = True MsgBox "تم الإنتهاء من طباعة جميع المستندات هل تريد الخروج من البرنامج مع الحفظ", vbOKOnly, "ok" ActiveWorkbook.Save End Sub
  18. هذا الكود يحول الى وورد ولكن يتعين عليك تعديل اعددات الصفحة في الوورد من حيث الصفحة افقية او راسية وغيره Sub wordexport() Set Word = CreateObject("Word.Application") Word.Documents.Add Word.Visible = True Range("E1:Q1010").Copy Word.Selection.PasteExcelTable False, False, False Application.CutCopyMode = False End Sub
  19. وهذا ما يقوم به الكود المرفق اعلاه اثناء تشغيل الماكرو يلغي الحماية وبعد الانتهاء من عمل الماكرو يعيد الحماية وهذا الامر لا تلاحظه ولا يمكن للمستخدم تعديل المغادلات لو ارفقت ملفا لاختصرت علينا الوقت والجهد تحياتي
  20. وعليكم السلام ورحمة الله وبركاته لو ارفقت ملفا كان اجدى وانفع في بداية الكود ActiveSheet.Unprotect Password:="123" وفي نهاية الكود ActiveSheet.Protect Password:="123" جيث 123 هي كلمة مرور الحماية
  21. السلام عليكم تم تقسيم الكود ويعمل بزر واحد الزر اسمه بحث تحياتي NEW 1.rar
  22. وعليكم السلام ورحمة الله وبركاته لا اعلم سبب وجود زرين للترخيل وزرين للاضافة باكواد مختلفة ربما يكون لها اهمية في ملفك الرئيسي اكتب بياناتك ثم ترخيل وهكذا اذا لم يكن هذا طلبك ارفق ملفك الرئيسي ختى تتضح الفكرة listbox (3).xlsm
  23. حسب فهمي لطلبك ... جرب المرفق نسبة التغير.xlsx
×
×
  • اضف...

Important Information