كيف يمكن الانتقال تلقائيًا إلى الخلية التالية بعد إدخال البيانات في Excel؟
في هذه المقالة، أقدّم لك الحيل الذكية التي تتيح انتقال المؤشر تلقائيًا إلى الخلية التالية لإدخال رقم التسلسل دون الحاجة إلى الضغط على مفتاح Enter في Excel.
تعبئة تسلسل مكوّن من 4 أرقام تلقائيًا باستخدام Kutools لـ Excel 
الانتقال التلقائي إلى الخلية على اليمين التالية بعد إدخال 4 أرقام دون الضغط على مفتاح Enter باستخدام VBA
إليك كود VBA الذي يُمكّنك من الانتقال تلقائيًا إلى الخلية التالية على اليمين فور إدخال رقم مكوَّن من 4 خانات، دون الحاجة إلى الضغط على مفتاح Enter.
1. اضغطAlt + F11 لفتح نافذةمايكروسوفت Visual Basic for Applications.
2. انقرإدراج > وحدة نمطية، ثم الصق كود VBA أدناه في نص الوحدة النمطيةModule. راجع لقطة الشاشة:
VBA: الانتقال التلقائي إلى الخلية التالية على اليمين فور إدخال رقم مكوَّن من أربع خانات.
Sub FourCharEntry1()
'UpdatebyExtendoffice20160614
Dim xStr As String
Dim I As Integer
Dim K As Integer
xStr = Application.InputBox("Enter string", "Kutools for Excel", , , , , , 2)
K = 0
Application.ScreenUpdating = False
For I = 1 To Len(xStr) Step 4
ActiveCell.Offset(0, K) = "'" & Mid(xStr, I, 4)
K = K + 1
Next
Application.ScreenUpdating = True
End Sub
3. اضغطF5 لتشغيل الكود، وستظهر نافذة حوارية باسمKutools لـ Excelيمكنك من خلالها إدخال أرقام متتالية دون أي فواصل. راجع لقطة الشاشة:
4. انقرموافق. الآن، أصبحت الأرقام الأربعة كلها في خلية واحدة مرتبة من اليسار إلى اليمين.
تلميح: إذا كنت ترغب في إدخال أرقام مكوَّنة من 5 أو 6 خانات في الخلية، يمكنك تغيير الرقم 4 إلى 5 أو 6 أو أي عدد آخر في الكود.
تعبئة تسلسل مكوّن من 4 أرقام تلقائيًا باستخدام Kutools لـ Excel
باستخدامKutools لـ Excel – أداةٍ مفيدة، يمكنك تعبئة أرقام التسلسل تلقائيًا في نطاقٍ ما دون الحاجة إلى الضغط على مفتاح Enter، وذلك باستخدام أداةإدراج رقم تسلسليالخاصة بها.
بعدالتثبيت المجانيKutools لـ Excel، يُرجى اتباع الخطوات التالية:
1. حدد العمود أو الصف الذي تريد تعبئته بالتسلسل، ثم انقرKutools > إدراج > إدراج رقم تسلسلي. راجع لقطة الشاشة:
2. في مربع الحوارإدراج رقم تسلسلي، انقرجديدلتوسيع مربع الحوار. راجع لقطة الشاشة:
3. بعد ذلك، حدد التسلسل بالشكل الذي تريده. راجع لقطة الشاشة:
4. انقرإضافة > تعبئة النطاق، وسيتم تعبئة نطاق التحديد تلقائيًا بأرقام متتالية.
تلميح: باستخدام أداةإدراج رقم تسلسلي، يمكنك إدراج تسلسل متكرر بسهولة! فعّل الخيارالرقم الأخيرفي مربع الحوار، وأدخل الرقم الأخير الذي تريده في مربع النص الموجود على اليمين، وستُملأ أرقام التسلسل تلقائيًا بتكرار كل 10 أرقام. راجع لقطة الشاشة:
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل