Nhờ Các Bạn Diễn Đàn Giúp Code VBA Sumif từ một workbook khác.

[Kool_Kool]

Chào Anh Chi và các bạn, Nhờ giúp Code VBA . Mình cần thực hiện lấy dự liệu sumif ở nhiều sheets ( Các sheet co mẫu giống nhau) trong một File Excel khác. Mình đang thực hiện Record Marcro thì code quá dài VBA không chấp nhận. Nhờ Anh Chị hướng dẫn code khác . Hoặc hướng dẫn mình rút gọn bớt code sau . Minh thực hiện sumif gần 70 sheets nên recode rất nhiều dòng. Cám ơn diễn đàn

Option Explicit

Sub Get_Data_From_File_006_Update1()

Dim FileToOpen As Variant

Dim OpenBook As Workbook

Application.ScreenUpdating = False

FileToOpen = Application.GetOpenFilename(Title:="Browse for your File & Import Range", FileFilter:="Excel Files (*.xls*),*xls*")

If FileToOpen <> False Then

Set OpenBook = Application.Workbooks.Open(FileToOpen)

ThisWorkbook.Activate

Sheets("Report_007).Select

Range("G13").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C5)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G14").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C6)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G15").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R[-14]C[-3],'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C7),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G32").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C8),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G48").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C9)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G49").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C10)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G55").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C11),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G56").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C12),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G57").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C13),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("G58").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]1_HERSCHEL'!C14),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J13").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C5)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J14").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C6)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J15").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R[-14]C[-3],'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C7),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J32").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C8),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J48").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C9)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J49").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C10)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J55").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C11),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J56").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C12),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J57").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C13),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("J58").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]2_HERSCHEL_OB_PnP'!C14),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M13").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C5)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M14").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C6)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M15").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R[-14]C[-3],'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C7),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M32").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C8),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M48").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C9)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M49").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C10)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M55").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C11),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M56").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C12),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M57").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C13),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("M58").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]3_EI_KNQ_CRAYOLA'!C14),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P13").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C5)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P14").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C6)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P15").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R[-14]C[-3],'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C7),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P32").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C8),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P48").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C9)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P49").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C10)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P55").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C11),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P56").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C12),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P57").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C13),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("P58").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]4_SCI_EI'!C14),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S13").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C5)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S14").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C6)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S15").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R[-14]C[-3],'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C7),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S32").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C8),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S48").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C9)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S49").Select

ActiveCell.FormulaR1C1 = _

=SUMIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C10)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S55").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C11),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S56").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C12),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

Range("S57").Select

ActiveCell.FormulaR1C1 = _

