Excel vba chuyển đổi nhiều cột thành hàng

Khi sử dụng bảng tính Excel đôi khi bạn sẽ gặp vấn đề này. làm cách nào bạn có thể chuyển đổi hoặc hoán đổi một dải dữ liệu thành một cột? . ) Bây giờ, tôi giới thiệu ba thủ thuật nhanh để bạn giải quyết vấn đề này

Hoán đổi/Chuyển đổi các cột và hàng thành một cột với công thức

Chuyển đổi/Chuyển đổi các cột và hàng thành một cột bằng mã VBA

Chuyển đổi/Chuyển đổi cột và hàng thành một cột với Kutools cho Excel

---

Hoán đổi/Chuyển đổi các cột và hàng thành một cột với công thức

Công thức dài sau đây có thể giúp bạn nhanh chóng chuyển đổi một dải dữ liệu thành một cột, vui lòng thực hiện như sau

1. Đầu tiên, xác định tên phạm vi cho phạm vi dữ liệu của bạn, chọn phạm vi dữ liệu mà bạn muốn chuyển đổi, nhấp chuột phải và chọn Xác định Tên từ menu ngữ cảnh. Trong hộp thoại Tên mới, hãy nhập tên dãy mà bạn muốn. Sau đó bấm OK. Xem ảnh chụp màn hình

2. Sau khi chỉ định tên phạm vi, sau đó nhấp vào ô trống, trong ví dụ này, tôi sẽ nhấp vào ô E1, sau đó nhập công thức này. =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData . .

Ghi chú. MyData là tên dãy của dữ liệu đã chọn, bạn có thể thay đổi nó khi cần.

3. Sau đó kéo công thức xuống ô cho đến khi thông tin lỗi được hiển thị. Tất cả dữ liệu trong phạm vi đã được chuyển thành một cột. Xem ảnh chụp màn hình

---

Nhanh chóng chuyển phạm vi sang một cột/hàng/hoặc ngược lại trong Excel

Trong một số trường hợp, bạn có thể cần hoán vị một dãy ô thành một cột hoặc một hàng hoặc ngược lại, chuyển một cột hoặc một hàng thành nhiều hàng và nhiều cột trong bảng tính Excel. Bạn có cách nào giải quyết nhanh không? . Nhấp để dùng thử miễn phí đầy đủ tính năng sau 30 ngày.   Kutools cho Excel. với hơn 300 phần bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày.

---

Chuyển đổi/Chuyển đổi các cột và hàng thành một cột bằng mã VBA

Với mã VBA sau, bạn cũng có thể nối nhiều cột và hàng thành một cột

1. Giữ phím ALT + F11 để mở cửa sổ Microsoft Visual Basic for Applications

2. Nhấp vào Chèn > Mô-đun và dán đoạn mã sau vào cửa sổ Mô-đun

Sub ConvertRangeToColumn()
'Updateby20131126
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
    Rng.Copy
    Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
    rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

3. Nhấn phím F5 để chạy mã, và một hộp thoại được hiển thị để bạn chọn một phạm vi để chuyển đổi. Xem ảnh chụp màn hình

4. Sau đó nhấp vào Ok và một hộp thoại khác được hiển thị để chọn một ô duy nhất để đưa ra kết quả, xem ảnh chụp màn hình

5. Và nhấp vào Ok, sau đó nội dung ô của phạm vi được chuyển thành danh sách cột, xem ảnh chụp màn hình

---

Chuyển đổi/Chuyển đổi cột và hàng thành một cột với Kutools cho Excel

Có thể công thức dài quá khó nhớ và code VBA có hạn chế gì đó bạn, trường hợp này bạn đừng lo, sau đây mình sẽ giới thiệu cho bạn một công cụ dễ dàng và đa chức năng hơn-Kutools for Excel, với . Transform Range utility, and you can solve this problem quickly and conveniently.

Kutools cho Excel, với hơn 300 chức năng tiện dụng, giúp công việc của bạn dễ dàng hơn.

Tải xuống miễn phí
miễn phí đầy đủ tính năng trong 30 ngày

Sau khi cài đặt miễn phí Kutools cho Excel, vui lòng thực hiện như bên dưới.

1. Chọn phạm vi mà bạn muốn chuyển đổi

2. Nhấp vào Kutools > Phạm vi chuyển đổi , xem ảnh chụp màn hình.

3. Trong hộp thoại Phạm vi chuyển đổi , chọn tùy chọn Phạm vi thành một cột , .

4. Sau đó bấm OK và chỉ định một ô để đặt kết quả từ hộp bật ra

5. Nhấp vào OK và dữ liệu nhiều cột và hàng đã được chuyển thành một cột

Nếu bạn muốn chuyển đổi một cột thành một dải ô có các hàng cố định, bạn cũng có thể sử dụng hàm Phạm vi chuyển đổi để xử lý nhanh.

Thử nghiệm. Phạm vi chuyển đổi

Kutools cho Excel. Hơn 300 chức năng bạn phải có trong Excel, 30 bản dùng thử miễn phí từ đây.

---

