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

كيفية تبديل الخلايا من اليسار إلى اليمين في إكسيل؟

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

تبديل الخلايا من اليسار إلى اليمين باستخدام VBA

تبديل الخلايا من اليسار إلى اليمين أو من الأعلى إلى الأسفل باستخدام كوتولس ل إكسيل فكرة جيدة 3


تبديل الخلايا من اليسار إلى اليمين باستخدام VBA

لتبديل الخلايا من اليسار إلى اليمين بسرعة بدون صيغ ، يمكنك استخدام كود VBA.

1. صحافة ALT + F11 مفاتيح للتمكين ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. انقر إدراج > وحدة، الصق الكود أدناه في البرنامج النصي الفارغ.

فبا: تبديل اليسار إلى اليمين

Sub RearrangeColumns()
'UpdatebyExtenoffice20161125
  Dim xLng, i As Long, LastRow As Long, Letters As Variant, NewLetters As Variant
  Dim strTemp As String
 
  On Error Resume Next
    strTemp = Application.InputBox _
    (Prompt:="Enter the column you want to transpose with comma separate", _
    Title:="Kutools For Excel", Type:=2)
    For i = Len(strTemp) To 1 Step -1
       NewOrder = NewOrder + Mid(strTemp, i, 1)
    Next i

  LastRow = Cells.Find(What:="*", SearchOrder:=xlRows, _
            SearchDirection:=xlPrevious, LookIn:=xlFormulas).Row
  Letters = Split(NewOrder, ",")
  ReDim NewLetters(1 To UBound(Letters) + 1)
  Application.ScreenUpdating = False
  For xLng = 0 To UBound(Letters)
    NewLetters(xLng + 1) = Columns(Letters(xLng)).Column
  Next
  Application.ScreenUpdating = True
  Range("A1").Resize(LastRow, UBound(Letters) + 1) = _
  Application.Index(Cells, Evaluate("ROW(1:" & LastRow & ")"), NewLetters)
End Sub

doc ينقل من اليسار إلى اليمين 2

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

4. انقر OK. الآن تم تحويل التحديد من اليسار إلى اليمين.


تبديل الخلايا من اليسار إلى اليمين أو من الأعلى إلى الأسفل باستخدام كوتولس ل إكسيل

إذا كان لديك Kutools for Excel مثبتًا ، فيمكنك نقل الخلايا بسرعة من اليسار إلى اليمين أو من الأعلى إلى الأسفل باستخدام أدوات Flip Vertical Range و Flip Horizontal Range حسب حاجتك.

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي :(قم بتنزيل Kutools for Excel الآن!)

حدد الخلايا التي تريد تبديلها من اليسار إلى اليمين أو من أعلى إلى أسفل ، انقر فوق كوتولس > الفترة (من ... إلى) > انعكاس النطاق الأفقي/انعكاس النطاق الرأسي > الكل or فقط قلب القيم. انظر لقطات الشاشة:
doc ينقل من اليسار إلى اليمين 4

انعكاس النطاق الأفقي> الكل:
doc ينقل من اليسار إلى اليمين 9
انعكاس أفقي> قلب القيم فقط:
doc ينقل من اليسار إلى اليمين 5

 


انعكاس النطاق الرأسي> الكل:
انعكاس النطاق الرأسي> قلب القيم فقط:
doc ينقل من اليسار إلى اليمين 6
doc ينقل من اليسار إلى اليمين 7

السهم الأزرق الحق فقاعةقد ترغب في:

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

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

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

الوصف


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

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations