Tách dữ liệu trong một cell ra nhiều cell (1 người xem)

  • Thread starter Thread starter khoavd@
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

khoavd@

Thành viên mới
Tham gia
2/1/13
Bài viết
28
Được thích
0
Nhờ các bro giúp mình đoạn code để tách dữ liệu trong ô (chia nhau = dấu ",") dạng sau với:

[TABLE="class: grid, width: 500"]
[TR]
[TD]A[/TD]
[TD]B(Cột tách dữ liệu)[/TD]
[TD]C[/TD]
[TD]D[/TD]
[/TR]
[TR]
[TD]1[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 11, Data 12, Data 13[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]abc[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]def[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]2[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 21, Data 22, Data 23, Data 24[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]ghi[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]jkl[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]3[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 31, Data 32[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]mno[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]pqr[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]4[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 41[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]stu[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]vwx[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[/TABLE]

[TABLE="class: grid, width: 500"]
[TR]
[TD]A[/TD]
[TD]B(Cột tách dữ liệu)[/TD]
[TD]C[/TD]
[TD]D[/TD]
[/TR]
[TR]
[TD]1[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 11[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]abc[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]def[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]2[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 12[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65"]abc[/TD]
[/TR]
[/TABLE]
[/TD]
[TD]def[/TD]
[/TR]
[TR]
[TD]3[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 13[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65"]abc[/TD]
[/TR]
[/TABLE]
[/TD]
[TD]def[/TD]
[/TR]
[TR]
[TD]4[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 21[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]ghi[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]jkl[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]5[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 22[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]ghi[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]jkl[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]6[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 23[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]ghi[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]jkl[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]7[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 24[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]ghi[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]jkl[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]8[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 31[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]mno[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]pqr[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]9[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 32[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]mno[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]pqr[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[TR]
[TD]10[/TD]
[TD][TABLE="width: 240"]
[TR]
[TD="class: xl65, width: 240"]Data 41[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]stu[/TD]
[/TR]
[/TABLE]
[/TD]
[TD][TABLE="width: 72"]
[TR]
[TD="class: xl65, width: 72"]vwx[/TD]
[/TR]
[/TABLE]
[/TD]
[/TR]
[/TABLE]
 
Ấy dzà! Viết code "phà phà" luôn hen! Vậy mà nói VBA khó
Ẹc... Ẹc...
Hihi. Mưa lâu cũng thấm đất í mờ. Giờ em hết thấy khó rùi chỉ thấy "khổ" thui - nghiện GPE quá, lắm hôm phải về trễ để làm nốt việc. Bữa nào mà hông có thời gian để vô là bữa đó cảm thấy "nhơ nhớ".
 
Upvote 0
Mình muốn làm gộp ngược lại dữ liệu như trên thì làm như thế nào? mọi người giúp với.
vd: nếu tên điểm bán (cột F) giống nhau thì Mã tài sản (Cột H) sẽ gộp lại thành 1 ô ngăn cách bằng ";" như file đính kèm
 

File đính kèm

Upvote 0
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom