Ai giúp mình chuyển dữ liệu sang hàng dọc với

[thandh1709]

MÌnh có một dãy số theo dạng sau:
'01011000', '01011110', '01019010', '01019020', '01019090', '01021000', '01029010', '01029020', '01029090', '01031000', '01039100', '01039200', '01041010', '01041090', '01042010', '01042090', '01051110', '01051190', '01051210', '01051290', '01051910', '01051920', '01051930', '01051940', '01051950', '01051990', '01059210', '01059220', ....
và còn rất dài nữa^^
bây h giờ mình muốn chuyển các số trong ngoặc đơn thành hàng dọc, mỗi hàng là 8 số trong ngoặc đơn. và bỏ các dấu ngoặc đơn và dấu phẩy đi luôn đại khái thế này
01011000
01011110
01019010
01019020
.......
bà con giúp mình nhé, Cảm ơn all
Hướng dẫn cụ thể chút nhé vì mình ít dùng excel mà...

 

[ptm0412]

xem file này nha, thử xem đúng ý không nha

 

[ChanhTQ@]

Cho thêm phần vui vẻ

Option Explicit
Sub TachChuoi()
 Const DP As String = ","
 Dim StrC As String, VTri As Byte
 
 StrC = [a1].Value & DP & "GPE.COM"
 Do
    VTri = InStr(StrC, DP)
    If VTri < 1 Then Exit Do
    [b65500].End(xlUp).Offset(1).Value = "'" & Left(StrC, VTri - 2)
    StrC = Mid(StrC, VTri + 2)
 Loop
End Sub

 

[thandh1709]

Cái của bạn ptm0412 là okie nhưng mình nói qua chút luôn là cái dãy số này là đánh liền tù tì không theo cột gì hết, vì cột trong excel chỉ được có 256 cột thôi mà cái này của mình tách ra chắc khoảng vài nghìn dòng.....
Bạn ptm0412 hướng dẫn cụ thể dùm mình với vì mình làm theo cái bạn gửi thì chỉ tách đến dòng thứ 625 còn lại là nó xuất hiện 23', '2724', '2725', '2729', '2700', '2710', '2711', '2712', '2713', '2714', '2715', '27
Giúp mình nhé, cảm ơn bà con đã giúp đỡ

 

[ptm0412]

Bạn ptm0412 hướng dẫn cụ thể dùm mình với vì mình làm theo cái bạn gửi thì chỉ tách đến dòng thứ 625 còn lại là nó xuất hiện 23', '2724', '2725', '2729', '2700', '2710', '2711', '2712', '2713', '2714', '2715', '27

Bạn phải xem lại:
- cấu trúc của cái ô dữ liệu khổng lồ ấy, nó có đồng nhât từ đầu đến cuối không? Nghĩa là 1 dấu phẩy, 1 khoảng trắng, 1 dấu nháy đơn, 8 chữ số, 1 dấu nháy đơn. Luân phiên chính xác cho đến hết?
- Cái dữ liệu khổng lồ ấy, thực tế nằm trong 1 ô, hay vài ô?

Vì nếu đồng nhất như câu hỏi 1, thì 1 khi đã đúng cho 625 dòng thì phải đúng hết cho tất cả các dòng.

Còn nếu dữ liệu nằm trong vài ô, mà bạn copy công thức sang, nếu không copy khéo thì nó sai.

Hay là bạn gửi file lên, hoặc bạn copy cái dữ liệu khổng lồ ấy, gởi lên đây theo cách của bài #1.

 

[thandh1709]

àh mình làm được rồi, tìm mòn con mắt thấy 1 chỗ thiế cái nháy đơn ^^, h thì okie mình làm xong rồi, sở dĩ mình không tải lên được vì là tài liệu mật ^^. Thế nhé cảm ơn bạn nhiều bb