انتقل إلى المحتوى الرئيسي

كيفية تقسيم القيم المفصولة بفواصل إلى صفوف أو أعمدة في إكسيل؟

في بعض الحالات ، قد تحتاج إلى تقسيم القيم المفصولة بفواصل للخلايا المحددة إلى صفوف أو أعمدة. هنا سوف نقدم لك ثلاث طرق لحل هذه المشكلة بالتفصيل.

قسّم القيم المفصولة بفواصل إلى أعمدة باستخدام وظيفة Text to Columns
قسّم القيم المفصولة بفواصل إلى صفوف برمز VBA
قم بتقسيم القيم المفصولة بفواصل بسرعة إلى صفوف أو أعمدة باستخدام Kutools for Excel


قسّم القيم المفصولة بفواصل إلى أعمدة باستخدام وظيفة Text to Columns

يمكنك تطبيق وظيفة النص على الأعمدة لتقسيم القيم المفصولة بفواصل للخلايا المحددة إلى أعمدة. الرجاء القيام بما يلي.

1. حدد نطاق الخلايا الذي تريد تقسيم القيم إلى أعمدة ، ثم انقر فوق البيانات > نص إلى أعمدة. انظر لقطة الشاشة:

2. في الأول تحويل النص إلى أعمدة المعالج في مربع الحوار ، حدد ملف محدد الخيار ، ثم انقر فوق التالى .

3. في الثانية تحويل النص إلى أعمدة المعالج مربع الحوار ، فقط تحقق من فاصلة في مربع المحددات ، ثم انقر فوق التالى .

4. في الماضي تحويل النص إلى أعمدة المعالج في مربع الحوار ، حدد خلية لتحديد موقع قيم التقسيم في ملف الرحلات مربع ، وأخيراً انقر فوق نهاية زر. انظر لقطة الشاشة:

الآن يتم تقسيم جميع القيم الموجودة في الخلايا المحددة والتي تم فصلها بفواصل إلى أعمدة مختلفة كما هو موضح أدناه.

عادة، و نص إلى أعمدة الميزة تقسم الخلايا إلى أعمدة منفصلة فقط ، إذا كنت تريد تقسيم الخلايا إلى صفوف ، كيف يمكنك أن تفعل؟
هنا كوتولس ل إكسيل's تقسيم الخلايا يمكن أن تساعدك الأداة المساعدة في تقسيم الخلايا بسرعة حسب المسافة أو الفاصلة أو السطر الجديد أو الفواصل الأخرى أو عرض معين ليس فقط في صفوف منفصلة ، ولكن أعمدة في Excel. قم بتنزيل Kutools لبرنامج Excel الآن! (مسار مجاني لمدة 30 يومًا)


قسّم القيم المفصولة بفواصل إلى صفوف برمز VBA

لتقسيم القيم المفصولة بفواصل إلى صفوف ، يمكنك تطبيق كود فبا التالي.

1. اضغط على قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ال ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة. ثم انسخ والصق رمز فبا أدناه في نافذة الوحدة النمطية.

كود فبا: تقسيم القيم المفصولة بفواصل إلى صفوف

Sub SplitAll()
	Dim xRg As Range
	Dim xRg1 As Range
	Dim xCell As Range
	Dim I As Long
	Dim xAddress As String
	Dim xUpdate As Boolean
	Dim xRet As Variant
	On Error Resume Next
	xAddress = Application.ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg  = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		If xRg.Columns.Count > 1 Then
			MsgBox "You can't select multiple columns", , "Kutools for Excel"
			Exit Sub
			End If
			Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
			Set xRg1 = xRg1.Range("A1")
			If xRg1 Is Nothing Then Exit Sub
				xUpdate = Application.ScreenUpdating
				Application.ScreenUpdating = False
				For Each xCell In xRg
					xRet = Split(xCell.Value, ",")
					xRg1.Worksheet.Range(xRg1.Offset(I, 0), xRg1.Offset(I + UBound(xRet, 1), 0)) = Application.WorksheetFunction.Transpose(xRet)
					I = I + UBound(xRet, 1) + 1
				Next
				Application.ScreenUpdating = xUpdate
			End Sub

