Giúp đỡ trích xuất từ pivot table (1 người xem)

[holmes]

Em muốn trích dữ liệu từ pivot table ra mà không biết làm cách nào.
Ở đây phần data có thể dùng hàm getpivotdata, nhưng phần dữ liệu nằm ngoài vùng data (tên, đơn vị hàng hóa) thì trích ra kiểu gì em chưa rõ. Mong được các bác giúp đỡ.
Phương án của em là dùng ..vlookup nhưng như thế không tận dụng được tốc độ của pivot table. hic.

Đây là ví dụ minh họa nên chỉ có chút xíu data và 1 công thức thôi ah.

 

[Lê Duy Thương]

hic! No answer..........................

dùng dsum thử xem có đúng ý không ?

 

[holmes]

Không phải rồi, ý mình là hỏi công thức cho ô màu vàng kia cơ mà tận dụng được hàm có sẵn dành cho pivot i'. Ô getpivotdata như thế ổn rồi.

 

[Lê Duy Thương]

không phải rồi, ý mình là hỏi công thức cho ô màu vàng kia cơ mà tận dụng được hàm có sẵn dành cho pivot i'. ô getpivotdata như thế ổn rồi.

tên ==offset($b$4,match($a$2,$b$4:$b$781,0)-1,-1,,)

đơn vị==offset($b$4,match($a$2,$b$4:$b$781,0)-1,1,,)

bạn quay lai bài trên xem file nhé mình sửa rồi

 

[holmes]

Thanks bác. Nhưng đây cũng là một cách ..lookup, không có gì liên quan đến pivot nhỉ. Tức là nó chưa được "động" lắm theo pivot

 

[ndu96081631]

bạn quay lai bài trên xem file nhé mình sửa rồi

Thế sao không dùng VLOOKUP nhỉ?

 

[Lê Duy Thương]

thế sao không dùng vlookup nhỉ?

phương án của em là dùng ..vlookup nhưng như thế không tận dụng được tốc độ của pivot table. Hic.

tại cái trên nên em không dùng vlookup. Muốn đổi gió mà
hi hi

 

[holmes]

Em hỏi thêm là table của pivot không có name range nhỉ. Khác với khi mình insert table thì có một cái name range rất tiện lợi cho việc tham chiếu.

 

[be_09]

Xuất danh sách từ pivot table.
Ngoại trừ cell "Total" và "Grand Total", thì bạn cứ click đúp chuột vào bất kỳ 01 cell nào nó đều xuất ra một sheet mới với nội dung bên trong sẽ chứa dữ liêu tổng của cell mà bạn vừa click đúp chuột.
Chúc bạn thực hiện thành công.

 

[Vũ Thị Ngọc]

Nếu làm như bạn be09 nói thì các sheet hiện ra sẽ có tên là sheet 1, sheet 2, v.v..
Bây giờ mình muốn click vào 1 cell bất kỳ sẽ cho ra sheet mà tên sheet là MA01, MA02, v.v...
Có cách nào ko ạ? E tìm gg mỏi cả mắt mà ko có : ((

 

[be_09]

Nếu làm như bạn be09 nói thì các sheet hiện ra sẽ có tên là sheet 1, sheet 2, v.v..
Bây giờ mình muốn click vào 1 cell bất kỳ sẽ cho ra sheet mà tên sheet là MA01, MA02, v.v...
Có cách nào ko ạ? E tìm gg mỏi cả mắt mà ko có : ((

Ở sheet DATA em nên thêm cột tháng để thay đổi cách nhập dữ liệu theo chiều dọc thì mới thuận tiện trong việc nhập liệu theo dõi và dễ dàng trong việc sử dụng Pivottable.

Ở sheet Pivottable để xuất dữ liệu là MA01 thì click vào cell Q5 và click đúp chuột thì nó xuất ra 1 sheet mới xong đặt tên sheet thủ công, còn muốn tự động thì phải dùng VBA.

Tương tự như vậy để xuất dữ liệu là MA02 ra 1 sheet thì click vào cell Q9 ..v..v....

 

[Vũ Thị Ngọc]

Đấy đấy, em ko muốn phải đặt tên sheet thủ công như vậy, mà click đúp chuột vào ô Q5 nó xuất ra 1 sheet tên là MA01 luôn ấy
E chưa biết tý gì về vba, toàn lên mạng copy của các anh chị về dùng thôi *có 1 sự xấu hổ không hề nhẹ*
@be09 giúp em được không ạ? E đội ơn lắm lắm! :">

 

[van_thanh_phong]

Đấy đấy, em ko muốn phải đặt tên sheet thủ công như vậy, mà click đúp chuột vào ô Q5 nó xuất ra 1 sheet tên là MA01 luôn ấy
E chưa biết tý gì về vba, toàn lên mạng copy của các anh chị về dùng thôi *có 1 sự xấu hổ không hề nhẹ*
@be09 giúp em được không ạ? E đội ơn lắm lắm! :">

Mình cũng định hỏi anh chị trong GPE về vấn đề này: Xuất dữ liệu trong PV sang workbook mới.
Vậy cho mình gởi câu hỏi luôn nhé !
Cảm ơn nhiều nhiều !

 

[be_09]

Mình cũng định hỏi anh chị trong GPE về vấn đề này: Xuất dữ liệu trong PV sang workbook mới.
Vậy cho mình gởi câu hỏi luôn nhé !
Cảm ơn nhiều nhiều !

@be09 giúp em được không ạ? E đội ơn lắm lắm!

Muốn xuất ra cái gì thì dùng Advanced Filter để lọc cái đó ra rồi lưu cái đó thành workbook mới sẽ thuận tiện hơn sử dụng PivotTable, vì PivotTable mỗi lần xuất là ra 1 sheet với tên mới nên viết code sẽ khó khăn.

Còn muốn làm cái gì nữa thì phải có File và nêu rõ xuất cái gì ở cột nào, nếu không có File thì bó tay.

 

[van_thanh_phong]

File ví dụ nhé !
Cảm ơn nhiều nhiều !
Xuất dữ liệu ở bất kì dòng nào hay cột nào mà ta kích đúp chuột, miễn là ta đúp chuột trong vùng PV thì đều xuất dữ liệu sang Workbook mới.
(Workbook mới không cần phải đặt tên, sheet chứa dữ liệu xuất ra cũng vậy

 

[be_09]

xuất dữ liệu sang Workbook mới, Workbook mới không cần phải đặt tên, sheet chứa dữ liệu xuất ra cũng vậy

Tôi thấy sử dụng Pivottable để xuất ra Workbook mới với nhiều tiêu chí thì rất phức tạp, để cho đơn giản thì dùng Advanced Filter để lọc tiêu chí cần rồi lưu thành workbook mới thì viết code sẽ ngắn gọn và dễ dàng hơn.

Nói chung bất kỳ tiêu chí nào cũng có thể xuất ra như PivotTable, nếu bạn muốn kiểu này thì tôi sẽ giúp, còn muốn dùng PivotTable thì phải chờ rảnh tôi nghiên cứu thêm mới giải quyết được.

 

[van_thanh_phong]

Nói chung bất kỳ tiêu chí nào cũng có thể xuất ra như PivotTable, nếu bạn muốn kiểu này thì tôi sẽ giúp, còn muốn dùng PivotTable thì phải chờ rảnh tôi nghiên cứu thêm mới giải quyết được.

Mình không rành về VBA nên chỉ mò mẫm ghi maro và sửa lại tí thôi.
Nhờ bạn kiểm tra, bẩy lỗi dùm nhé !
Cảm ơn nhiều nhiều !

Sub Xuat_DL()
On Error GoTo Loi
Dim myRange As Range
Set myRange = Application.InputBox("Chon Du Lieu de xuat", "XUAT DU LIEU", Type:=8)
myRange.Select
Selection.ShowDetail = True
ActiveSheet.Move
Exit Sub
Loi:
MsgBox "Tro ve File moi xuat duoc DL", , "THONG BAO !"
End Sub