Hỏi cách link số liệu tự động từ chi tiết sang tổng hợp (1 người xem)

[tuanda85]

HI cả nhà!
Mình có câu hỏi thế này, mình có 2 file chi tiết(gồm 31 sheet nhập cho từ ngày) và file tổng hợp lấy số liệu từ file chi tiết. Cuối mỗi ngày ở file chi tiết có số tồn tổng cộng theo từng loại bia của các kho. giờ mình muốn link tự động số tổng cộng đó ở file chi tiết sang file tổng hợp. bạn nào biết chỉ giúp mình với nhé
THanks

 

[nhapmon]

mình ko mo được file của bạn,
nhưng mình thấy bạn cứ mở 2 file này ra
rồi ở file tồng họp, chọn cell rồi gõ = cell ở file chi tiết
như vây bất cứ khi nào bạn mở 2 file nay ra, nó điều tự động update cho bạn
đầu cần sử dụng code

 

[tuanda85]

mình ko mo được file của bạn,
nhưng mình thấy bạn cứ mở 2 file này ra
rồi ở file tồng họp, chọn cell rồi gõ = cell ở file chi tiết
như vây bất cứ khi nào bạn mở 2 file nay ra, nó điều tự động update cho bạn
đầu cần sử dụng code

Thanks bạn, ở bảng chi tiết mình đã đặt công thức ở từng sheet(31 sheet) nên ở Bảng tổng hợp mình muốn đặt tự động lấy từ chi tiết sang cho số liệu đc chính xác, chứ đặt công thức cho từng cell như bạn nói thì rất dễ bị nhầm hic hic

 

[nhapmon]

Ban thu chạy file này xem có tổng hợp được so liệu theo yêu cầu của bạn không?

để sử dụng phù hợp, bạn hãy vào sub tonghopsolieu, khai báo lại đường dẫn đến File "bang kê chi tiết" của bạn

trong file bảng kê chi tiết, bạn đặt các sheetnam là (1)11,(2)12,
do mình chưa tìm cách nào để tách lấy ngày ra được để so sánh với các ngày tương ứng trong file tong hợp tháng, nên mình đã đổi lại tên các sheet từ 1 đến 31, nếu bạn không đổi tên sheet thì bạn phải xem lại code cho phù hợp

ah, để tăng tốc cho code, để nó đừng nhảy qua nhảy lại, bạn chép dòng lện này vào sub tonghopsolieu

đầu sub
Application.ScreenUpdating = False


cuối sub
Application.ScreenUpdating = true

chúc bạn thành công

 

[hung_xu20032000]

mình thấy làm trong pivot rất hiệu quả đấy. Bạn thử làm xem

 

[tuanda85]

Ban thu chạy file này xem có tổng hợp được so liệu theo yêu cầu của bạn không?

để sử dụng phù hợp, bạn hãy vào sub tonghopsolieu, khai báo lại đường dẫn đến File "bang kê chi tiết" của bạn

trong file bảng kê chi tiết, bạn đặt các sheetnam là (1)11,(2)12,
do mình chưa tìm cách nào để tách lấy ngày ra được để so sánh với các ngày tương ứng trong file tong hợp tháng, nên mình đã đổi lại tên các sheet từ 1 đến 31, nếu bạn không đổi tên sheet thì bạn phải xem lại code cho phù hợp

ah, để tăng tốc cho code, để nó đừng nhảy qua nhảy lại, bạn chép dòng lện này vào sub tonghopsolieu

đầu sub
Application.ScreenUpdating = False


cuối sub
Application.ScreenUpdating = true

chúc bạn thành công

THank bạn, mình đã chạy thử nhưng chỉ copy số liệu từ bảng chi tiết của ngày 1 còn các ngày 2,3,4...31 ở các sheet khác thì không thể copy đc. Làm sao thế bạn nhỉ ?

 

[nhapmon]

tui nghỉ là do tên sheet, bạn đã đổi tên sheet của "bảng kê chi tiết" thành 1,2,3,4,5...31 chưa?
tui gửi file "bang ke chi tiet" đã sử dụng để làm code cho bạn, ban xem và so sánh.

bạn có thể kiểm tra lại bằng cách thêm 2 dong lệnh này vào
'.............
If Val(ws.Name) >= 1 Then
ws.Select
Rowbk = 8 + Val(ws.Name)
'*****them 2 dong này
MsgBox "ngay" & ws.Name
MsgBox "row cua sheet thang " & Rowbk
'**********
j = 0 ' col cua sheet "bang ke chi tiet"
i = 3 ' col cua bang ke tong hop
'...........
nếu bãn thấy tên sheet không phải là số 1.....31
hoặc "row của sheet thang" có trùng với hàng tương ứng bên sheet tháng ko?

chúc bạn mai mắn lần sau.................