Tự động làm mới dữ liệu cho PivotTable (2 người xem)

  • Thread starter Thread starter bin.vcsc
  • Ngày gửi Ngày gửi
Liên hệ QC

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

bin.vcsc

Thành viên hoạt động
Tham gia
6/12/13
Bài viết
125
Được thích
14

Em có một file excel, có 2 yêu cầu:

-khi nhập thêm số liệu vùng ô vàng

Yêu cầu 01: kích sang sheet-pivot tabbel thì sheet này tự cập nhật => OK, em đã làm được.

Yêu cầu 02: kích lần lượt sang sheet a,b,c,d các sheet này cũng tự cập nhập => Vẫn chưa làm được

Mong các bác cao nhân chỉ giúp ah.
 

File đính kèm


Em có một file excel, có 2 yêu cầu:
-khi nhập thêm số liệu vùng ô vàng

Yêu cầu 01: kích sang sheet-pivot tabbel thì sheet này tự cập nhật => OK, em đã làm được.

Yêu cầu 02: kích lần lượt sang sheet a,b,c,d các sheet này cũng tự cập nhập => Vẫn chưa làm được
Mong các bác cao nhân chỉ giúp ah.
Góp ý cho bạn:
1/ Nếu 100 người hoặc khách hàng không lẽ theo dõi 100 sheet, nếu có vài trăm sheet thì tổng hợp bằng cách nào?
2/ Nên chứa tất cả khách hàng trong 1 sheet thì việc tổng hợp quá đơn giản.
3/ Nếu cần mỗi khách hàng 1 sheet để làm cái gì đó thì sử dụng VBA tách sheet ra (xong thì xóa sheet tách) và chỉ chừa lại các sheet cần theo dõi.
 
Góp ý cho bạn:
1/ Nếu 100 người hoặc khách hàng không lẽ theo dõi 100 sheet, nếu có vài trăm sheet thì tổng hợp bằng cách nào?
2/ Nên chứa tất cả khách hàng trong 1 sheet thì việc tổng hợp quá đơn giản.
3/ Nếu cần mỗi khách hàng 1 sheet để làm cái gì đó thì sử dụng VBA tách sheet ra (xong thì xóa sheet tách) và chỉ chừa lại các sheet cần theo dõi.
Cám ơn bạn đã góp ý. Nhưng trong trường hợp bạn chỉ có 1 nguồn data và nguồn data này thấy đổi thì cách của bạn không hiệu quả.
Mình muốn là mỗi lần cập nhật data thì các số liệu sẽ tự động thay đổi để đỡ mất thời gian làm file mới ah.
 
Cám ơn bạn đã góp ý. Nhưng trong trường hợp bạn chỉ có 1 nguồn data và nguồn data này thấy đổi thì cách của bạn không hiệu quả.
Mình muốn là mỗi lần cập nhật data thì các số liệu sẽ tự động thay đổi để đỡ mất thời gian làm file mới ah.
Bạn vào mục Tìm kiếm và gõ cụm từ Tách sheet và tải File về tham khảo để hiểu nội dung góp ý của tôi.
Theo hiểu biết của tôi, nếu sử dụng VBA thì thêm bao nhiêu dòng dữ liệu nó tự động tổng hợp và tự lấy dữ liệu vào PivotTable mà chẳng cần Refresh gì cả.
 
Lần chỉnh sửa cuối:
Bạn vào mục Tìm kiếm và gõ cụm từ Tách sheet và tải File về tham khảo để hiểu nội dung góp ý của tôi.
Theo hiểu biết của tôi, nếu sử dụng VBA thì thêm bao nhiêu dòng dữ liệu nó tự động tổng hợp và tự lấy dữ liệu vào PivotTable mà chẳng cần Refresh gì cả.
Hi bạn be09, bạn đã xem file excel của mình chưa. Có thể là chưa / hoặc là bạn chưa hiểu ý của mình.
1. Trong file excel mình upload thì đã có VBA để mỗi lần điều chỉnh data nguồn. Ở đây ví dụ với số lượng nhỏ là 2 ô màu vàng.

215103

Thì data sẽ tự động cập nhật vào trong Pivot Table.

215105

Vấn đề ở đây mình muốn cần giúp là, data của pivot không tự đông cập nhật sau mỗi lần mình cập nhật dữ liệu.
Ví dụ: data nguồn và pivot table đang là 2 dòng.
215108
-Mình thêm một dòng data nữa => pivot table đã cập nhật lên 3 => nhưng data của a này và cụ thể là ở sheet đặt tên là a không tự động cập nhật lên 3 dòng theo như dữ liệu nguồn.

215109

215106
215110

