كود يقوم باخفاء جميع أوارق العمل ما عدا الورقة الرئيسية

[خالد القدس]

السلام عليكم أخواني الأفاضل هل يوجد كود يقوم باخفاء جميع أوارق العمل ما عدا الصفحة الاولى مثلا زادكم الله علما نافعا وعملا صالحا

[عبدالله باقشير]

السلام عليكم

شاهد الرابط التالي:

http://www.officena.net/ib/index.php?showtopic=30478&st=0&p=152688&hl=%C7%CE%DD%C7%C1&fromsearch=1&#entry152688

[محمد يحياوي]

استاذ خالد الفاضل وجدت هذا الملف عندي ارجو ان يفيدك

التحميل

[خالد القدس]

السلام عليكم أستاذي الفاضل خبور وأستاذي الفاضل يحياوي بارك الله فيكم الكواد يعملان تمام ولكن يتم تعطيل كل الأزرار التي بها أوامر للدخول لتلك الصفحات المخفية ما العمل ؟؟

[عبدالله باقشير]

السلام عليكم

ولكن يتم تعطيل كل الأزرار التي بها أوامر للدخول لتلك الصفحات المخفية ما العمل ؟؟

الورقة مخفية فيجب اظهارها قبل الانتقال اليها

لنقل مثلا الورقة اللي اسمها "khboor"

ضف الى كود الانتقال اليها

في بداية الكود

Sheets("khboor").Visible = True

ثم انتقل اليها

Sheets("khboor").Select

[سالم شباني]

السلام عليكم

أستاذ خالد حياك الله

قمت بمحاولة لفتح الورقة المسماة ( ورقة1) بماكرو صغير

أرجو أن يكون هو ما تريد ( حدد اسم الورقة في الكود ) ثم جرب

___online.zip

[سالم شباني]

السلام عليكم

معذرة للأستاذ خبور في الوقت الذي كنت أكتب الرد لم أر ردك

[محمد يحياوي]

استاذ خالد يمكنك الاستعانة بالملف التلي في اظهار او اخفاء الملفات

الرابط

[خالد القدس]

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

[سالم شباني]

السلام عليكم

زيادة في إثراء الموضوع إليك أخي خالد الملف التالي

سالم.rar

[خالد القدس]

السلام عليكم ألف شكر أستاذي العزيز سالم جعله الله في ميزان حسناتك