صلاح الصغير

الحمد لله على السلامة ا / ياسر ممكن يكون الموضوع ليس ذو اهمية او شى من هذا القبيل و لكن الموضوع للتعلم او لاثراء الموضوع ان امكن المطلوب 1 : فى حالة غلق الملف تفضل شاشة موجودة يجب غلقها ايضا (منها صورة فى المشاركة 3) لا اعرف ماذا تسمى ، هل يمكن غلقها مع غلق الملف من ال x المطلوب 2 : هلى يمكن ظهور رسالة مثلا " لا يمكنك فتح الملف " تغلق اليا و ذلك فى حالة تعطيل الماكرو بدلا من هذه الشاشة اليوزر : صلاح الباس : 1 محرر الاكواد بدون باس و شكرا Copy of master salah 2015.rar

الشكر للياسرين طيب مفيش لصلاح واخد ميرسى و اخد خرستوبولى

ا / سليم شكرا للمتابعة بس اعتقد ان المعادلة معتمدة على انى عارف الارقام اللى فى الصفوف من 61:57

up

السلام عليكم و رحمة الله و بركاته فى يا جماعة اضافة جميلة فى الاكسيل اسمها power query انا شوفتها فى فيديو للاستاذ محمود جود الله هى المفروض موجودة على موقع Microsoft للاسف مش لاقيها يا ريت حد ينزلها و يشرحلنا امكانياتها رابط الفيديو

up

رائع ا / سليم ا / ابو طه يفضل تحديد كافضل اجابة اذا تم ما تريد

up

تصدقوا يا جماعة انى بعد كل الشكر و الثناء و تنفيذ الامر مش لاقى فرق فى حاجه اضحكوا اضحكوا هههههههههههههههه

ا / ابراهيم الملف شغال انا حملت نفس الملف اللى رفعته و شغال معايا مش عارف حضرتك فى غنى انى اقولك فعل الماكرو لان الملف لا يفتح فى حالة تعطيل الماكرو و تظهر الشاشة اللى فى المشاركة 3

اسف جدا نسيت باس محرر الاكواد : 24229197 اصله ملف امن قومى

