TỔng hợp nhiều sheet thành 1 sheet tổng (1 người xem)

[maudọn9]

Có anh chị nào giúp em cái này với việc là em muốn tổng hợp từ nhiều sheet thành 1 sheet tổng hợp, em có đọc trên diễn đàn và cũng làm thử nhưng nó vẫn không được, hoặc được thì nó cũng chạy không đúng ví dụ như số CMND đi khi chạy tổng hợp thì đối thành số, hoặc là khi em sửa thông tin ở sheet chi tiết thì sheet tổng hợp cũng không đổi. hic anh chị nào giúp em với nhé em cám ơn

 

[ninhmoon]

Có anh chị nào giúp em cái này với việc là em muốn tổng hợp từ nhiều sheet thành 1 sheet tổng hợp, em có đọc trên diễn đàn và cũng làm thử nhưng nó vẫn không được, hoặc được thì nó cũng chạy không đúng ví dụ như số CMND đi khi chạy tổng hợp thì đối thành số, hoặc là khi em sửa thông tin ở sheet chi tiết thì sheet tổng hợp cũng không đổi. hic anh chị nào giúp em với nhé em cám ơn

Sao bạn không tổng hợp vào một sheet
Sau đó chia ra những sheets nhỏ có pải dễ hơn không.

 

[mhung12005]

Có anh chị nào giúp em cái này với việc là em muốn tổng hợp từ nhiều sheet thành 1 sheet tổng hợp, em có đọc trên diễn đàn và cũng làm thử nhưng nó vẫn không được, hoặc được thì nó cũng chạy không đúng ví dụ như số CMND đi khi chạy tổng hợp thì đối thành số, hoặc là khi em sửa thông tin ở sheet chi tiết thì sheet tổng hợp cũng không đổi. hic anh chị nào giúp em với nhé em cám ơn

Bạn xem file đính kèm nhé.

 

[ninhmoon]

Bạn xem file đính kèm nhé.

Em không biết tạo for next hay các if and endwith
Em làm thêm cái border và learn border khi update dữ liệu

 

[Kiều Mạnh]

Em không biết tạo for next hay các if and endwith
Em làm thêm cái border và learn border khi update dữ liệu

Mình tập làm một sub Border theo kiểu khác cho bạn xem nha

Sub Clear_Border()
With Range("A1")
    .CurrentRegion.Offset(1).Clear
    .CurrentRegion.Offset(1).Borders.LineStyle = xlNone
End With
End Sub

Sub Border()
With Range("A1")
    .CurrentRegion.Borders.LineStyle = xlContinuous
    .CurrentRegion.Offset(1).Borders(xlInsideHorizontal).Weight = xlHairline
End With
End Sub