انتقل إلى المحتوى الرئيسي

كيف أذهب إلى أول أو آخر صف فارغ في إكسيل؟

يستغرق التمرير والذهاب إلى الصف الأول أو الأخير الفارغ وقتًا طويلاً أثناء العمل على ورقة عمل ضخمة. في هذه المقالة ، أقدم بعض الحيل للانتقال بسرعة إلى الصف الأول أو الأخير الفارغ في Excel.

انتقل إلى الصف الأول أو الأخير الفارغ باستخدام VBA

انتقل إلى آخر صف أو عمود فارغ باستخدام الأداة تحديد الصف الأخيرفكرة جيدة 3

انتقل إلى الصف الأول أو الأخير الفارغ باستخدام VBA

فيما يلي نوعان من VBA يمكنهما مساعدتك في الانتقال بسرعة إلى الصف الأول أو الأخير الفارغ في الورقة النشطة ، يرجى القيام بما يلي.

1. صحافة ALT + F11 مفاتيح للتمكين ميكروسوفت فيسوال باسيك للتطبيقات نافذة او شباك. انظر لقطة الشاشة:
doc أولا آخر فارغة 1

2. ثم اضغط إدراج > وحدة ولصق الكود أدناه في البرنامج النصي. انظر لقطة الشاشة:

فبا: انتقل إلى أول صف فارغ.

Sub Findfirstblankcell()
'UpdatebyExtendoffice20170712
    Dim Rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        If Rng.Value = "" Then
            MsgBox "No Value, in " & Rng.Address
        End If
    Next
End Sub
doc أولا آخر فارغة 2
doc أولا آخر فارغة 3

3. صحافة F5 لتشغيل الكود ، وينبثق مربع حوار لتذكيرك باختيار نطاق للعمل. انظر لقطة الشاشة:
doc أولا آخر فارغة 4

4. انقر OK. ينبثق مربع حوار لتذكيرك بمرجع الخلية للصف الفارغ الأول ، انظر الصورة:
doc أولا آخر فارغة 5

5. انقر OK بشكل متكرر لإغلاق ملف مايكروسوفت إكسل الحوار. ثم انتقل إلى الاسم مربع ، اكتب A2 فيه ، اضغط أدخل مفتاح ، وسوف تذهب إلى أول صف فارغ. انظر لقطة الشاشة:
doc أولا آخر فارغة 6

تلميح: إذا كنت تريد الانتقال إلى آخر صف فارغ ، فالرجاء استخدام رمز VBA أدناه ، وبعد الضغط على ملف F5 المفتاح ينتقل المؤشر مباشرة إلى آخر صف فارغ.

فبا: انتقل إلى آخر صف فارغ

Sub selectlastemptyrow()
Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub

ملاحظات: سيحدد VBA آخر خلية فارغة في العمود A. لتحديد آخر خلية فارغة في عمود آخر ، يرجى تغيير 1 في خلايا الكود (عدد الصفوف ، 1) إلى رقم آخر.

انتقل إلى آخر صف أو عمود فارغ باستخدام الأداة تحديد الصف الأخير

إذا كنت تريد الانتقال إلى آخر صف أو عمود فارغ بسرعة ، فيمكنك التقديم كوتولس ل إكسيلالصورة الصف الأخير or العمود الأخير utility. باستخدامهم ، يمكنك الانتقال بسرعة إلى آخر خلية غير فارغة للصف أو العمود الأخير في ورقة العمل الحالية ، ثم تكون الخلية التالية هي آخر صف فارغ أو عمود فارغ.

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 
تحميل مجانا
مجاني كامل المواصفات خلال 30 يومًا

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي:（تنزيل مجاني Kutools for Excel الآن!)

انقر كوتولس > أختار > حدد الخلية الأخيرة > الصف الأخير/العمود الأخير. انظر لقطة الشاشة:

doc أولا آخر فارغة 7

ثم يتم تحديد آخر خلية غير فارغة في الصف الأخير (أو العمود). فقط اضغط على مفتاح السهم لأسفل (أو مفتاح السهم الأيمن) لتنشيط آخر صف (أو عمود) فارغ.

المقالات النسبية

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup  |   VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير   |  مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا   |  إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات:  12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (3)
No ratings yet. Be the first to rate!
Eugênio
Eugênio
This comment was minimized by the moderator on the site
Ótimo post, Resolveu meu problema:
Achando a primeira célula vazia de determinada coluna de uma planilha.

Sub SelecionaPróximaCélulaVazia()
Cells(Rows.Count, 2).End(xlUp).Offset(1, 0).Select
End Sub

Este VBA selecionará a última célula vazia na coluna B. Para selecionar a última célula vazia em outra coluna, altere 2 no código Cells (Rows.Count, 2) para outro número.
Reply
0
0
test
test
This comment was minimized by the moderator on the site
Sub selectlastemptyrow()
Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub



How to try this on sheet2 from sheet1
Reply
0
0
alexis
alexis     test
This comment was minimized by the moderator on the site
Sub selectlastemptyrow()
Sheets("sheet2").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations