كيفية تحويل سلسلة نصية مفصولة بفاصلة إلى قائمة أو صفوف في إكسيل؟
لنفترض أن لديك قائمة بقيم الخلايا المفصولة بفواصل ، الآن ، تحتاج إلى تحويل هذه السلاسل النصية المفصولة بفواصل إلى صفوف أو عمود متعددة كما هو موضح في لقطة الشاشة التالية. كيف يمكن تقسيم قيم الخلايا المتعددة إلى صفوف بناءً على محدد الفاصلة مرة واحدة في Excel؟
تحويل سلسلة نصية مفصولة بفاصلة إلى صفوف برمز VBA
تحويل سلسلة نصية مفصولة بفاصلة إلى صفوف باستخدام Kutools for Excel
تحويل سلسلة نصية مفصولة بفاصلة إلى صفوف برمز VBA
قد يساعدك رمز VBA التالي في تحويل قيم خلايا متعددة مفصولة بفواصل إلى عمود ، يرجى القيام بما يلي:
1. اضغط باستمرار على ALT + F11 في Excel ، ويفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، ولصق الماكرو التالي في ملف وحدة نافذة او شباك.
كود فبا: تحويل سلسلة نصية مفصولة بفاصلة إلى صفوف أو قائمة
Sub RedistributeCommaDelimitedData()
'Updateby Extendoffice
Dim xArr() As String
Dim xAddress As String
Dim Rg As Range
Dim Rg1 As Range
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("please select the data range:", "Kutools for Excel", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
Set Rg = Application.Intersect(Rg, Rg.Parent.UsedRange)
If Rg Is Nothing Then Exit Sub
Set Rg1 = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
If Rg1 Is Nothing Then Exit Sub
xArr = Split(Join(Application.Transpose(Rg.Value), ","), ",")
Rg1.Resize(UBound(xArr) + 1) = Application.Transpose(xArr)
Rg1.Parent.Activate
Rg1.Resize(UBound(xArr) + 1).Select
End Sub
3. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، في مربع الحوار المنبثق ، حدد نطاق البيانات الذي تريد تحويله ، انظر لقطة الشاشة:
4. وانقر OK، في مربع الحوار التالي ، حدد خلية حيث تريد إخراج النتيجة ، انظر لقطة الشاشة:
5. انقر OK زر ، فقد تم تحويل قيم الخلايا المفصولة بفواصل المحددة إلى قائمة صفوف. انظر لقطة الشاشة:
تحويل سلسلة نصية مفصولة بفاصلة إلى صفوف باستخدام Kutools for Excel
إذا كان لديك كوتولس ل إكسيل، بما لديها تقسيم الخلايا الأداة المساعدة ، يمكنك تقسيم قيم الخلايا المفصولة بفواصل بسرعة إلى صفوف أو أعمدة متعددة بناءً على محدد الفاصلة حسب حاجتك.
كوتولس ل إكسيل : مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30. |
بعد تثبيت كوتولس ل إكسيل، برجاء اتباع الخطوات التالية:
1. حدد قيم الخلية التي تريد تحويلها إلى صفوف بناءً على فاصل الفاصلة.
2. ثم اضغط كوتولس > دمج وتقسيم > تقسيم الخلايا، انظر لقطة الشاشة:
3. في تقسيم الخلايا مربع الحوار، حدد انقسام إلى صفوف الخيار تحت النوع ، ثم من حدد فاصل القسم ، تحقق أخرى مربع الاختيار ثم أدخل الفاصلة في مربع النص ، انظر الصورة:
4. ثم اضغط Ok، وسيظهر مربع حوار آخر لتذكيرك بتحديد خلية لوضع النتيجة ، انظر لقطة الشاشة:
5. ثم انقر فوق Ok زر ، تم تقسيم الخلايا المفصولة بفواصل إلى صفوف متعددة بناءً على محدد الفاصلة ، انظر الصورة:
انقر لمعرفة المزيد حول ميزة Split Cells هذه ...
قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!
عرض توضيحي: تحويل سلسلة نصية مفصولة بفاصلة إلى صفوف باستخدام Kutools for Excel
مقالات ذات صلة:
كيفية تقسيم الخلايا إلى عدة أعمدة أو صفوف بواسطة حرف إرجاع؟
كيفية تقسيم قيم الخلايا إلى أعمدة متعددة في إكسيل؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!