Nhờ gộp dữ liệu từ nhiều ô trong Excel (1 người xem)

[F9_5276]

Tôi muốn sao chép công thức gộp dữ liệu từ nhiều ô trong Excel, gõ công thức từng ô mất thời gian quá. Xin mọi người giúp đỡ.

Tại sao tôi không gắn kèm được file nhỉ?

Tôi gửi File Excel nhờ mọi người chỉ giúp cách gộp dữ liệu.

Tại sao gửi file mãi không được?

 

[ndu96081631]

Tại sao gửi file mãi không được?

Đã xem qua file của bạn và xin trả lời sơ bộ thế này:
- Thứ nhất: Nối chuổi không phải là thế mạnh của công thức (nhất là khi ta cần nối chuổi theo điều kiện)
- Thứ hai: Với cách bố trí dữ liệu như trong file thì đừng nói là dùng công thức, ngay cả lập trình VBA cũng khó phân biết AI là người thuộc CHỦ HỘ nào
---------------
Ngoài lề: Bảng tính dạng này tôi thấy rất nhiều lần rồi và tôi thật không hiểu AI và với cách suy nghĩ thế nào lại tạo ra thứ cấu trúc tào lao đến thế

 

[F9_5276]

Cảm ơn bác đã quan tâm, thực ra tôi muốn in thẻ hộ nghèo bằng các trộn thư, nhưng theo tôi được biết thì 01 trang Word chỉ nhận dữ liệu từ 01 dòng trong Excel. Bác có cách nào hay hơn xin chỉ giúp, tôi gửi mẫu giấy chứng nhận kèm theo.

 

[concogia]

Dựa vào dữ liệu sheet "Dữ liệu" tìm chủ hộ & quan hệ thì Ok, nhưng bố trí bảng biểu kiểu này cũng hơi ngộ, tự mình làm khó mình thôi
Bài này dùng VBA còn cực chứ đừng nói chơi công thức, mà để trong Box này có được không nhỉ ???
Híc

 

[Ba Tê]

Dựa vào dữ liệu sheet "Dữ liệu" tìm chủ hộ & quan hệ thì Ok, nhưng bố trí bảng biểu kiểu này cũng hơi ngộ, tự mình làm khó mình thôi
Bài này dùng VBA còn cực chứ đừng nói chơi công thức, mà để trong Box này có được không nhỉ ???
Híc

Nếu thấy khoái thì làm đại, "hổng chúng thì chật".
Tui tham gia 1 cái thử coi.

Public Sub GPE()
Dim sArr(), dArr(), I As Long, J As Long, K As Long
With Sheets("Data")
    sArr = .Range(.[D3], .[D65000].End(xlUp)).Offset(, -3).Resize(, 10).Value
End With
ReDim dArr(1 To UBound(sArr, 1), 1 To 14)
For I = 1 To UBound(sArr, 1)
    If sArr(I, 2) <> "" Then
        K = K + 1
        dArr(K, 1) = sArr(I, 2)
        dArr(K, 2) = sArr(I, 4)
        For J = 3 To 6
            dArr(K, J) = sArr(I, J + 2)
        Next J
    Else
        For J = 3 To 10
            dArr(K, J + 4) = dArr(K, J + 4) & sArr(I, J) & ChrW(10)
        Next
    End If
Next I
For I = 1 To K
    For J = 7 To 14
        dArr(I, J) = Left(dArr(I, J), Len(dArr(I, J)) - 1)
    Next J
Next I
With Sheets("GPE")
    .[A5:N1000].ClearContents
    .[A5:N5].Resize(K).Value = dArr
End With
End Sub

 

[F9_5276]

Cảm ơn bạn đã giúp đỡ, bạn có thể hướng dẫn chi tiết hơn được không, món này tôi không thạo lắm.

 

[Ba Tê]

Cảm ơn bạn đã giúp đỡ, bạn có thể hướng dẫn chi tiết hơn được không, món này tôi không thạo lắm.

Mở file nhớ chọn Enable Macros, bấm nút thôi.
Còn muốn biết chi tiết xin tìm đọc sách về VBA trong Excel, làm sao hướng dẫn bi giờ.

 

[ndu96081631]

Cảm ơn bác đã quan tâm, thực ra tôi muốn in thẻ hộ nghèo bằng các trộn thư, nhưng theo tôi được biết thì 01 trang Word chỉ nhận dữ liệu từ 01 dòng trong Excel. Bác có cách nào hay hơn xin chỉ giúp, tôi gửi mẫu giấy chứng nhận kèm theo.

Bên sheet Dulieu, bạn chỉ cần thêm 1 cột SỐ HK nữa là mọi chuyện coi như xong
Cái cột Số HK này dùng để nhận biết AI TRONG 1 GIA ĐÌNH
Đó mới là CHUÂN
Mọi thứ râu ria sau đó (như truy xuất, tách, gộp...) cũng sẽ từ cái CHUẨN này mà làm
(không CHUẨN thì mọi hành động đi theo sau đó đều trở nên khó khăn)