=IFERROR(AVERAGEIF('[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C2,R1C4,'[BC_Ngay_K6-1.xlsm]5_BOAD&MORE'!C13),0)

ActiveCell.Copy

Selection.PasteSpecial xlPasteValues

OpenBook.Close False

End If

Application.ScreenUpdating = True

MsgBox "Done Update !"

Range("A5").Select

End Sub

 

[Hoàng Tuấn 868]

@Hoàng Tuấn 868 ơi. Để chuẩn chỉnh hơn , Để người dùng dễ nhận biết tên khách hàng. Mình cần thêm 1 đuôi tên khách hàng vào tên sheet (Ví dụ Account1 Mình sẽ thêm Account001_Tên khách A...). TRường hợp này mình sẽ cố định 10 ký tự đâu tiên để dò tìm. Còn lại mình có thể thay đôi. Có cách nào nhờ Tuấn giúp thêm.

Mình chưa rõ ý bạn lắm, thêm vào đâu, sheet nào, flie nào, bạn ví dụ cụ thể cho mình được không.

 

[Kool_Kool]

Mình chưa rõ ý bạn lắm, thêm vào đâu, sheet nào, flie nào, bạn ví dụ cụ thể cho mình được không.

À. Ví dụ như mình đổi tên Sheet "Account1"" Thành ""Account001_Tiki"" . Khi đổi như thế này thì File tổng hợp ko hiểu. Nên mình nhờ xem có cách nào không

 

[Hoàng Tuấn 868]

À. Ví dụ như mình đổi tên Sheet "Account1"" Thành ""Account001_Tiki"" . Khi đổi như thế này thì File tổng hợp ko hiểu. Nên mình nhờ xem có cách nào không
View attachment 253601

Vẫn có cách, với điều kiện bạn xếp thứ tự name cùng thứ tự với code name.

 

[Kool_Kool]

Vẫn có cách, với điều kiện bạn xếp thứ tự name cùng thứ tự với code name.

Mình có tên nhiều khách hàng. Thêm vào sau đuôi. Vậy thứ tự name mình thêm số đăng trước à ok không Hoàng Tuấn

 

[Hoàng Tuấn 868]

Để mình thử xem thế nào đã nhé.

 

[Hoàng Tuấn 868]

Mình có tên nhiều khách hàng. Thêm vào sau đuôi. Vậy thứ tự name mình thêm số đăng trước à ok không Hoàng Tuấn
View attachment 253602

Bạn xếp tên như thế này thì được:
Sheet1(Account1_Tiki)
Sheet2(Account2_Sen_Do)
Sheet3(Account3_vvv....)
Bắt buộc thứ tự phải theo code name (phần mầu đỏ).

 

[Kool_Kool]

Bạn xếp tên như thế này thì được:
Sheet1(Account1_Tiki)
Sheet2(Account2_Sen_Do)
Sheet3(Account3_vvv....)
Bắt buộc thứ tự phải theo code name (phần mầu đỏ).

Mình gửi lại File Theo thứ tự Name Tuấn xem giúp

 

[Hoàng Tuấn 868]

Mình gửi lại File Theo thứ tự Name Tuấn xem giúp

Bạn không hiểu rồi, thứ tự theo code name cơ mà, thứ tự của code name trong cửa sổ viết code cơ bạn ơi.

 

[Kool_Kool]

Bạn không hiểu rồi, thứ tự theo code name cơ mà, thứ tự của code name trong cửa sổ viết code cơ bạn ơi.

À. Vậy Tuấn xem giúp

 

[Hoàng Tuấn 868]

À. Vậy Tuấn xem giúp

Bây giờ bạn cứ xếp tên thế nào cho tiện thì tùy bạn, sau đó mình sửa lại bên trong theo vậy. Nhưng nên xếp sao cho dễ theo dõi chứ đừng để thay đổi xong thấy không hợp lý lại .....

 

[Kool_Kool]

Bây giờ bạn cứ xếp tên thế nào cho tiện thì tùy bạn, sau đó mình sửa lại bên trong theo vậy. Nhưng nên xếp sao cho dễ theo dõi chứ đừng để thay đổi xong thấy không hợp lý lại .....

Mình chót lại rồi. Phiên Tuấn xem giúp Mình lần nữa.

 

[Hoàng Tuấn 868]

Mình chót lại rồi. Phiên Tuấn xem giúp Mình lần nữa.

Bạn kiểm tra lại xem.

 

[Kool_Kool]

Bạn kiểm tra lại xem.

Bạn kiểm tra lại xem.

Nó chạy tốt rồi. Cám ơn Tuấn nhiều.

 

[Kool_Kool]

Bạn kiểm tra lại xem.

@Hoàng Tuấn 868 ơi, Hướng dẫn giúp mình thêm chổ này : Khi mình thực hiện tính trung bình như thê này thì số liệu ra không chính xác vì nó trung bình tất cả các dòng bao gồm cả dòng không có dữ liệu . Mình cần trung bình các dữ liệu lớn hơn 0. Tuấn advise thêm giúp.
md(27, 11 + j) = md(27, 11 + j) / n 'Ton
md(44, 11 + j) = md(44, 11 + j) / n 'OT
md(70, 11 + j) = md(70, 11 + j) / n 'Nhap
md(71, 11 + j) = md(71, 11 + j) / n 'Xuat
md(72, 11 + j) = md(72, 11 + j) / n 'Cho
md(73, 11 + j) = md(73, 11 + j) / n / 100 'inventory

 

[Hoàng Tuấn 868]

@Hoàng Tuấn 868 ơi, Hướng dẫn giúp mình thêm chổ này : Khi mình thực hiện tính trung bình như thê này thì số liệu ra không chính xác vì nó trung bình tất cả các dòng bao gồm cả dòng không có dữ liệu . Mình cần trung bình các dữ liệu lớn hơn 0. Tuấn advise thêm giúp.
md(27, 11 + j) = md(27, 11 + j) / n 'Ton
md(44, 11 + j) = md(44, 11 + j) / n 'OT
md(70, 11 + j) = md(70, 11 + j) / n 'Nhap
md(71, 11 + j) = md(71, 11 + j) / n 'Xuat
md(72, 11 + j) = md(72, 11 + j) / n 'Cho
md(73, 11 + j) = md(73, 11 + j) / n / 100 'inventory

1/ Vậy là điều kiện của bạn ra không chặt chẽ chứ không phải là không chính xác.
2/ Mình không hiểu từ "advise" nghĩa là gì. (Vui lòng dùng tiếng Việt giúp mình)

 

[Kool_Kool]

1/ Vậy là điều kiện của bạn ra không chặt chẽ chứ không phải là không chính xác.
2/ Mình không hiểu từ "advise" nghĩa là gì.

À. Mình nói điều kiện chưa rõ. Tuấn chỉnh lại giúp mình

 

[VetMini]

... Mình cần trung bình các dữ liệu lớn hơn 0. Tuấn advise thêm giúp.
...

...2/ Mình không hiểu từ "advise" nghĩa là gì. (Vui lòng dùng tiếng Việt giúp mình)

"advise" có nghĩa là chỉ dẫn.
Ý người ta chỉ muốn bạn chỉ dẫn chứ không phải làm giùm.

 

[Kool_Kool]

À. Mình nói điều kiện chưa rõ. Tuấn chỉnh lại giúp mình

Mình cần tính trung bình các dữ liệu lớn hơn 0 . Các bạn chỉnh giúp mình.