Lỗi: " Invalid qualifier "

[quick87]

Em đang bập bẹ tự vọc VBA, em có viết 1 đoạn code để tổng hợp dữ liệu, tuy nhiên trong quá trình chạy đang bị vướng Lỗi: " Invalid qualifier ", mong các thầy, các anh chị và mọi người giúp đỡ ạ.

Em xin cảm ơn

 

[siwtom]

Em đang bập bẹ tự vọc VBA, em có viết 1 đoạn code để tổng hợp dữ liệu, tuy nhiên trong quá trình chạy đang bị vướng Lỗi: " Invalid qualifier ", mong các thầy, các anh chị và mọi người giúp đỡ ạ.

Em xin cảm ơn

Tôi mới nhìn qua thì thế này.
1. Bạn khai báo: Dim sh As Worksheet
2. Thay dòng tensheet = Range("T1").Value bằng dòng Set sh = Sheets(Range("T1").Value)
3. Tìm và thay tất cả tensheet bằng sh (sử dụng chức năng menu Edit --> Replace ...)