วิธีการเปลี่ยนเซลล์จากซ้ายไปขวาใน Excel
เมื่อเราพิมพ์ค่าในแผ่นงาน Excel เรามักจะพิมพ์จากซ้ายไปขวา แต่ในบางกรณีคุณอาจต้องการเปลี่ยนเซลล์จากซ้ายไปขวาไปขวาไปซ้ายตามภาพด้านล่างที่แสดง ไม่มีคุณลักษณะในตัวใน Excel ที่สามารถช่วยคุณแก้ปัญหาได้อย่างรวดเร็ว แต่ในบทความนี้ฉันขอแนะนำเทคนิคบางอย่างที่จะช่วยคุณได้
เปลี่ยนเซลล์จากซ้ายไปขวาด้วย VBA
ย้ายเซลล์จากซ้ายไปขวาหรือขึ้นลงด้วย Kutools for Excel 
เปลี่ยนเซลล์จากซ้ายไปขวาด้วย VBA
หากต้องการเปลี่ยนเซลล์จากซ้ายไปขวาอย่างรวดเร็วโดยไม่ต้องใช้สูตรคุณสามารถใช้รหัส VBA
1 กด Alt + F11 คีย์เพื่อเปิดใช้งาน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 คลิก สิ่งที่ใส่เข้าไป > โมดูลวางโค้ดด้านล่างลงในสคริปต์เปล่า
VBA: เปลี่ยนจากซ้ายไปขวา
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
3 กด F5 กุญแจสำคัญในการเรียกใช้รหัสกล่องโต้ตอบจะปรากฏขึ้นเพื่อให้คุณป้อนตัวอักษรของคอลัมน์ที่คุณต้องการเปลี่ยน โปรดแยกตัวอักษรคอลัมน์เหล่านี้ด้วยลูกน้ำตามภาพด้านล่างที่แสดง
4 คลิก OK. ตอนนี้การเลือกถูกย้ายจากซ้ายไปขวาแล้ว
ย้ายเซลล์จากซ้ายไปขวาหรือขึ้นลงด้วย Kutools for Excel
หากคุณติดตั้ง Kutools for Excel คุณสามารถย้ายเซลล์จากซ้ายไปขวาหรือขึ้นลงได้อย่างรวดเร็วด้วยยูทิลิตี้ Flip Vertical Range และ Flip Horizontal Range ตามที่คุณต้องการ
| Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น |
หลังจากการติดตั้ง Kutools สำหรับ Excel โปรดทำดังนี้ :(ดาวน์โหลด Kutools for Excel ได้ฟรีทันที!)
เลือกเซลล์ที่คุณต้องการเปลี่ยนจากซ้ายไปขวาหรือขึ้นลงคลิก Kutools > พิสัย > พลิกช่วงแนวนอน/พลิกช่วงแนวตั้ง > ทั้งหมด or พลิกค่าเท่านั้น. ดูภาพหน้าจอ:
| พลิกช่วงแนวนอน> ทั้งหมด: |
 |
| พลิกแนวนอน> เฉพาะค่าพลิก: |
 |
| พลิกช่วงแนวตั้ง> ทั้งหมด: |
พลิกช่วงแนวตั้ง> เฉพาะค่าพลิก:
|
 |
 |
พลิกข้อมูล
คุณอาจสนใจ:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