Chuyển bảng chéo thành bảng danh sách với Kutools cho Excel

Nếu bạn có một bảng chéo cần được chuyển đổi thành bảng danh sách như ảnh chụp màn hình hiển thị bên dưới, ngoại trừ việc nhập lại từng dữ liệu một, bạn cũng có thể sử dụng Bảng chuyển đổi của Kutools cho Excel . utility to quickly convert between cross table and list in Excel.

Sau khi cài đặt miễn phí Kutools cho Excel, vui lòng thực hiện như bên dưới.

1. Chọn bảng chéo mà bạn muốn chuyển đổi thành danh sách, nhấp vào Kutools > Phạm vi > Chuyển đổi kích thước bảng.

2. Trong hộp thoại Chuyển kích thước bảng , chọn tùy chọn Xuyên bảng vào danh sách trên < . Transpose type section, select a cell to place the new format table.

3. Nhấn Ok, bây giờ bảng chéo đã được chuyển đổi thành danh sách

Thử nghiệm. Chuyển đổi kích thước bảng

Kutools cho Excel. Hơn 300 chức năng bạn phải có trong Excel, 30 bản dùng thử miễn phí từ đây.

---

Bài viết liên quan .

Làm cách nào để thay đổi hàng thành cột trong Excel?

Làm cách nào để chuyển đổi/chuyển đổi một cột thành nhiều cột trong Excel?

Làm cách nào để chuyển đổi/chuyển đổi các cột và hàng thành một hàng?

---

Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

• Tái sử dụng. Chèn nhanh các công thức, biểu đồ phức tạp  và bất kỳ thứ gì bạn đã sử dụng trước đây; . Encrypt Cells with password; Create Mailing List and send emails...
• Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); . Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
• Hợp nhất Ô/Hàng/Cột mà không làm mất Dữ liệu; . Ngăn chặn các ô trùng lặp; . Combine Duplicate Rows/Columns.. Prevent Duplicate Cells; Compare Ranges...
• Chọn hàng trùng lặp hoặc duy nhất ; . Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
• Sao chép chính xác Nhiều ô mà không thay đổi tham chiếu công thức; . Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
• Trích xuất văn bản , Thêm văn bản, Xóa theo vị trí, Xóa khoảng trắng ; . Convert Between Cells Content and Comments...
• Siêu bộ lọc (lưu và áp dụng lược đồ bộ lọc cho các trang tính khác); . Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
• Kết hợp Sổ làm việc và Trang tính ; . Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
• Hơn 300 tính năng mạnh mẽ . Hỗ trợ Office/Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Đảm bảo hoàn tiền trong 60 ngày.

Đọc thêm. Tải xuống miễn phí. Mua, tựa vào, bám vào.  

---

Tab Office Mang giao diện theo thẻ vào Office và giúp công việc của bạn dễ dàng hơn nhiều

• Bật chỉnh sửa và đọc theo tab trong Word, Excel, PowerPoint , Publisher, Access, Visio và Project.
• Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới
• Tăng năng suất của bạn lên 50% và giảm hàng trăm lần nhấp chuột cho bạn mỗi ngày

Đọc thêm. Tải xuống miễn phí. Mua, tựa vào, bám vào.  

 

Cũ nhất đầu tiên

Sắp xếp nhận xét theo

Cũ nhất đầu tiên

mới nhất đầu tiên

Nhận xét ( 58 )

Chưa có xếp hạng nào. Hãy là người đầu tiên xếp hạng

Thế nào

khoảng 9 năm trước

#10021

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Thật tuyệt khi thấy phương trình đầy đủ trong #2

Hồi đáp

0

0

Muz

khoảng 9 năm trước

#10399

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

ĐẸP. Cám ơn rất nhiều. Tiết kiệm cho tôi rất nhiều thời gian

Hồi đáp

0

0

Chris

khoảng 8 năm trước

#10681

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Có cách nào để làm điều này nhưng khi nó lấy phạm vi, nó bắt đầu từ A1 và thực hiện tất cả cột A trở xuống, sau đó lấy Cột B, v.v.?

Hồi đáp

0

0

phidobya

khoảng 8 năm trước

#10952

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Công thức đầy đủ là =INDEX(Phạm vi,1+INT((ROW(A1)-1)/COLUMNS(Phạm vi)),MOD(ROW(A1)-1+COLUMNS(Phạm vi),COLUMNS(Phạm vi))+1)

Hồi đáp

0

0

steve trifelos     Phildobya

khoảng 8 năm trước

#10953

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

bạn đã 'kéo công thức vào ô' như thế nào?

Hồi đáp

0

0

steve trifelos

khoảng 8 năm trước

#11180

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

tôi đang sử dụng. công thức xls để chuyển đổi một dải dữ liệu thành một cột. Tôi đã nhập công thức như được chỉ định với tên dải ô của mình, nhưng tôi không rõ về việc 'kéo công thức vào ô cho đến khi thông báo lỗi xuất hiện'. Tôi không thể kéo công thức ở bất kỳ đâu từ thanh công thức. Tôi chắc chắn đó là lỗi người dùng nhưng bạn có thể vui lòng trợ giúp không?