Và cái mình cần là bảng dữ liệu của Pivot-table được cập nhật mỗi khi cập nhật data nguồn. Không phải là Pivot-table nhé, vì mình đã có VBA để mỗi khi cập nhật data nguồn thì Pivot-table cũng thay đổi theo rồi.
 
Hi bạn be09, bạn đã xem file excel của mình chưa. Có thể là chưa / hoặc là bạn chưa hiểu ý của mình.
1. Trong file excel mình upload thì đã có VBA để mỗi lần điều chỉnh data nguồn. Ở đây ví dụ với số lượng nhỏ là 2 ô màu vàng.

View attachment 215103

Thì data sẽ tự động cập nhật vào trong Pivot Table.

View attachment 215105

Vấn đề ở đây mình muốn cần giúp là, data của pivot không tự đông cập nhật sau mỗi lần mình cập nhật dữ liệu.
Ví dụ: data nguồn và pivot table đang là 2 dòng.
View attachment 215108
-Mình thêm một dòng data nữa => pivot table đã cập nhật lên 3 => nhưng data của a này và cụ thể là ở sheet đặt tên là a không tự động cập nhật lên 3 dòng theo như dữ liệu nguồn.

View attachment 215109

View attachment 215106
View attachment 215110

Và cái mình cần là bảng dữ liệu của Pivot-table được cập nhật mỗi khi cập nhật data nguồn. Không phải là Pivot-table nhé, vì mình đã có VBA để mỗi khi cập nhật data nguồn thì Pivot-table cũng thay đổi theo rồi.
Cách theo dõi của bạn quá rườm rà, nên cách tôi làm sẽ khác cách của bạn nên tôi không cần xem code. Tôi diễn giải lại bài 2 và 4 để bạn hiểu:
1/ Tất cả các khách hàng tôi chỉ nhập liệu và chỉ chứa duy nhất trong 1 sheet Theo dõi (như vậy thì việc nhập liệu sẽ đơn giản).
2/ Muốn có danh sách 100 khách hàng thì dựa vào dữ liệu của sheet Theo dõi ta nhấn nút tách sheet thì có được 100 danh sách như bạn đang theo dõi (mắc chi phải cập nhật và theo dõi đến 100 sheet).
3/ Nếu muốn có bảng tổng hợp của 100 khách hàng chỉ việc nhấn nút tách 100 PivotTable.
4/ Sau khi in danh sách tổng hợp báo cáo xong thì nhấn nút xóa sheet (chỉ chừa lại các sheet cần). Như vậy thì công việc theo dõi và tổng hợp quá nhẹ nhàng và cũng giảm được dung lượng File nhất nhiều.
 
Lần chỉnh sửa cuối:
các bác nói gì em chẳng hiểu gì cả
Bạn chưa bao giờ theo dõi vài trăm khách hàng nên không hiểu cũng phải, bạn có thể hiểu thế này:
1/ Nếu bạn có vài trăm khách hàng để theo dõi không lẽ bạn tạo vài trăm sheet để theo dõi, nội việc di chuyển từ sheet này qua sheet khác thì cũng đã hụt hơi rồi, vậy thì còn thời gian đâu mà làm việc. Nếu bạn muốn tổng hợp vài trăm khách hàng theo từng loại thì bạn tổng hợp bằng cách nào?
2/ Với những gì tôi góp ý ở các bài viết trên thì chỉ cần theo dõi 1 sheet là đủ, tùy theo nhu cầu công việc và muốn làm cái gì tiếp theo thì chỉ cần dựa vào sheet theo dõi.
 
Gửi anh chị

Cám ơn anh chị đã tham gia có những tư vấn. Sau một thời gian dài lang thang trên mạng tìm thông tin.
Em đã tìm được cái mà em cần. Em chia sẻ lại để ai cần thì copy về sử dụng ah.
Ứng dụng được rất nhiều và tiết kiệm được rất nhiều thời gian ah.
===========================================
Private Sub Worksheet_Activate()
PivotTables("PivotTable1").PivotCache.Refresh
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub
===========================================
 
Gửi anh chị

Cám ơn anh chị đã tham gia có những tư vấn. Sau một thời gian dài lang thang trên mạng tìm thông tin.
Em đã tìm được cái mà em cần. Em chia sẻ lại để ai cần thì copy về sử dụng ah.
Ứng dụng được rất nhiều và tiết kiệm được rất nhiều thời gian ah.
===========================================
Private Sub Worksheet_Activate()
PivotTables("PivotTable1").PivotCache.Refresh
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub
===========================================
GPE cũng có bạn nhé.
 
GPE cũng có bạn nhé.

Hi All

Cám ơn bạn ah. Nếu biết sớm đỡ mất công ghê. Nhưng phải thêm đoạn code này nữa thì mới hiệu quả ah.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub
 
Web KT

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

Back
Top Bottom