سيد الأكرت قام بنشر يونيو 19, 2015 مشاركة قام بنشر يونيو 19, 2015 ارجو المساعدة فى تعديل الكود الموجود في كشف المناداة والذي يخفى رقم اللجنة ويظهرها ولكن عند عمل حماية للورقة لا يعمل الكود كما ارجو اضافة كود آخر لجعل الشيت يفتح على الصفحة الرئيسية وعند اختيار أي ورقة من ورقات الملف تنشط وحدها وتختفى بقية الصفحات اتمنى عمل المطلوب واكون شاكرا وكل عام وانتم بخير شيت.rar رابط هذا التعليق شارك More sharing options...
زوهير قام بنشر يونيو 20, 2015 مشاركة قام بنشر يونيو 20, 2015 السلام عليك اخي الكريم اليك الحل لعله يكون المطلوب شيتvb.rar رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 20, 2015 الكاتب مشاركة قام بنشر يونيو 20, 2015 السلام عليك اخي الكريم اليك الحل لعله يكون المطلوب هناك مشكلة فى الملف اخى الكريم ويبدا بعبارة صادف اكسيل خطأً رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 20, 2015 مشاركة قام بنشر يونيو 20, 2015 السلام عليكم وربنا يتقبل صيامكم وصيامنا اتفضل أخي شوف المرفق وكلمة سر الورقة الثانية هي 123 يمكنك تغييرها من خلال الكود شيت.rar رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 20, 2015 الكاتب مشاركة قام بنشر يونيو 20, 2015 السلام عليكم وربنا يتقبل صيامكم وصيامنا اتفضل أخي شوف المرفق وكلمة سر الورقة الثانية هي 123 يمكنك تغييرها من خلال الكود الله الله ينور يا أستاذ على ولكن إذا سمحت لى هل إذا قمت بإضافة صفحات أخرى أو أوراق عمل للشيت سيظل الكود يعمل على إخفاء كل الأوراق ما عدا الورقة المطلوبة ، وهل يمكن اضافة لجعل الشيت يفتح على الصفحة الرئيسية وبالتالى اختيار الصفحات المطلوبة منها ، ارجو ألا أكون قد اثقلت عليك وكل عام وأنت بخير رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 20, 2015 مشاركة قام بنشر يونيو 20, 2015 السلام عليكم وربنا يتقبل صيامكم وصيامنا اتفضل أخي شوف المرفق وكلمة سر الورقة الثانية هي 123 يمكنك تغييرها من خلال الكود الله الله ينور يا أستاذ على ولكن إذا سمحت لى هل إذا قمت بإضافة صفحات أخرى أو أوراق عمل للشيت سيظل الكود يعمل على إخفاء كل الأوراق ما عدا الورقة المطلوبة ، وهل يمكن اضافة لجعل الشيت يفتح على الصفحة الرئيسية وبالتالى اختيار الصفحات المطلوبة منها ، ارجو ألا أكون قد اثقلت عليك وكل عام وأنت بخير إفطار شهيا أخي وربنا يتقبل الصيام لم استخدم كود في اخفاء الشيتات ولكنها من ضمن إعدادات الإكسل للملف بتاعك وفي نسخة 2007 أو 2010 من أيقونة الإكسل أو تبويب File اختر Excel Option هتفتح نافذه إختر منها Advanced وابحث في النافذة على Show Sheet Tabs واحذف منها اللعلامة واَضغط أوكي ولإظهارها رجع فيها العلامة --- لجعل الملف يفتح على أي صفحة انت تحددها افتح محرر الأكواد وفي حدث Thisworkbook انسخ الكود التالي Private Sub Workbook_Open() Sheets("الصفحة الرئيسية").Activate End Sub ويمكنك تغيير اسم الفصحة كما تشاء وإذا أردت ظهور رسالة تنبيه لتجهل المستخدم يقوم باستخدام قائمة التنقلات بين الصفحات ممكن تخلي الكود هكذا Private Sub Workbook_Open() Sheets("الصفحة الرئيسية").Activate MsgBox "يمكنك استخدام قائمة التنقلات بين الصفحات للتنقل خلال محتوى الملف", vbInformation, "مرحبا" End Sub رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 20, 2015 الكاتب مشاركة قام بنشر يونيو 20, 2015 السلام عليكم وربنا يتقبل صيامكم وصيامنا اتفضل أخي شوف المرفق وكلمة سر الورقة الثانية هي 123 يمكنك تغييرها من خلال الكود الله الله ينور يا أستاذ على ولكن إذا سمحت لى هل إذا قمت بإضافة صفحات أخرى أو أوراق عمل للشيت سيظل الكود يعمل على إخفاء كل الأوراق ما عدا الورقة المطلوبة ، وهل يمكن اضافة لجعل الشيت يفتح على الصفحة الرئيسية وبالتالى اختيار الصفحات المطلوبة منها ، ارجو ألا أكون قد اثقلت عليك وكل عام وأنت بخير إفطار شهيا أخي وربنا يتقبل الصيام لم استخدم كود في اخفاء الشيتات ولكنها من ضمن إعدادات الإكسل للملف بتاعك وفي نسخة 2007 أو 2010 من أيقونة الإكسل أو تبويب File اختر Excel Option هتفتح نافذه إختر منها Advanced وابحث في النافذة على Show Sheet Tabs واحذف منها اللعلامة واَضغط أوكي ولإظهارها رجع فيها العلامة --- لجعل الملف يفتح على أي صفحة انت تحددها افتح محرر الأكواد وفي حدث Thisworkbook انسخ الكود التالي Private Sub Workbook_Open() Sheets("الصفحة الرئيسية").Activate End Sub ويمكنك تغيير اسم الفصحة كما تشاء وإذا أردت ظهور رسالة تنبيه لتجهل المستخدم يقوم باستخدام قائمة التنقلات بين الصفحات ممكن تخلي الكود هكذا Private Sub Workbook_Open() Sheets("الصفحة الرئيسية").Activate MsgBox "يمكنك استخدام قائمة التنقلات بين الصفحات للتنقل خلال محتوى الملف", vbInformation, "مرحبا" End Sub بعد تنفيذ الخطوات ظهرت مشكلتان عندى الأولى بالفعل فتح الملف على الصفحة الرئيسية ولكن عند اختيار صفحة لا تختفى بقية الصفحات من أسفل بل تظهر أسماؤها كلها والثانية عند عمل كود كشف المناداة وجدت أن سهم القائمة المنسدلة لا يظهر ليمكنننى من اختيار رقم اللجنة عند حماية الورقة هل يمكننى ارسال الملف كاملا لحضرتك لتفيدنا بعلمك رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 20, 2015 مشاركة قام بنشر يونيو 20, 2015 مرحبا أخي الفاضل ياريت ترسل الملف يبقى أفضل عشان نقدر نجرب ونحل أي مشكلة ممكن تظهر إن شاء الله رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 20, 2015 الكاتب مشاركة قام بنشر يونيو 20, 2015 مرحبا أخي الفاضل ياريت ترسل الملف يبقى أفضل عشان نقدر نجرب ونحل أي مشكلة ممكن تظهر إن شاء الله استطعت بفضل الله وعونكم من حل المشكلة المتعلقة باخفاء الصفحات ولكن تبقى المشكلة الثانية ونحن نتعلم منكم دائما وشكرا لتعبكم معى وعندما حاولت رفع الملف جاءت رسالة بان الملف حجمه كبير وهذا والله ما حدث والمشكلة الان هى ان سهم القائمة المسدلة عند حماية الصفحة لا يظهر حتى يمكن اختيار رقم اللجنة منه وجزاك الله خيرا رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 20, 2015 مشاركة قام بنشر يونيو 20, 2015 مرحبا أخي الفاضل ياريت ترسل الملف يبقى أفضل عشان نقدر نجرب ونحل أي مشكلة ممكن تظهر إن شاء الله استطعت بفضل الله وعونكم من حل المشكلة المتعلقة باخفاء الصفحات ولكن تبقى المشكلة الثانية ونحن نتعلم منكم دائما وشكرا لتعبكم معى وعندما حاولت رفع الملف جاءت رسالة بان الملف حجمه كبير وهذا والله ما حدث والمشكلة الان هى ان سهم القائمة المسدلة عند حماية الصفحة لا يظهر حتى يمكن اختيار رقم اللجنة منه وجزاك الله خيرا طيب أخي ايه نوع القائمة المنسدلة لديك ؟ ولو أمكن تعمل في النموذج المصغر قائمة شبيهه بها لأن المفترض أنها تعمل حتى والصفحة محمية رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 20, 2015 الكاتب مشاركة قام بنشر يونيو 20, 2015 سوف ارفعها لحضرتك بعد الفطار فالآن أذان المغرب بمصر وكل عام وانت بخير رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 20, 2015 الكاتب مشاركة قام بنشر يونيو 20, 2015 (معدل) انظر اخى الى الخلية b9 فى ورقة كشف المناداة فقد تم ربطها بالعمودc في ورقة بيانات التلاميذ وبعد الضغط على اظهار رقم اللجنة يختفى سهم القائمة الذي نختار منه رقم اللجنة المرادة وهذا يكون في حالة حماية الورقة ارجو ان يكون المعنى واضح شيت2.rar تم تعديل يونيو 20, 2015 بواسطه سيد تيجر رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 20, 2015 مشاركة قام بنشر يونيو 20, 2015 انظر اخى الى الخلية b9 فى ورقة كشف المناداة فقد تم ربطها بالعمودc في ورقة بيانات التلاميذ وبعد الضغط على اظهار رقم اللجنة يختفى سهم القائمة الذي نختار منه رقم اللجنة المرادة وهذا يكون في حالة حماية الورقة ارجو ان يكون المعنى واضح السلام عليكم أخي حضرتك تقصد الفلترة Auto filter وهي مش بتشتغل على الشيت المحمي إلا بأكواد ضع الكود التالي في حدث Thisworkbook وان شاء الله تقدر تعمل فلتره عادي والشيت محمي Private Sub Workbook_Open() Worksheets("كشوف المناداة ").EnableAutoFilter = True Worksheets("كشوف المناداة ").Protect contents:=True, Password:="123", userInterfaceOnly:=True End Sub والباسورد زي ما حطيناها 123 لو حبيت تغيرها لازم تغيرها في الكود اللي فوق وفي الكود السابق بتاع إخفاء رقم اللجنة رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 20, 2015 الكاتب مشاركة قام بنشر يونيو 20, 2015 (معدل) انظر اخى الى الخلية b9 فى ورقة كشف المناداة فقد تم ربطها بالعمودc في ورقة بيانات التلاميذ وبعد الضغط على اظهار رقم اللجنة يختفى سهم القائمة الذي نختار منه رقم اللجنة المرادة وهذا يكون في حالة حماية الورقة ارجو ان يكون المعنى واضح السلام عليكم أخي حضرتك تقصد الفلترة Auto filter وهي مش بتشتغل على الشيت المحمي إلا بأكواد ضع الكود التالي في حدث Thisworkbook وان شاء الله تقدر تعمل فلتره عادي والشيت محمي Private Sub Workbook_Open() Worksheets("كشوف المناداة ").EnableAutoFilter = True Worksheets("كشوف المناداة ").Protect contents:=True, Password:="123", userInterfaceOnly:=True End Sub والباسورد زي ما حطيناها 123 لو حبيت تغيرها لازم تغيرها في الكود اللي فوق وفي الكود السابق بتاع إخفاء رقم اللجنة للأسف أخى الكريم لم يظهر سهم القائمة أيضا رغم تنفيذي لهذه الخطوة إن أمكن أن تعدلها على الشيت المرفق " شيت 2 " وترسلها واكون شاكرا لك ، أو إن أمكن أن تدلنى على قائمة منسدلة بطريقة اخرى تصلح مع الكود تم تعديل يونيو 20, 2015 بواسطه سيد تيجر رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 21, 2015 مشاركة قام بنشر يونيو 21, 2015 السلام عليكم اتفضل أخي شوف الملف المرفق شيت2.rar رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 21, 2015 الكاتب مشاركة قام بنشر يونيو 21, 2015 السلام عليكم اتفضل أخي شوف الملف المرفق السلام عليكم اتفضل أخي شوف الملف المرفق انظر أخى الكريم على إلى الصورتين المرفقتين لتوضيح المشكلة من آخر لف أرسلته لى فالأولى فى حالة عدم حماية الورقة نستطيع ان ننتقى من القائمة المنسدلة اللجنة التى نريدها ، أما فى الحالة الثانية فبعد أن حدثت الحماية بالضغط على زر إظهار اللجنة لم نستطع ان نختار وظهرت رسالة بأن الخلية محمية رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 21, 2015 مشاركة قام بنشر يونيو 21, 2015 السلام عليكم أخي الكريم وصوما مقبولا وإفطارا شهيا بمشية الله انت بتحاول تضغط مرتين في الخلية ؟ لانك لو بتحاول كده مش هتقدر إلا لو فكينا حماية الخلايا دي انت عاوزها تكون قابلة للتعديل؟ لأن اللي احنا عاملينه إنك مجرد تعمل فلتر فقط للقيم الموجودة في رقم اللجنة انا حاليا مش واضح ليا ايه اللي انت عاوز تنفذه تحديدا في أرقام اللجان رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 21, 2015 الكاتب مشاركة قام بنشر يونيو 21, 2015 السلام عليكم أخي الكريم وصوما مقبولا وإفطارا شهيا بمشية الله انت بتحاول تضغط مرتين في الخلية ؟ لانك لو بتحاول كده مش هتقدر إلا لو فكينا حماية الخلايا دي انت عاوزها تكون قابلة للتعديل؟ لأن اللي احنا عاملينه إنك مجرد تعمل فلتر فقط للقيم الموجودة في رقم اللجنة انا حاليا مش واضح ليا ايه اللي انت عاوز تنفذه تحديدا في أرقام اللجان أنا عارف إنى تعبتك معاي ، واللى أنا عايزه أن يكون القائمة المنسدلة مفتوحة في حالة حماية الورقة لكي استطيع اختيار لجنة معينة مثل 1 أو 2 لتظهر اسماء تلاميذ اللجنة دي فقط دون غيرها وبذلك استطيع طباعة كل لجنة على حدة وبالطبع سيكون الشيت محمى وفى هذه الحالة فان خانة رقم اللجنة تكون محمية ولا استطيع اختيار أي لجنة منها رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 22, 2015 مشاركة قام بنشر يونيو 22, 2015 السلام عليكم ورحمة الله أخي الكريم صباح الخير ويارب يكون الصيام خفيف عليك ومقبول بإذن الله وما تقلت علي أو أي شئ أخي بيسعدنا كلنا نقدم المساعدة اللي نقدر عليها اللي حضرتك طلبته هو فعلا اللي بيحصل انك تقدر تعمل فلتر للرقم اللجنة في أثناء حماية الصفحة انا استخدم أوفيس 2007 ويعمل معي الكود بشكل سليم بدون مشاكل في إمكانية تجرب على 2007؟ رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر يونيو 22, 2015 الكاتب مشاركة قام بنشر يونيو 22, 2015 السلام عليكم ورحمة الله أخي الكريم صباح الخير ويارب يكون الصيام خفيف عليك ومقبول بإذن الله وما تقلت علي أو أي شئ أخي بيسعدنا كلنا نقدم المساعدة اللي نقدر عليها اللي حضرتك طلبته هو فعلا اللي بيحصل انك تقدر تعمل فلتر للرقم اللجنة في أثناء حماية الصفحة انا استخدم أوفيس 2007 ويعمل معي الكود بشكل سليم بدون مشاكل في إمكانية تجرب على 2007؟ معذرة كنت بالعمل ولسه فاتح ، إذن المشكلة إن الفلترة لا تعمل مع 2003 وللاسف الشيت باوفيس 2003 هل يمكن الوصول الى قائمة اخرى تحل الموضوع رابط هذا التعليق شارك More sharing options...
علي الشيخ قام بنشر يونيو 22, 2015 مشاركة قام بنشر يونيو 22, 2015 ولا يهمك أخي ربنا يوفقك والمفترض أنه يشتغل على 2003 عادي لأن الكود بسيط وأكيد يتوافق مع 2003 ولو لدي 2003 كنت جربته عامة هحاول أشوفلك طريقة تانية أو احد الاخوة يدخل يجرب الكود ويفيدنا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.