3. اضغط على F5 مفتاح لتشغيل الكود. في ظهرت كوتولس ل إكسيل مربع الحوار ، حدد الخلايا التي تريد تقسيمها ، ثم انقر فوق OK .

4. في الثانية ظهرت كوتولس ل إكسيل مربع الحوار ، حدد خلية لتحديد موقع قيم التقسيم ، ثم انقر فوق OK.

بعد ذلك ، يمكنك رؤية القيم المفصولة بفواصل في الخلايا المحددة مقسمة إلى صفوف كما هو موضح أدناه.


قم بتقسيم القيم المفصولة بفواصل بسرعة إلى صفوف أو أعمدة باستخدام Kutools for Excel

The تقسيم الخلايا فائدة كوتولس ل إكسيل يمكن أن تساعدك في تقسيم القيم المفصولة بفواصل إلى صفوف أو أعمدة بسهولة.

1. حدد الخلايا التي تريد تقسيمها ، ثم انقر فوق كوتولس > دمج وتقسيم > تقسيم الخلايا. انظر لقطة الشاشة:

2. في ال تقسيم الخلايا مربع الحوار، حدد انقسام إلى صفوف or انقسام إلى أعمدة في ال النوع قسم ما تحتاجه. وفي حدد فاصل القسم، حدد أخرى الخيار ، أدخل رمز الفاصلة في مربع النص ، ثم انقر فوق OK زر. انظر لقطة الشاشة:

3 - وبعد ذلك سيظهر مربع موجه آخر لتذكيرك بتحديد خلية لإخراج النتيجة ، انظر الصورة:

4. انقر OK الزر ، يمكنك رؤية النتائج كما هو موضح أدناه.

انقسام إلى أعمدة

انقسام إلى صفوف

  إذا كنت ترغب في الحصول على نسخة تجريبية مجانية (30 يومًا) من هذه الأداة المساعدة ، الرجاء الضغط لتنزيلهثم انتقل لتطبيق العملية حسب الخطوات المذكورة أعلاه.


العرض التوضيحي: قم بتقسيم القيم المفصولة بفواصل بسرعة إلى صفوف أو أعمدة باستخدام Kutools for Excel

أفضل أدوات إنتاجية المكتب

الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

علامة تبويب kte 201905


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
A jak zmienić kod żeby nie pytał o ustawienie się w A1 i potem aby wynik był np też od A1 w dół
This comment was minimized by the moderator on the site
Hi Bartek,
You mean don't want to pop up the second dialog to select the target cell, and want to specify the target cell in the code directly?
If so, you need to change the following lines.
For example, you need to start outputting results from B1 and automatically fill down.
Please change this line:
Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
to
Set xRg1 = Application.Range("B2")
And then remove the next line:
Set xRg1 = xRg1.Range("A1")
This comment was minimized by the moderator on the site
i still cant upload my csv into 365
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example
id name add
1 Ratnesh myAdd
2,Yog,myAdd
we will apply in the 2nd record it will split record like 1st records,
Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example

id name add

1 Ratnesh myAdd

2,Yog,myAdd


we will apply in the 2nd record it will split record like 1st records,


Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Thanks it helped :)
This comment was minimized by the moderator on the site
This is amazing, thanks for making it free and easy to use!
This comment was minimized by the moderator on the site
Thank you!
This comment was minimized by the moderator on the site
Alternately for separating into rows, use the text to column steps and then copy & paste ->transpose to turn the columns into rows.
This comment was minimized by the moderator on the site
Thanks Jake! This is what I was looking for. :)
This comment was minimized by the moderator on the site
Good one, the utility help me a lot. Thanks for that... :)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations