GỘP NHIỀU DÒNG THÀNH CỘT

[TAI DUC]

Nhờ vả giúp đỡ!
Mình có 1 file có nhiều dòng khác nhau
mình muốn gộp các dòng đó thành cột, loại bỏ ô trống

nhờ vả giúp đỡ
cảm ơn rất nhiều

 

[Hoàng Tuấn 868]

Nhờ vả giúp đỡ!
Mình có 1 file có nhiều dòng khác nhau
mình muốn gộp các dòng đó thành cột, loại bỏ ô trống
View attachment 257061
nhờ vả giúp đỡ
cảm ơn rất nhiều

Bạn nên gửi kèm file có dữ liệu chắc sẽ được giúp nhanh hơn là viết nhiều chữ "nhờ vả" như vậy.

 

[befaint]

Excel 2019

=TRIM(MID(TEXTJOIN(REPT(" ",50),TRUE,$A$2:$G$6),(ROW(A1)-1)*50+1,50))

 

[saobekhonglac]

Excel 2019

=TRIM(MID(TEXTJOIN(REPT(" ",50),TRUE,$A$2:$G$6),(ROW(A1)-1)*50+1,50))

dùng hàm offset được không bác

 

[VetMini]

Tôi có tật lười viết code, cho nên tôi sẽ làm vầy:
Save thành CSV.
Dùng notepad, mở file, sửa tất cả dấu phẩy thành xuống hàng.
Import vào chỗ kết quả.

 

[Maika8008]

Nhờ vả giúp đỡ!
Mình có 1 file có nhiều dòng khác nhau
mình muốn gộp các dòng đó thành cột, loại bỏ ô trống
View attachment 257061
nhờ vả giúp đỡ
cảm ơn rất nhiều

Chắc đúng ý bạn?

 

[ptm0412]

Phải có tiêu đề cột, dùng Power query Unpivot

 

[hungtin1997]

Tôi có tật lười viết code, cho nên tôi sẽ làm vầy:
Save thành CSV.
Dùng notepad, mở file, sửa tất cả dấu phẩy thành xuống hàng.
Import vào chỗ kết quả.

Chỗ sửa tất cả thành xuống hàng thì sửa thế nào cho nhanh hả thầy? Chỉ em với.

 

[ptm0412]

Mở txt bằng word
Ctrl H
Find what = dấu phẩy
Replace with: ^p
Nhấn replace all

 

[TAI DUC]

Chắc đúng ý bạn?

Chào bạn
Theo nội dung mình thì đã OK rồi
Nhờ bạn giúp thêm nội dung chỉnh sửa file này, vì có thêm cột tiêu đề của từng cột dữ liệu nên phải xếp luôn

Tksssss!

 

[Maika8008]

Chào bạn
Theo nội dung mình thì đã OK rồi
Nhờ bạn giúp thêm nội dung chỉnh sửa file này, vì có thêm cột tiêu đề của từng cột dữ liệu nên phải xếp luôn
View attachment 257249
Tksssss!

Nói rõ hơn đi. Nhìn cái hình không hiểu

 

[TAI DUC]

Nói rõ hơn đi. Nhìn cái hình không hiểu

ở cả 2 dữ lieu xếp theo cột, hoặc xếp theo ngang thì cũng cho ra kết quả như ví dụ
Vì có yêu cầu thêm là phải xếp các chữ "data" cùng theo số lieu của nó
VD: như Data 1 có 4 giá trị -->Thì sẽ xếp cột xuống là 4 chữ data
Trong bài là vd, còn dữ lieu có thể nhiều dòng, nhiều cột hơn
Mong muốn tạo cho 2 button để chọn chuyển
- Chuyển hàng sang cột
- Chuyển cột sang cột

Mong giúp đỡ

Bài đã được tự động gộp: 17/4/21

Nói rõ hơn đi. Nhìn cái hình không hiểu

Mình chỉnh lại nội dung mong muốn

 

[Maika8008]

File kết quả. Bạn tùy biến các địa chỉ, dòng cột của dữ liệu nguồn trong code

 

[nguyennhatquang.e]

Chắc đúng ý bạn?

Bạn có thể viết tổng quát hơn được không ạ, kiểu như là :
1. Quét chọn khu vực cần chọn để gộp
2. Hàm gõ ra trả kết quả tại chỗ gõ hàm đó
Mình xin cám ơn ạ !

 

[TAI DUC]

File kết quả. Bạn tùy biến các địa chỉ, dòng cột của dữ liệu nguồn trong code

Cảm ơn bạn
Đã đúng ý
Nhưng cho hỏi thêm 1 nội dung

Nếu địa chỉ ko cần khai báo, mình muốn dữ liêu nó bắt nguồn đâu cũng dc, chỉ cần khai báo vùng chuyển thôi

Nếu dc thì làm giúp thêm nội dung này
Ko thì vậy cũng OK

 

[Maika8008]

Cảm ơn bạn
Đã đúng ý
Nhưng cho hỏi thêm 1 nội dung
View attachment 257275
Nếu địa chỉ ko cần khai báo, mình muốn dữ liêu nó bắt nguồn đâu cũng dc, chỉ cần khai báo vùng chuyển thôi

Nếu dc thì làm giúp thêm nội dung này
Ko thì vậy cũng OK

Vùng dữ liệu nguồn phải được xác định chứ. Lẽ ra tôi chỉ làm thế này thôi
arrS = Sheet1.Range("G8", Cells(12, 10))
Nhưng khai báo tách bạch ra như thế để bạn biết mà sửa code

Bài đã được tự động gộp: 17/4/21

Bạn có thể viết tổng quát hơn được không ạ, kiểu như là :
1. Quét chọn khu vực cần chọn để gộp
2. Hàm gõ ra trả kết quả tại chỗ gõ hàm đó
Mình xin cám ơn ạ !

Bạn xem file mới biết code hoạt động thế nào chứ. Còn chủ thớt thì tất nhiên hiểu rồi, viết ra để làm gì?