كيفية تكرار قيمة الخلية x مرات في إكسيل؟
على سبيل المثال ، لديك قائمة بالقيم في العمود A ، وتريد تكرار القيم عددًا محددًا من المرات بناءً على عدد المرات في العمود B ، كما هو موضح في لقطة الشاشة اليسرى ، كيف يمكنك تحقيق ذلك في Excel؟
كرر قيم الخلية X مرات باستخدام الصيغة والعمود المساعد
لتكرار قيم الخلية X مرات ، يمكنك إدراج بعض الأعمدة المساعدة ثم تطبيق صيغة بسيطة ، يرجى اتباع الخطوات التالية:
1. أدخل عمودًا على يمين العمود A ، واكتب 1 في الخلية A2 ، انظر الصورة:
2. ثم ضع هذه الصيغة = A2 + C2 في A3 ، واسحب مقبض التعبئة إلى الخلية A6 ، انظر الصورة:
3. ثم أدخل 1 في الخلية D2 ، واملأ الرقم عن طريق سحب Auto Fill إلى 12 وهو العدد الإجمالي لعدد المرات في العمود C ، انظر الصورة:
4. ثم أدخل هذه الصيغة = VLOOKUP (D2، $ A $ 1: B $ 6,2،XNUMX) في الخلية E2 وانسخها ، ستحصل على النتيجة التالية:
- ملاحظة:
- 1. في هذه الصيغة ، D2 يشير إلى الخلية الأولى التي تم ملؤها بالتسلسل الرقمي ، و A1: B6 لتقف على نطاق العمود المساعد الأول وقيم الخلية الأصلية التي تحتاج إلى تكرارها.
- 2. بعد الحصول على القيم المكررة ، يمكنك نسخها ولصقها كقيم في أي مكان آخر.
قم بنسخ وإدراج الصفوف X مرات بناءً على رقم محدد بسهولة
عادة ، لا توجد طريقة جيدة لنسخ وإدخال الصفوف عدة مرات باستثناء التعامل مع النسخ والإدراج يدويًا. ولكن مع كوتولس ل إكسيل's صفوف / أعمدة مكررة بناءً على قيمة الخلية ميزة يمكنك حل هذه المشكلة بكل سهولة. انقر لتنزيل Kutools for Excel!
كوتولس ل إكسيل: مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود خلال 60 يومًا. تنزيل وتجربة مجانية الآن!
كرر قيم الخلية X مرات باستخدام كود VBA
إذا كنت تعتقد أن الطريقة الأولى يصعب فهمها ، فيمكنني هنا أيضًا تقديم رمز VBA لحلها.
1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
كود فبا: كرر قيم الخلية X مرة
Sub CopyData()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
For Each Rng In InputRng.Rows
xValue = Rng.Range("A1").Value
xNum = Rng.Range("B1").Value
OutRng.Resize(xNum, 1).Value = xValue
Set OutRng = OutRng.Offset(xNum, 0)
Next
End Sub
3. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسيظهر مربع موجه لتذكيرك بتحديد النطاق الذي يحتوي على القيم والأوقات المتكررة ، انظر لقطة الشاشة:
4. وانقر OK، سيظهر مربع موجه آخر للسماح لك بتحديد خلية لوضع النتيجة ، انظر لقطة الشاشة:
5. ثم اضغط OK، وستحصل على نتيجة مفادها أن القيم المحددة قد تكررت في الأوقات المحددة حسب حاجتك.
قم بنسخ وإدراج قيم الخلية X مرة باستخدام ميزة رائعة
في بعض الأحيان ، قد تحتاج إلى نسخ وإدراج قيم الخلية x مرة بناءً على الرقم المحدد ، كوتولس ل إكسيل's صفوف / أعمدة مكررة بناءً على قيمة الخلية يمكن أن تساعدك في نسخ الصفوف وإدراجها بسرعة بناءً على الرقم الذي حددته.
نصيحة:لتطبيق هذا صفوف / أعمدة مكررة بناءً على قيمة الخلية الميزة ، أولاً ، يجب عليك تنزيل ملف كوتولس ل إكسيل، ثم قم بتطبيق الميزة بسرعة وسهولة.
بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:
1. انقر كوتولس > إدراج > صفوف / أعمدة مكررة بناءً على قيمة الخلية، انظر لقطة الشاشة:
2. في نسخ وإدراج الصفوف والأعمدة مربع الحوار، حدد نسخ وإدراج الصفوف الخيار في النوع ، ثم حدد نطاق البيانات الذي تريد تكراره ، ثم حدد وقت التكرار لنسخ وإدراج الصفوف ، انظر لقطة الشاشة:
4. ثم اضغط Ok or التقديم سوف تحصل على النتيجة التالية حسب حاجتك:
انقر لتنزيل Kutools for Excel والتجربة المجانية الآن!
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!