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

magodey

02 الأعضاء
  • Posts

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

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

كل منشورات العضو magodey

  1. السلام عليكم و رحمة الله و بركاته إخواني في الله و أساتذتي الكرام أبو خالد TareQ M أبو عبدالله يعجز لساني عن شكركم و عند الله خير الجزاء جعلكم الله عونا لنا دائما
  2. السلام عليكم و رحمة الله و بركاته برجاء مساعدتي في معادلة جمع بحيث يتم احتساب المجموع بشرط أن تكون الخلايا معبأة حتى لو كانت القيمة صفر . و عدم احتساب المجموع في حالة إن كانت الخلايا فارغة و جزاكم الله خيرا مرفق ملف للتوضيح Book1.zip
  3. جزاكم الله خيرا على هذه المعلومات الرائعة
  4. جزاك اله خيرا و أكثر من أمثالك شيء رائع حقا عند الحذف أو التعديل تظهر رسالة خطأ Run time error
  5. منتدى رائع و أعضاء روعة استفدنا و تعلمنا منهم كثيرا و الجزاء عند رب العباد اللهم أكرمهم و جازهم بالاحسان يوم الدين
  6. عمل رائع بارك الله فيك و أدخلك الجنان و رزقك و أجاب دعائك
  7. أخي الكريم إذا تم حفظ الملف على شكل صورة فمن المستحيل تعديله على وورد إلا ببرنامج OCR و هذا البرنامج لا يضبط مع الحروف العربية و تمام مع الإنجليزي. أما إذا كان الملف نصي فيمكن تحويله بسهولة و أسهل شيء هو نسخ النص ثم لصقة مباشرة في الوورد.
  8. بسم الله الرحمن الرحيم أكثر من رائع أخي أبو تامر بارك الله لك و زادك علما و جعلك من المحسنين.
  9. السلام عليكم أخي الكريم بصراحة أنا ما فهمت شيء من المطلوب و لكني قمت بفك الحماية عن الصفحات و كذلك الـVBA بالبرنامج الرائع Passware و هو موجود بالمنتدى مرفق الملف بعد إزالة الحماية و كذلك صورة لما قام به البرنامج ____________________________.zip
  10. كل الشكر للأخ كريم و إلى الأخ bekaa ليس هناك معادلة و لكن عن طريق تنسيق شرطي
  11. أسأل الله العظيم رب العرش العظيم أن يشفي ابنتك اللهم رب الناس أذهب البأس ، اشفِ أنت الشافي، لا شفاء إلا شفاؤك، شفاءً لا يغادر سقماً طهور إن شاء الله
  12. بسم الله الرحمن الرحيم أخي العزيز أبو أسامه هذه شهادة أعنز بها و جزاك الله الخير الكثير أخي الكريم h63 البحث عن كود معين أو معلومة متوفر على الانترنت و لفضل الله علي أنني ملم بـ اللغة الإنجليزية مم يسهل علي الكثير و عندما بحثت عن هذا الموضوع كتبت في جوجل using combo box to select sheets و طلعت لي صفحات كثيرة و من ضمن المواقع الرائعة موقع mrexcel و هذه الصفحة به موضوعات عديدة جدا http://www.mrexcel.com/favorites.html
  13. بسم الله الرحمن الرحيم كنت بحاجه ملحة لهذا الموضوع و استعرضت المشاركات من الأخوة الأفاضل بخصوص قائمة منسدلة باسماء الصفحات و استعرضت بعض الصفحات الأجنبية لهذا الغرض و وجدت كود رائع يقوم بفتح نافذة Navigate و بها كل صفحات الملف حتى لو أضفت صفحة أخرى. الطريقة سهلة جدا افتح الملف ثم ألصق الكود التالي عن طريق أدوات -----> ماكرو ------> محرر الفيجول بيسك Option Explicit Sub Workbooknewcb() 'create the menubar Dim sht As Worksheet On Error Resume Next Application.CommandBars("Navigate").Delete On Error GoTo 0 With Application.CommandBars.Add("Navigate", , False, True) With .Controls.Add(msoControlDropdown) For Each sht In ActiveWorkbook.Sheets If sht.Visible = xlSheetVisible Then .AddItem "" & sht.Name End If Next sht .TooltipText = "SheetNavigate" .OnAction = "Sheet_Navigate" End With .Protection = msoBarNoCustomize .Position = msoBarFloating .Visible = True End With End Sub '****************************************************** Private Sub Sheet_Navigate() 'navigate to selected sheet Dim stActiveSheet As String With CommandBars.ActionControl stActiveSheet = .List(.ListIndex) End With Worksheets("" & stActiveSheet).Activate End Sub ثم اذهب لصفحة في الملف و قم بعمل زر أو شكل تلقائي ثم كلك يمين و تعيين ماكرو و اختارالماكرو الذي به الكود عند الضغط على الشكل ستظهر لك نافذة صعيرة بها سهم عند الضغط عليه ستظهر كل الصفحات و الأجمل هو انه بإمكانك سحب هذه النافذة بجانب أشرطة الأدوات لتصبح جزء منها و إليكم ملف نموذج لاتنسونا من دعوة صالحة و لكل من يشارك بعلمه من أساتذتنا في هذا المنتدى الرائع الذي حولني من شخص لا يعرف من الإكسيل إلا اسمه إلى باحث في الأكواد navigate.zip
×
×
  • اضف...

Important Information