كيفية تأمين موضع الورقة ليكون مرئيًا دائمًا في Excel Workbook؟
إذا كان هناك أوراق متعددة في مصنف ، فعند التبديل إلى آخر ورقة ، سيتم إخفاء الورقة الأولى في شريط علامة تبويب الورقة كما هو موضح أدناه. الآن تريد قفل موضع ورقة رئيسية ليكون مرئيًا دائمًا ، كيف يمكنك التعامل معها؟
 |
 |
 |
وضع قفل الورقة مع VBA
هنا أقدم لك رمزين من رموز VBA للتعامل مع هذه الوظيفة.
القفز إلى الورقة
1. صحافة ALT + F11 مفاتيح لتمكين مايكروسوفت فيجوال بيسك لويندوز.
2. انقر إدراج > وحدة، ثم انسخ الكود أدناه والصقه في البرنامج النصي.
فبا: انتقل إلى الورقة الرئيسية
Sub GoToSheet()
'UpdatebyExtendoffice20180427
Sheets("Master").Activate
End Subملاحظات: في شريحة الكود الأوراق ("الرئيسية").تنشيط، يمكنك تغيير الماجستير إلى أي اسم ورقة ما تحتاج إليه.
3. ثم احفظ هذا الرمز، ثم ارجع إلى المصنف، وانقر فوق المطور > وحدات الماكرو.
4. في ال الماكرو في مربع الحوار، حدد الاسم الرمزي الذي أدخلته للتو، وانقر فوق مزيد من الخيارات، أنشئ اختصارًا لتشغيل هذا الرمز.
5. انقر OK وإغلاق الماكرو الحوار.
من الآن، أثناء الضغط على الاختصار الذي قمت بإنشائه، سيتم تنشيط الورقة الرئيسية مهما كانت الورقة التي تستخدمها.
احتفظ بالورقة دائمًا في المقدمة
1. صحافة ALT + F11 مفاتيح لتمكين مايكروسوفت فيجوال بيسك لويندوز.
2. نقرتين متتاليتين ThisWorkbook من مشروع- VBAProject الجزء، ونسخ ولصق التعليمات البرمجية أدناه إلى البرنامج النصي.
VBA: احتفظ بالورقة دائمًا في المقدمة
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'UpdatebyExtendoffice2018027
Dim xSheet As Worksheet
Application.EnableEvents = False
Set xSheet = Sheets("master")
If Sh.Name <> xSheet.Name Then
Sh.Move , xSheet
xSheet.Activate
Sh.Activate
End If
Application.EnableEvents = True
End Sub
3. احفظ الكود وأغلق نافذة VBA. من الآن، مهما كانت الورقة التي تنقر عليها، تظل الورقة الرئيسية دائمًا في مقدمة شريط علامات التبويب.
 |
|
 |
ملحوظة: في الكود أعلاه، "رئيس" هو اسم الورقة الذي تريد أن يظل مرئيًا، قم بتغييره حسب حاجتك.
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
