كيفية تحويل البيانات من عمود إلى خلية واحدة في Excel؟
عندما تحتاج إلى تحويل قائمة من البيانات إلى خلية واحدة في ورقة العمل، عادةً يمكنك استخدام دالة Concatenate لدمج قائمة الخلايا في خلية واحدة، لكن هذا سيكون معقدًا إذا كان هناك كمية كبيرة من البيانات التي يجب دمجها. في هذه المقالة، سأتحدث عن بعض الحيل السريعة لمساعدتك على حل هذه المهمة في Excel.
تحويل البيانات من عمود إلى خلية واحدة باستخدام دالة معرفة من قبل المستخدم
تحويل البيانات من عمود إلى خلية واحدة باستخدام Kutools لـ Excel
تحويل البيانات من عمود إلى خلية واحدة باستخدام دالة معرفة من قبل المستخدم
باستثناء دالة Concatenate لدمج قيم الخلايا، يمكنك تطبيق الكود البرمجي VBA التالي للحصول على النتيجة بسرعة.
1. اضغط باستمرار على مفتاحي ALT + F11، وسيتم فتح نافذة Microsoft Visual Basic for Applications.
2. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.
كود VBA: تحويل البيانات من عمود إلى خلية واحدة
Function transposeRange(Rg As Range)
'updateby Extendoffice
Dim xCell As Range
Dim xStr As String
For Each xCell In Rg
If Not IsEmpty(xCell.Value) Then
xStr = xStr & xCell.Value & ","
End If
Next
transposeRange = Left(xStr, Len(xStr) - 1)
End Function
3. ثم احفظ وأغلق هذا الكود، عد إلى ورقة العمل، وأدخل هذه الصيغة: =transposerange(A1:A10) في خلية فارغة لوضع النتيجة، واضغط على مفتاح Enter، وستحصل على جميع قيم الخلايا في العمود وقد تم وضعها في خلية واحدة، انظر إلى لقطة الشاشة:
ملاحظة: في الكود أعلاه، A1:A10 هو نطاق القائمة الذي تريد تحويله إلى خلية واحدة، كما يمكنك أيضًا فصل المحتوى المدمج باستخدام فواصل أخرى مثل الفاصلة، الشرطة، المسافة، وما إلى ذلك عن طريق تغيير الفاصلة في البرنامج النصي xStr = xStr & xCell.Value & ",".
تحويل البيانات من عمود إلى خلية واحدة باستخدام Kutools لـ Excel
إذا كنت تمتلك Kutools لـ Excel، باستخدام أداته القوية - دمج، يمكنك دمج البيانات في عمود أو صف أو نطاق في خلية واحدة.
بعد تثبيت Kutools لـ Excel، يرجى القيام بما يلي:
1. حدد عمود البيانات الذي تريد دمجه في خلية واحدة.
2. انقر فوق Kutools > دمج وتقسيم > دمج الصفوف/الأعمدة/الخلايا والاحتفاظ بالقيم، انظر إلى لقطة الشاشة:
3. في مربع الحوار المنبثق، حدد دمج في خلية واحدة ضمن الخيار دمج النطاق المحدد بالطريقة التالية، ثم حدد فاصلًا لفصل المحتوى المدمج، انظر إلى لقطة الشاشة:
4. ثم انقر فوق زر موافق أو تطبيق، وستحصل على النتيجة التالية كما تحتاج:
![]() | ![]() | ![]() |
قم بتنزيل Kutools لـ Excel وجرّبه الآن مجانًا!
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد