file cần truy xuất dữ liệu nhiều thành phần (1 người xem)

[Nguyễn Thiên Cường]

Thân nhờ các bạn giúp.

Mình có file như sau, Mình mò công thức để truy xuất không được.

Trong sheet GHÉP có Cấu trúc, Hạn mức, Mã Vật tư, vượt, tiết kiệm.

Trong sheet TONG HOP để báo cáo mình cần truy xuất như sau:

Mình cần đánh cấu trúc. VD OPP20/PE20 hiện ra tất cả các Hạn mức, mã vật tư, số lượng vượt, tiết kiệm,ghi chú liên quan đến cấu trúc đó.

Mình tìm mọi công thức excel đều không ra.

Mong các bạn giúp đỡ.

Cám ơn nhiều

 

[Let'GâuGâu]

Thân nhờ các bạn giúp.

Mình có file như sau, Mình mò công thức để truy xuất không được.

Trong sheet GHÉP có Cấu trúc, Hạn mức, Mã Vật tư, vượt, tiết kiệm.

Trong sheet TONG HOP để báo cáo mình cần truy xuất như sau:

Mình cần đánh cấu trúc. VD OPP20/PE20 hiện ra tất cả các Hạn mức, mã vật tư, số lượng vượt, tiết kiệm,ghi chú liên quan đến cấu trúc đó.

Mình tìm mọi công thức excel đều không ra.

Mong các bạn giúp đỡ.

Cám ơn nhiều

bạn post ở box lập trình, nhưng lại hỏi làm = cthức?
thôi tui làm cho bạn = cthức,
nhưng thấy số liệu của bạn lớn quá, sợ là nó chạy ko nổi, chừng nào chạy ko nổi thì chuyển sang vba nha

file nặng quá, tui hết quota

thui bạn xem cthức
1- đặt name
CauTruc=OFFSET(GHEP!$C$8,,,COUNTA(GHEP!$C$8:$C$60000))

2- A6=IF(ROW(1:1)<=COUNTIF(CauTruc,$D$3),MATCH($D$3,OFFSET(CauTruc,A5,),0)+A5,"")
kéo xuống bí tỉ

3- B6=IF(ISNUMBER($A6),INDEX(OFFSET(CauTruc,,,,24),$A6,2),"")
kéo qua phải,sửa lại các cột tham chiếu cho phù hợp (màu đỏ)
chẳng hạn như D6 sữa số 2 thanh số 10. E6=11,F6=22,H6=23,J6=24
kéo xuống bí tỉ

 

[Nguyễn Thiên Cường]

Vậy code VBA của điều kiện lọc này là sao bạn

Mới có dữ liệu 1 tuần mà đã không chạy nổi rồi.

Dữ liệu của mình cả năm làm bằng công thức chắc khóc luôn quá.

Cám ơn bạn nhiều

 

[Let'GâuGâu]

Vậy code VBA của điều kiện lọc này là sao bạn

Mới có dữ liệu 1 tuần mà đã không chạy nổi rồi.

Dữ liệu của mình cả năm làm bằng công thức chắc khóc luôn quá.

Cám ơn bạn nhiều

THỬ cái này xem có khá hơn ko
Sub Macro1()


Sheet4.[B6:J6000].ClearContents
With Sheet3
.[C6:AA60000].AutoFilter Field:=1, Criteria1:=Sheet4.[d3]
.[C8].Resize(.[c60000].End(3).Row).Copy Sheet4.[b6]
.[D8].Resize(.[c60000].End(3).Row).Copy Sheet4.[D6]
.[M8].Resize(.[c60000].End(3).Row).Copy Sheet4.[E6]
.[X8].Resize(.[c60000].End(3).Row).Copy Sheet4.[F6]
.[Y8].Resize(.[c60000].End(3).Row).Copy Sheet4.[H6]
.[AA8].Resize(.[c60000].End(3).Row).Copy Sheet4.[J6]
.AutoFilterMode = False
End With

End Sub

 

[Let'GâuGâu]

sao ko thấy bạn có ý kiến gì hết vậy, nó đâu có chạy nổi đâu???

...........................
nhân đây xin nhờ các cao thủ giúp đỡ,
tôi biêt là với dữ liệu nhiều như vậy thì phải sử dụng mảng. tuy nhiên tôi có chút khó hiểu như vậy
nếu tôi thêm dòng lệnh sau vào

Application.Calculation = xlManual

thì nó chạy cái vèo.........nhưng khi bật trở lại auto thì bị đứng hình luôn.
tôi kiểm tra trong file không thấy có công thức gì, vì sao nó lại tính toán lâu như vậy

cám ơn

 

[dhn46]

sao ko thấy bạn có ý kiến gì hết vậy, nó đâu có chạy nổi đâu???

...........................
nhân đây xin nhờ các cao thủ giúp đỡ,
tôi biêt là với dữ liệu nhiều như vậy thì phải sử dụng mảng. tuy nhiên tôi có chút khó hiểu như vậy
nếu tôi thêm dòng lệnh sau vào

Application.Calculation = xlManual

thì nó chạy cái vèo.........nhưng khi bật trở lại auto thì bị đứng hình luôn.
tôi kiểm tra trong file không thấy có công thức gì, vì sao nó lại tính toán lâu như vậy

cám ơn

Không biết bạn kiểm tra tại file nào, nhưng nếu bạn dùng file bài #1 thì tại sheet GHEP có rất nhiều công thức mảng.

 

[Nguyễn Thiên Cường]

sao ko thấy bạn có ý kiến gì hết vậy, nó đâu có chạy nổi đâu???

...........................
nhân đây xin nhờ các cao thủ giúp đỡ,
tôi biêt là với dữ liệu nhiều như vậy thì phải sử dụng mảng. tuy nhiên tôi có chút khó hiểu như vậy
nếu tôi thêm dòng lệnh sau vào

Application.Calculation = xlManual

thì nó chạy cái vèo.........nhưng khi bật trở lại auto thì bị đứng hình luôn.
tôi kiểm tra trong file không thấy có công thức gì, vì sao nó lại tính toán lâu như vậy

cám ơn

Cám ơn bạn nhiều.

File của mình dùng excel 2007 và 2010 thì còn chạy được,

Hiện tại trên công ty mình dùng bản 2003 mở sheet Ghep chạy hết một buổi. (khóc ròng luôn)

Nhờ các bạn có cao kiến gì thay công thức index, match, sumproduct bằng code cho chạy nhanh hơn được không???

A VBA của bạn mình chỉnh sửa chút chạy được rồi.

Cám ơn nhiều

 

[Nguyễn Thiên Cường]

bạn post ở box lập trình, nhưng lại hỏi làm = cthức?
thôi tui làm cho bạn = cthức,
nhưng thấy số liệu của bạn lớn quá, sợ là nó chạy ko nổi, chừng nào chạy ko nổi thì chuyển sang vba nha

file nặng quá, tui hết quota

thui bạn xem cthức
1- đặt name
CauTruc=OFFSET(GHEP!$C$8,,,COUNTA(GHEP!$C$8:$C$60000))

2- A6=IF(ROW(1:1)<=COUNTIF(CauTruc,$D$3),MATCH($D$3,OFFSET(CauTruc,A5,),0)+A5,"")
kéo xuống bí tỉ

3- B6=IF(ISNUMBER($A6),INDEX(OFFSET(CauTruc,,,,24),$A6,2),"")
kéo qua phải,sửa lại các cột tham chiếu cho phù hợp (màu đỏ)
chẳng hạn như D6 sữa số 2 thanh số 10. E6=11,F6=22,H6=23,J6=24
kéo xuống bí tỉ

.

Thanhks công thức này mình dùng excel 2010 chạy được vô tư.

Còn dùng 2003 máy treo cả ngày.

 

[VetMini]

Từ ngày 1/9 đến 31/10 là 2 tháng. Dữ liệu 2 tháng là hơn 10.000 phát sinh.

Nếu cả năm thì con số sẽ ở khoảng mức 60.000

Cty này chưa bị quá tải Excel 2003 thì cũng đáng gọi là may mắn.

 

[Nguyễn Thiên Cường]

Từ ngày 1/9 đến 31/10 là 2 tháng. Dữ liệu 2 tháng là hơn 10.000 phát sinh.

Nếu cả năm thì con số sẽ ở khoảng mức 60.000

Cty này chưa bị quá tải Excel 2003 thì cũng đáng gọi là may mắn.

Cám ơn bạn

Mình đã bỏ bớt rồi, chỉ giữ lại 1 phần để tải lên thôi.

Excel 2003 có khoảng hơn 65000 dòng mà dữ liệu 60000 dòng chắc khóc rồi chứ bạn.

 

[VetMini]

Bạn nên đi tìm hiểu về kỹ thuật phân bảng (CSDL phân tán - partitioned database)

 

[VetMini]

Xin lỗi. Chắc tại mạng trục trặc nên tự dưng bị post 2 lần. Xoá bớt 1 lần