كيفية تبديل / تحويل الأعمدة والصفوف إلى صف واحد؟
كيفية ضم عدة صفوف وأعمدة في صف طويل واحد؟ ربما يبدو الأمر سهلاً بالنسبة لك ، لأنه يمكنك نسخها واحدة تلو الأخرى وضمها في صف يدويًا. ولكن سيكون الأمر مضيعة للوقت ومملة إذا كان هناك مئات الصفوف والأعمدة. هنا سأتحدث عن بعض الحيل السريعة لحلها.
تبديل / تحويل الأعمدة والصفوف إلى صف واحد مع الصيغة
قم بتبديل / تحويل الأعمدة والصفوف إلى صف واحد باستخدام كود VBA
تبديل / تحويل الأعمدة والصفوف إلى صف واحد مع كوتولس ل إكسيل
- إعادة استخدام أي شيء: أضف الصيغ والمخططات الأكثر استخدامًا أو تعقيدًا وأي شيء آخر إلى مفضلاتك ، وأعد استخدامها بسرعة في المستقبل.
- أكثر من 20 ميزة نصية: استخراج رقم من سلسلة نصية ؛ استخراج أو إزالة جزء من النصوص ؛ تحويل الأرقام والعملات إلى الكلمات الإنجليزية.
- أدوات الدمج: مصنفات وأوراق متعددة في واحد ؛ دمج خلايا / صفوف / أعمدة متعددة دون فقد البيانات ؛ دمج الصفوف المكررة والمجموع.
- أدوات الانقسام: تقسيم البيانات إلى أوراق متعددة بناءً على القيمة ؛ مصنف واحد لملفات Excel أو PDF أو CSV متعددة ؛ عمود واحد إلى أعمدة متعددة.
- لصق التخطي صفوف مخفية / مصفاة العد والمجموع حسب لون الخلفية؛ إرسال رسائل بريد إلكتروني مخصصة إلى مستلمين متعددين بشكل مجمع.
- مرشح سوبر: إنشاء مخططات تصفية متقدمة وتطبيقها على أي أوراق ؛ تصنيف حسب: حسب الأسبوع واليوم والتكرار والمزيد ؛ تصفية بواسطة bold، formulas، comment ...
- أكثر من 300 ميزة قوية ؛ يعمل مع Office 2007-2021 و 365 ؛ يدعم جميع اللغات ؛ سهولة النشر في مؤسستك أو مؤسستك.
تبديل / تحويل الأعمدة والصفوف إلى صف واحد مع الصيغة
لنفترض أن لديك مجموعة من البيانات كما تظهر لقطة الشاشة التالية ، يمكنك تحويل بيانات النطاق إلى صف واحد في ورقة عمل جديدة بصيغة طويلة.
الرجاء تطبيق الصيغة على النحو التالي:
1. في ورقة عمل جديدة من المصنف النشط ، انقر فوق الخلية A1 ، وانسخ والصق هذه الصيغة: =OFFSET(Sheet1!$A$1,((ROW()-1)*5)+(FLOOR(COLUMN()-1,4)/4),(COLUMN()-1)-(FLOOR(COLUMN()-1,4)))
ملاحظة: الورقة 1! $ A $ 1 هي ورقة العمل ومراجع النطاق التي تريد استخدامها.
ROW () - 1) * 5 في الصيغة أعلاه ، 5 لتقف على رقم الصف. و عمود () - 1,4،4) / XNUMXأطلقت حملة 4 لتقف على رقم العمود. يمكنك تغييرها حسب حاجتك.
2. ثم اسحب مقبض التعبئة إلى اليمين حتى يظهر الرقم 0. في هذه الحالة ، تم نقل جميع البيانات الموجودة في النطاق إلى صف واحد في ورقة عمل جديدة. انظر لقطة الشاشة:
قم بتبديل / تحويل الأعمدة والصفوف إلى صف واحد باستخدام كود VBA
يمكن أن يساعدك رمز VBA التالي أيضًا في تحويل نطاق من البيانات إلى صف واحد.
1. اضغط باستمرار ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة.
Sub TransformOneRow()
'Updateby20131120
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Ranges to be transform :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
xRows = InputRng.Rows.Count
xCols = InputRng.Columns.Count
For i = 1 To xRows
InputRng.Rows(i).Copy OutRng
Set OutRng = OutRng.Offset(0, xCols + 0)
Next
Application.ScreenUpdating = True
End Sub
3. ثم اضغط F5 مفتاح لتشغيل الكود ، يظهر لك مربع حوار لتحديد مجموعة من المحتويات التي تريد تحويلها إلى صف ، ثم انقر فوق Ok، مربع حوار منبثق آخر مخصص لك لتحديد خلية واحدة لإخراج النتيجة. انظر لقطات الشاشة:
![]() |
![]() |
![]() |
ثم اضغط Ok، يتم تحويل المحتويات في النطاق المحدد إلى صف. انظر لقطة الشاشة:
![]() |
![]() |
![]() |
ملاحظة: في تعيين OutRng = OutRng.Offset (0 ، xCols + 0)، يمكنك تغيير 0 إلى أي رقم لتلبية احتياجاتك.
بالنسبة إلى exampel ، إذا كنت تريد فصل النتائج المتراكمة إلى الصفوف الأصلية بواسطة عمود واحد ، فيمكنك تغيير تعيين OutRng = OutRng.Offset (0 ، xCols + 0) إلى تعيين OutRng = OutRng.Offset (0 ، xCols + 1)تظهر النتائج على النحو التالي:
تبديل / تحويل الأعمدة والصفوف إلى صف واحد مع كوتولس ل إكسيل
يبدو أن الطريقتين المذكورتين أعلاه صعبتان إلى حد ما بالنسبة لنا كمبتدئين في برنامج Excel ، وهنا سأتحدث عن أداة مفيدة - Kutools for Excel.
كوتولس ل إكسيل يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. تجربة مجانية بدون قيود خلال 30 يومًا. احصل عليه الآن
مع فائدة نطاق التحويل of كوتولس ل إكسيل، يمكنك تحويل النطاق بسرعة إلى صف واحد ، يرجى القيام بما يلي:
1. حدد النطاق الذي تريد تغيير موضعه.
2. انقر كوتولس > محول المدى > نطاق التحويل، انظر لقطة الشاشة:
3. في ال نطاق التحويل مربع الحوار، حدد النطاق لصف واحد الخيار ، انظر لقطة الشاشة:
4. ثم اضغط OK، وانقر فوق خلية لوضع النتيجة من المربع المنبثق.
5. انقر OK، وتم نقل البيانات الموجودة في النطاق إلى صف واحد. انظر لقطات الشاشة:
![]() |
![]() |
![]() |
إذا كنت تريد معرفة المزيد عن هذه الميزة ، يرجى زيارة نطاق التحويل.
مقالات ذات صلة:
كيفية تغيير الصف إلى العمود في إكسيل؟
كيفية تحويل / تحويل عمود واحد إلى أعمدة متعددة في إكسيل؟
كيفية تبديل / تحويل الأعمدة والصفوف إلى عمود واحد؟
أفضل أدوات إنتاجية المكتب
Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪
- إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
- سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
- دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
- حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
- نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
- استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
- سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
- اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
- أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!