Hồi đáp

0

0

Pari

khoảng 8 năm trước

#12811

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Cám ơn rất nhiều

Hồi đáp

0

0

muốn

khoảng 7 năm trước

#14039

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Công thức lập chỉ mục của bạn chính xác là những gì tôi cần. Chỉ lưu ý là khi copy sẽ có dấu ". " ở cuối và Excel không thích điều đó. Vấn đề nhỏ

Hồi đáp

0

0

người mới

khoảng 7 năm trước

#14437

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Cảm ơn. ) nhưng làm cách nào để bớt giá trị 0 hoặc null trên bảng hoặc trên tên của một dải ô?

Hồi đáp

0

0

Poshiya Nikunj

khoảng 7 năm trước

#14458

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Bây giờ tôi cảm thấy tuyệt vời. Bạn tiết kiệm 30 giờ làm việc của tôi. Công việc xuất sắc

Hồi đáp

0

0

Ari

khoảng 7 năm trước

#14751

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Thứ tự hiển thị là từ trên xuống dưới (A1, B1, C1, A2, B2, C2. ). Tôi cần đi xuống rồi đi ngang (A1, A2, A3, B1, B2, B3,. ). Có cách nào làm được việc này không?

Hồi đáp

0

0

VCR

khoảng 7 năm trước

#15054

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

KINH NGẠC. Cảm ơn bạn đã đăng bài để thế giới được hưởng lợi từ kiến ​​​​thức của bạn

Hồi đáp

0

0

Jowjow

khoảng 7 năm trước

#15063

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Rất hữu ích. Cảm ơn

Hồi đáp

0

0

dave

khoảng 7 năm trước

#15085

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Đây là một trợ giúp LỚN. Cảm ơn bạn rất nhiều vì đã đăng

Hồi đáp

0

0

DJ

khoảng 7 năm trước

#15442

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Xin chào các bạn, tôi cũng cần xem từ trên xuống dưới (a1, a2, a3, b1, b2, b3, v.v.) thay vì xem từ trên xuống dưới nhưng điều đó có thể thực hiện dễ dàng bằng cách chuyển công thức sang. =INDEX(Phạm vi,MOD(ROW(B5)-1+COLUMNS(Phạm vi),COLUMNS(Phạm vi))+1,1+INT((ROW(B5)-1)/COLUMNS(Phạm vi))) Lưu ý cách bản gốc . =INDEX(Phạm vi,1+INT((ROW(A1)-1)/COLUMNS(Phạm vi)),MOD(ROW(A1)-1+COLUMNS(Phạm vi),COLUMNS(Phạm vi))+1) Vì vậy, điều này đơn giản là . Cảm ơn chủ đề này, đã giúp rất nhiều

Hồi đáp

0

0

henock

khoảng 6 năm trước

#15718

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Cám ơn rất nhiều. Nó tiết kiệm thời gian của tôi và nó có hiệu quả

Hồi đáp

0

0

s. mojtaba

khoảng 6 năm trước

#15759

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

cảm ơn. Nó là rất tốt

Hồi đáp

0

0

ramu b

khoảng 6 năm trước

#15909

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Công thức này hoạt động tốt hơn khi dữ liệu ở định dạng vuông, =INDEX(Phạm vi,MOD(ROW(B5)-1+COLUMNS(Phạm vi),COLUMNS(Phạm vi))+1,1+INT((ROW(B5)-1) . Ví dụ. A1. A5,B1. B4,C1. Phạm vi dữ liệu C6

Hồi đáp

0

0

joel     Ramu b

khoảng 6 năm trước

#15910

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

vâng tôi đồng ý, điều này có thể không nếu không. của các hàng trong mỗi cột là không đồng đều?

Hồi đáp

0

0

Karpagaraj

khoảng 6 năm trước

#16042

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

Cảm ơn nó rất hữu ích

Hồi đáp

0

0

Na-than

khoảng 6 năm trước

#16113

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

phewwwwww. sau nhiều giờ nghiên cứu về cách thực hiện CÔNG VIỆC TUYỆT VỜI này và cảm ơn rất nhiều Trân trọng, Nathan

Hồi đáp

0

0

Lavi Shawn

khoảng 6 năm trước

#16416

Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web

thảo mộc. kumar@rsrit. com phát ban@svktechinc. com Akshit kumar7hAkshit kumarChào akshith@smtworks. com K. Sandeep Babu {KSB}7hK. Sandeep Babu {KSB} đến sandeep. babu@stiorg. com Anup Kumar7hAnup Kumar s trên cơ sở anup@r3tek. com khắc nghiệt Hemanth6hharsha Hemanth s to hemanth@imbuesys. com sriram rao6hsriram raoopls tuyển dụng tới sriram@itcomnce. com Radha Reddy6hRadha Reddy s tại radha@infogensoftware. com Raja sekhar Reddy6hRaja sekhar Reddy to raj@prospectinfosys. com Đây là dữ liệu của tôi và tôi cần tách IDS email. Xin hãy giúp làm thế nào để làm điều đó