Lỗi công thức sumif viết bằng VBA (1 người xem)

[huunhanltqb]

đây là lệnh mình viết:
Range("E" & i, "E" & i) = "=ROUND(SUMIF(" & Sheets(2).Name & "!R7C3:R" & eR & "C3,B" & i & "," & Sheets(2).Name & "!R7C8:R" & eR & "C8),3)"
khi chạy ra:
=ROUND(SUMIF(PTVT!$C$7:$C$41,'B6',PTVT!$J$7:$J$41),3)
lỗi ở trên thừa 2 dấu ' mà mình bôi màu đỏ
nhờ mọi người sửa lại dùm
rất cám ơn

 

[leonguyenz]

đây là lệnh mình viết:
Range("E" & i, "E" & i) = "=ROUND(SUMIF(" & Sheets(2).Name & "!R7C3:R" & eR & "C3,B" & i & "," & Sheets(2).Name & "!R7C8:R" & eR & "C8),3)"
khi chạy ra:
=ROUND(SUMIF(PTVT!$C$7:$C$41,'B6',PTVT!$J$7:$J$41),3)
lỗi ở trên thừa 2 dấu ' mà mình bôi màu đỏ
nhờ mọi người sửa lại dùm
rất cám ơn

Range("E" & i, "E" & i) thì chỉ cần viết Range("E" &i) là đủ.
Chèn hàm thì nên có thêm .FormulaR1C1 ="=..."
Sheets(2).Name thì nên viết hẳn tên sheet vào luôn, vì bạn đã xác định được tên sheet rồi.
Nhìn đoạn code trên thôi thì chưa rõ, bạn gửi file lên xem nào.

 

[huunhanltqb]

Range("E" & i, "E" & i) thì chỉ cần viết Range("E" &i) là đủ.
Chèn hàm thì nên có thêm .FormulaR1C1 ="=..."
Sheets(2).Name thì nên viết hẳn tên sheet vào luôn, vì bạn đã xác định được tên sheet rồi.
Nhìn đoạn code trên thôi thì chưa rõ, bạn gửi file lên xem nào.

Cám ơn bạn đã giúp đỡ
đây là file mình đã sửa theo như bạn hướng dẫn những vẫn lỗi như trên mong bạn giúp đỡ

 

[leonguyenz]

Cám ơn bạn đã giúp đỡ
đây là file mình đã sửa theo như bạn hướng dẫn những vẫn lỗi như trên mong bạn giúp đỡ

File bạn cài mật khẩu trong VBA. Tối về tôi xem lại nếu chưa có ai trả lời.

 

[huunhanltqb]

File bạn cài mật khẩu trong VBA. Tối về tôi xem lại nếu chưa có ai trả lời.

Không có mật khâu đâu bạn ơi
bấm ok là vào được
cám ơn bạn nhiều

 

[Quang_Hải]

đây là lệnh mình viết:
Range("E" & i, "E" & i) = "=ROUND(SUMIF(" & Sheets(2).Name & "!R7C3:R" & eR & "C3,B" & i & "," & Sheets(2).Name & "!R7C8:R" & eR & "C8),3)"
khi chạy ra:
=ROUND(SUMIF(PTVT!$C$7:$C$41,'B6',PTVT!$J$7:$J$41),3)
lỗi ở trên thừa 2 dấu ' mà mình bôi màu đỏ
nhờ mọi người sửa lại dùm
rất cám ơn

Sửa lại thế này
Range("E" & i).FormulaR1C1 = "=ROUND(SUMIF(" & Sheets(2).Name & "!R7C3:R" & eR & "C3,RC[-3]," & Sheets(2).Name & "!R7C10:R" & eR & "C10),3)"

 

[huunhanltqb]

Sửa lại thế này
Range("E" & i).FormulaR1C1 = "=ROUND(SUMIF(" & Sheets(2).Name & "!R7C3:R" & eR & "C3,RC[-3]," & Sheets(2).Name & "!R7C10:R" & eR & "C10),3)"

Cám ơn bạn nhiều lắm, làm hoài mà không được