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

Ali Mohamed Ali

المشرفين السابقين
  • Posts

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

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

  • Days Won

    297

كل منشورات العضو Ali Mohamed Ali

  1. بالطبع سيكون عمل ممتاز استاذ سليم بارك الله فيك وزادك الله من فضله
  2. بارك الله فيك وزادك الله من فضله ورحم الله والديك
  3. بارك الله فيك استاذ أحمد وزادك الله من فضله
  4. يمكنك مشاهدة هذا الفيديو https://www.youtube.com/watch?v=CpR8QvC6pAA
  5. وعليكم السلام-اهلا بك فى المنتدى كان عليك استخدام خاصية البحث بالمنتدى فبه ما تطلب , فيمكنك الإستعانة بهذا الرابط جعل برنامج الاكسيل يتوقف بعد زمن معين أو هذا منع المستخدم من فك حماية الشيت او يمكنك الإستعانة بهذا الرابط فبه كود من أعمال استاذنا الجليل ياسر خليل حماية محرر الأكواد من فك الحماية حتى لو عرف الهاكر كلمة السر
  6. أحسنت أستاذ منير موفق ان شاء الله عمل ممتاز
  7. أحسنت استاذ هشام بارك الله فيك وجزاك الله كل خير
  8. وعليكم السلام -اهلا بك فى المنتدى ,لك ما طلبت fixed Time.xlsm
  9. هذه العلامة طالما انك تريد من المعادلة العد فلابد من وضعها واذا جربت ازالتها فلم يخرج الناتج كما تريد
  10. وعليكم السلام -يمكنك استخدام هذه المعادلة =SUMPRODUCT(--($H$10:$H$20=$N1),SUBTOTAL(2,OFFSET($G$10:$G$20,ROW($H$10:$H$20)-ROW(H10),0,1))) فلترة1.xlsx
  11. بارك الله فيك ووفقك الله دائما الى مساعدة الأخرين
  12. أحسنت استاذ جعفر .. وهو ده دائما ما ننوه له واعتقد ان هذا اقل ما يقدم لصاحب الفضل بعد ربنا فى حل المشكلة التى تواجهك أكرمك الله وفتح عليك للتنويه لهذا الموضوع الهام جدا
  13. تفضل -يمكنك استخدام معادلة المصفوفة .... لا تنسى الضغط على Ctrl+Shift+Enter =MIN(IF($B$5:$B$21>=TODAY(),$B$5:$B$21)) اظهار التاريخ القادم2.xlsx
  14. أحسنت استاذ سليم بارك الله فيك وزادك الله من فضله
  15. بارك الله فيك استاذ أحمد
  16. وعليكم السلام -طبعا اخى الكريم فى ملف اكسيل
  17. وعليكم السلام-حاول استخدام هذا الكود Sub ProtectAll() Dim wBk As Workbook Dim sFileSpec As String Dim sPathSpec As String Dim sFoundFile As String sPathSpec = "C:\MyPath\" sFileSpec = "*.xls" sFoundFile = Dir(sPathSpec & sFileSpec) Do While sFoundFile <> "" Set wBk = Workbooks.Open(sPathSpec & sFoundFile) With wBk Application.DisplayAlerts = False wBk.SaveAs FileName:=.FullName, _ Password:="swordfish" Application.DisplayAlerts = True End With Set wBk = Nothing Workbooks(sFoundFile).Close False sFoundFile = Dir Loop End Sub أو جرب هذا Add password to all Excel workbook in folder او تلك Lock a Folder – In Windows – Excel Folder Lock Code أو هذا How to protect all workbooks in a folder at once in Excel?
  18. أحسنت استاذ سليم دائما مبدع -بارك الله فيك وزادك الله من فضله ووسع الله فى رزقك
  19. جزاك الله كل خير وزادك الله من فضله
  20. جزاك الله خير الثواب
  21. تفضل بعد اذن الأستاذ فايز problem sum if green erorr2.xls
  22. بارك الله فيك وزادك الله من فضله
×
×
  • اضف...

Important Information