วิธีย้ายแถวอื่น ๆ ไปยังคอลัมน์ใน Excel

คุณเคยพยายามย้ายข้อมูลแถวอื่น ๆ ไปยังคอลัมน์ใน Excel หรือไม่เช่นการย้ายแถวคี่ทุกแถวไปยังคอลัมน์เดียวและทุกแถวคู่ไปยังคอลัมน์อื่น ๆ ซึ่งแสดงเป็นภาพหน้าจอด้านล่าง ฉันพบเทคนิคบางอย่างที่สามารถจัดการปัญหานี้ได้ที่นี่

ย้ายทุกแถวไปยังคอลัมน์ด้วยสูตร

ย้ายแถวอื่น ๆ ไปยังคอลัมน์ด้วย VBA

ย้ายแถวอื่น ๆ ไปยังคอลัมน์ด้วย Kutools for Excel

ย้ายทุกแถวไปยังคอลัมน์ด้วยสูตร

สำหรับผู้ใช้ Excel ส่วนใหญ่การใช้สูตรเพื่อแก้ปัญหาใน Excel เป็นวิธีที่ง่ายที่สุด

1. เลือกเซลล์ถัดจากข้อมูลของคุณแล้วพิมพ์สูตรนี้ = IF (ISEVEN (แถว (B2)), B2, "") (B2 ระบุข้อมูลที่คุณต้องการรับ) ลงไปแล้วกด เข้าสู่ จากนั้นลากการเติมอัตโนมัติเพื่อเติมช่วงที่คุณต้องการใช้สูตรนี้ ตอนนี้ข้อมูลทุกแถวที่สองได้รับในคอลัมน์นี้แล้ว

2. จากนั้นเลือกเซลล์อื่นที่อยู่ถัดจากคอลัมน์ด้านบนแล้วพิมพ์สูตรนี้ = IF (ISODD (ROW (B3)), B3, "") (B3 คือข้อมูลที่คุณต้องการรับ) ลงไปแล้วกด เข้าสู่ จากนั้นลากการเติมอัตโนมัติเพื่อเติมช่วงที่คุณต้องการใช้สูตรนี้ ตอนนี้ข้อมูลทุกแถวที่สามได้รับในคอลัมน์นี้แล้ว

ย้ายแถวอื่น ๆ ไปยังคอลัมน์ด้วย VBA

VBA ต่อไปนี้ยังสามารถย้ายแถวอื่น ๆ ไปยังคอลัมน์ได้อีกด้วย

1 กด F11 + อัลเทอร์เนทีฟ ปุ่มร่วมกันบนแป้นพิมพ์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2 จากนั้นคลิก สิ่งที่ใส่เข้าไป > โมดูล เพื่อแทรกหน้าต่างโมดูลใหม่ จากนั้นคัดลอกโค้ด VBA ตามไปที่หน้าต่าง

VBA: ย้ายแถวอื่น ๆ ไปที่คอลัมน์

Sub MoveRange()
'Updateby20140730A
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set InputRng = InputRng.Columns(1)
For i = 1 To InputRng.Rows.Count Step 2
    OutRng.Resize(1, 2).Value = Array(InputRng.Cells(i, 1).Value, InputRng.Cells(i + 1, 1).Value)
    Set OutRng = OutRng.Offset(1, 0)
Next
End Sub

3 คลิก วิ่ง หรือ F5 บนแป้นพิมพ์และกล่องโต้ตอบจะปรากฏขึ้นเพื่อให้คุณเลือกช่วงที่จะย้าย ดูภาพหน้าจอ:

4 จากนั้นคลิก OK เพื่อแสดงกล่องโต้ตอบอื่นเพื่อเลือกเซลล์ที่จะแสดงผลลัพธ์ ดูภาพหน้าจอ:

5 คลิก OKและคุณจะเห็นผลลัพธ์ที่แสดงด้านล่าง:

ย้ายแถวอื่น ๆ ไปยังคอลัมน์ด้วย Kutools for Excel

นอกจากสูตรและ VBA แล้วหากคุณติดตั้ง Kutools สำหรับ Excelคุณสามารถใช้ไฟล์ ช่วงการแปลง คุณลักษณะในการย้ายแถวอื่น ๆ ไปยังคอลัมน์อย่างรวดเร็ว

Kutools สำหรับ Excel มีเครื่องมือ Excel ที่มีประโยชน์มากกว่า 300 รายการ ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน Get it Now

1. เลือกช่วงที่คุณต้องการย้ายแถวอื่น ๆ แล้วคลิก Kutools > ตัวแปลงช่วง > ช่วงการแปลง. 

2 ใน ช่วงการแปลง โต้ตอบตรวจสอบ คอลัมน์เดียวถึงช่วง in ประเภทการแปลง และตรวจสอบ ค่าคงที่ จากนั้นเลือกหรือป้อน 2 ในรายการใน แถวต่อบันทึก มาตรา. ดูภาพหน้าจอ:

3 คลิก Ok เพื่อเปิดกล่องโต้ตอบเพื่อเลือกเซลล์เดียวเพื่อแสดงผลลัพธ์ดูภาพหน้าจอ:

4 จากนั้นคลิก OK. คุณสามารถเห็นผลลัพธ์ดังที่แสดงด้านล่าง:

สำหรับข้อมูลเพิ่มเติมเกี่ยวกับ Transform Range

บทความญาติ:

• เลือกทุกแถวใน Excel
• คัดลอกทุกแถว