كيف يمكنني التمرير إلى ورقة محددة أو إلى جميع الأوراق عند أعلى الصف في Excel؟
سواء أردت التمرير إلى ورقة محددة أو إلى جميع الأوراق في المصنف حتى الأعلى، يوفّر كود VBA حلاً سريعًا وفعالًا. يشرح هذا الدليل كيفية استخدام نصوص VBA البسيطة لتبسيط التنقّل والتركيز بسلاسة على بياناتك.
التمرير إلى ورقة محددة أو جميع الأوراق في أعلى صف باستخدام كود VBA
التمرير إلى ورقة محددة أو جميع الأوراق في أعلى صف باستخدام كود VBA
لتمرير ورقة محددة أو جميع الأوراق إلى أعلى صف في Excel، اتبع الخطوات التالية:
1. في ورقة العمل التي تريد تمريرها إلى الأعلى، اضغط على مفاتيحAlt+F11 لفتح نافذةMicrosoft Visual Basic for Applications.
2. في نافذةMicrosoft Visual Basic for Applications، انقر فوقإدراج > وحدة. بعد ذلك، انسخ والصق أحد كودَي VBA أدناه في نافذة الكود.

كود VBA: تمرير ورقة عمل محددة إلى أعلى صف
Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub كود VBA: تمرير جميع أوراق العمل إلى أعلى صف
Sub Select_A1_On_Activeworkbook()
Dim xSheet As Worksheet
For Each xSheet In ActiveWorkbook.Sheets
xSheet.Activate
ActiveSheet.Range("A1").Select
Next
ActiveWorkbook.Worksheets(1).Activate
End Sub 3. بعد إدخال كود VBA في نافذة الكود، اضغط على مفتاحF5 لتشغيل الكود.
ستتم عملية التمرير فورًا إلى الأعلى في ورقة العمل النشطة أو في جميع أوراق العمل ضمن المصنف الحالي.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل