أبو محمد سلامة

الأخ العزيز إضافة لحلول أساتذتنا الكرام هذا حل في نفس الإطار يتم الحماية أو فك الحماية لكل الأوراق بكلمة حماية تختارها وتستطيع تغييرها. السلام عليكم حماية كل الأوراق بكلمة حماية.rar

الأخ العزيز هاني بالملف المرفق فكرة ارجو ان تكون ما تحتاج . SER-1.rar

الأخ العزيز هاني بعد إذن أساتذتنا ولهم طبعا كل الشكر هذا الكود لإخفاء وإظهار علامات تبويب أوراق العمل ، وأستسمح أستاذنا الكريم هشام شلبي في استخدام نفس ملفه مع تبديل الأكواد . اخفاء واظهار علامات تبويب الأوراق.rar

الأخ العزيز ابو البراء جزاك الله كل خير على كلامك وذوقك وعلى المعلومة الإضافية ولكن ليعمل الكود بهذه الطريقة عند الرغبة في مسح ال "غ" تحتاج ان تنتقل لأي خلية أخرى ثم تختار الخلية المطلوب مسح الغياب منها ، ولكن إن أردت تسهيل العملية بكليك واحدة ممكن تستخدم كود Before Right Click وفي الحالة دي تستخدم كليك واحدة يمين ، عموما في المرفق وضعت الفكرتين معا دبل كليك وكليك يمين والطريقتين بيعملوا بشكل جيد . ولك الشكر الكبير . تسجل غياب طلاب بدبل كليك أو كليك يمين.rar

الأخ العزيز أيمن إسمح لي وبعد إذن الأخ العزيز ابو البراء أن أكمل ما طلبت بخصوص ربط الصفحات في عملية الانتقال بينهم وتسجيل الغياب بدبل كليك يكتب "غ" أو يمسحها. مع الشكر للجميع سجل غياب طلاب.rar

الأخ الكريم أبو أكرم شرح رائع ماشاء الله مشكور ويعطيك العافية ويارب يجعله في ميزان حسناتك .

الأخ الفاضل ابو اكرم مشكور على المعلومات المهمة بس ما فهمت كيف فكيت حماية الدخول على أكواد الملف من محرر الفيجوال أو عرفت كلمة الحماية على الأكواد .. يا ليت تفيدنا بعلمك أخي الكريم مع وافر الشكر مقدماً .

الأخ الفاضل الخالدي طريقة ذكية وبسيطة بس كيف نعرف موقع الورقة المحتوية على كلمة الحماية لو ما نبهنا الأخ عماد وموقع الخليةالمحتوية على كلمة الحماية لو ماكنت عرفتها من ملف أخونا أبو أكرم ياليت تفيدنا أفادكم الله . أخوك ابو محمد

الأخ الفاضل أبو أكرم ماشاء الله عليك مبين عليك خطير ، ماشاء الله لاقوة إلا بالله والله يزيدك من العلم ، بس ياسيدي ياليت تخبرنا كيف قدرت تفك الحماية تبع الفيجوال صراحة هاي أول مرة أعرف إنها ممكن تخترق فياليت تعطينا الطريقة مع وافر الشكر مقدماويعطيك الف عافية . اخوك ابو محمد

أخي الفاضل رجاء تجربة الملف المرفق . New Microsoft Office Excel Worksheet (8).rar

الآن رمضان كريم !!! أكيد رمضان كريم ولكن لتوضيح الأمور فإن ما قمت به أنت هو تعديل بكود الترحيل بوضع Set MySheets = Sheets(Cells(A, 3).Text) وضعتها بدل DIM MySheets AS STRING التي وضعها أخونا إكسيلجي مما يؤكد كلامي ان المشكلة كانت بالكود ولم تكن بتنسيق الرقم كما ادعيت في كلامك وبأسلوب ما زلت أصر واؤكد أنه غريب على هذا المنتدى وأنه غير لائق : فلم يرى اخونا المشرف ان القائمة المنسدلة تعرض اسم الحساب كرقم هندسى ! فيجب ان تكون القائمة المنسدلة لأسماء الحسابات تحتوى الأسماء الحقيقية لأسماء الحسابات وليس كرقم هندسى وياريت مثل ما بدأت ردك برمضان كريم تكون إنت كمان كريم وتنتهي عن أسلوبك المستفز وتقدم شيء للمنتدى يدل على ذلك بدل تصيد الهفوات للظهور والتفاخر . أبو محمد

الأخ noon لم استغرب أبداً أن تقوم أنت بالذات بالرد على كلامي بل توقعت ذلك بنسبة 100% فلتلاحظ اسلوبك واسلوب من تدافع عنه ولتقارن بين اسلوبكما واسلوب أي عضو في المنتدى لتعرف بحق من هم " المعتدين " ومن هم اللذين يتعاملوا مع مشرفي المنتدى الأفاضل بقلة احترام ، وكنت أتمنى أن يقوم صديقك excel-1 بالرد على كلامي واإثبات عكسه إن استطاع . أبو محمد

الأخ EXCEL-1 إن لم يكن لديك الحد الأدني من أصول اللياقة في التخاطب والتعامل مع الناس فمن المؤكد أن هذا المنتدى ليس المكان الذي يجب أن تطل فيه بهذا المستوى من الأسلوب ، وإن كنت ترى أنك عالم وجهبز وأنك أفضل من مشرفي المنتدى المحترمين فهلا عدت إلا صوابك وتذكرت أن لا كبير في العلم " ففوق كل ذي علم عليم " وإن كنت منصف فقم بإلغاء التعديل الذي قام به الأخ إكسيلجي واترك تعديلك الذي جئت به وأرينا كيف ستحل المشكلة بتعديل تنسيق الرقم فقط وقد فاتك أن الرقم على وضعه بدون تعديل تنسيقه يتم ترحيله بتعديل أخي إكسيلجي في الكود وهو وضع تعريف للمتغير MYSHEET بتعريفه بالسطر DIM MYSHEET AS STRING فهل اريتنا مهارتك يا عبقري في حذف هذا السطر والاكتفاء بتعديلك الغبقري لتنسيق الرقم في حل مشكلة الترحيل ، ثم يا أخي طالما انت عبقري إلى هذا الحد فلماذا لاتظهر عبقريتك إلا في انتقاد عمل الآخرين في المشاركتين اليتيمتين اللي شاركت بيهم لو انت عبقري بجد ورينا عبقريتك في مشاركات خاصة بك في دروس في ال VBA التي يحتاجها الجميع فهلا قبلت التحدي وكنت عضو إيجابي بدل الانتقاد الغير مبرر والغير منطقي . أبو محمد سلامة

أخي العزيز / أبو أسامة أشكرك على اهتمامك وسرعة الرد ولكن لازال أخي الحماية لاتعمل مع الخلايا التي اكتب بها أي معادلة ولا حتى الورقة تحمى بعد كتابة أي معادلة بأي خلية ، لذا أرجو الإفادة عن سبب المشكلة جزاكم الله خيرا . أخوكم أبو محمد

أخي أبو أسامة شكراً على المعلومة ، ولكن مع الأسف الكود لا يعمل على هذا النحو ك WORKSHEET CODE ويمكن تجربة ذلك بنفسك . أبو محمد