معلش يا استاذ ابراهيم العتب على الذاكرة اليك الكود (Private Sub Workbook_BeforeClose(Cancel As Boolean kh_wVisible False (ThisWorkbook.Close Not CBool(ThisWorkbook.Saved End Sub ()Private Sub Workbook_Open Application.Visible = False kh_AhlnWShln End Sub الملف يعمل فقط فى حالة تفعيل الماكرو تظهر شاشة باسوورد اما فى حالة تعطيل الماكرو تظهر الشاشة السابقة المطلوب عند غلق الملف من علامة × تغلق ايضا هذه الشاشة و لو امكن فى حالة تعطيل الماكرو ان تظهر رسالة مثلا " لا يمكنك فتح الملف " و يغلق الملف و هذا هو الملف بعد حذف صفوف لتقليل حجمه كنت هانسه بردو اليوزر : صلاح الباس : gs2014 Copy of master salah 2015.rar

ا / ابراهيم عذرا اعتقد انى نسيت ارفع الكود لو حضرتك تفتكر كنت محتاج غلق هذه الشاشة

ا / ابراهيم انا كنت محتاج بس السطر اللى بيقفل الشاشة دى و شكرا للمتابعة

شكرا / سليم بارك الله فيك المعادلة جميلة و معتمدة على عدد الصفوف و لكنها معتمدة فى الاساس على دالة vlookup لحد شهر 11 و عند شهر 12 بياخد من الورقة الاخرى تقريبا لو متزعلش منى انا كنت فقط محتاج انقل البيانات فقط من شهر 12 الى الشهور الاخرى و يبقى شهر 12 كما هو على حاله و دالة vlookup لوحدها سوف تفى بالغرض لو انا جبتها من شهر 12 انا بس كنت محتاج اختصر الوقت فى عمل المعادلات خصوصا انى سوف احول بعد ذلك كل هذه المعادلات الى قيم

السلام عليكم و رحمة الله و بركانه الكود ده خاص بعدم فتح الملف فى حالة اغلاق الماكرو عايز شرح له سطر سطر انا عندى ملف جاهز فيه تقريبا الكود ده بس فيه حاجة انا كسلان شوية و باطمع فى الوصول الى الافضل الملف لما بقفله بتظهر الشاشة دى هل ممكن تختفى زى الملف المرفق على فكرة فى احد الاكواد للاساتذة اعتقد ا / ياسر خليل او ا / ابراهيم ابو ليلة كنت بحاول اضحك عليه ( على الكود طبعا ) و اعطل الماكرو و افتح الملف ثم افعل الماكرو و افتح الملف اكثر من مرة فعلق فى مرة و كنت معطل الماكرو و فتح بس اعتقد ان الاستاذ الكريم اللى كان متابع معايا الموضوع حلها مش عارف بقى فى الكود المرفق و لا فى الكود اللى فى الملف الفعلى الخاص بى ارجو الشرح ان كان هناك تغيير فعلا عدم ظهور نافذة الاكسيل فى حالة تعطيل الماكرو.rar

مطلوب تعديل الكود ليقوم بالحفظ قبل الغلق

ا / ياسر اخيرا عرفت المشكلة فين المشكلة يا سيدى و لا الفلتر و لا اوفيس و لا ويندوز كمان المشكلة انى كنت منزل وظيفة اضافية لاحد الاساتذة كان عاملها و هى خاصة بقوائم اوفيس 2003 و لما شلت الوظيفة دى اشتغل الملف تمام و اضح ان الاوفيس 2013 زعل لما ضفتله قوائم اوفيس 2003

السلام عليكم و رحمة الله و بركاته عندى ملف حوالى 1500 صف مرتب بشكل معين الشهر ثم رقم الموظف ثم الاسم المطلوب باختصار شديد نقل البيانات فقط دون المعادلات من الصفوف الخاص بشهر 12 الى الصفوف الخاصة شالاشهر من 1 : 11 و ذلك لاعمدة البيانات فقط باللون الابيض ملحوظة : انا عامل معادلة vlookup على الكود لانه لا يتغير و لكن اعمدة البيانات كثيرة جدا انا عامل مرفق صغير جدا ملحوظة : انا عارف ان كان ممكن انقل كامل الصفوف الخاصة بشهر 12 و عمل لصق لها 11 مرة و لكن يوجد معادلات مختلفة فى المثال الحى مختلفة فى شهر 2 مختلفة عن شهر 1 شغل تأمينات تراكمى و ضرائب تراكمى ( مرتبات بعيد عنكوا) هل المعادلة هى الحل ام يوجد حل اسرع special copy value.rar

بارك الله فيك استاذ محمد صالح

اوفيس 2013 ويندوز 7 بس بصراحة موضوع تنزيل نسخة ويندوز جديدة مملة قوى بالنسبة لى للاسف معنديش طولة بال لتسطيب الويندوز بس علشان خاطرك انت يا ابو اليسر عندى نسخة جوزت هاسحبها فى اقرب وقت و ارد عليك

اعتقد انه ده هو الحل الاخير و المحتمل

و الله لعبتوا كل الالعاب شلت برامج كتيرة كانت بتفتح مع الويندوز مفيش فايدة فتحت على safe mode الاكسيل مفتحش اصلا نزلت اوفيس من جديد مفيش فايدة الطريقة الوحيدة اللى بيفتح بيها هو عن طريق ملف اكسيل اخر و من قائمة ملف اختار فتح و اشيل الفلتر بعدها يفتح عادى

على فكرة انا لاحظت ان المشكلة عندى فقط على جهازى جربت افتحه على اجهزة اخرى اقل رامات و بروسيسور و فتح ممكن تكون الرامات عندى مستهلكة فى برامج تفتح مع الويندوز مثلا

up