Các bác xem giúp em lỗi này sửa như thế nào thì chạy được
- Thread starter nckhoa97
- Ngày gửi
Phuocam
Thành viên mới
- Tham gia
- 16/5/13
- Bài viết
- 4,723
- Được thích
- 7,738
Ngày tháng trong file trông giống "Ngày tháng" nhưng không phải "Ngày tháng thật"
Để kiểm tra: nhập =ISNUMBER(C2) => kết quả là FALSE
...
Sau khi sửa xong phần trên, sửa dòng:
ar = Sheet1.Range("A8:C" & Sheet1.Range("A" & Rows.Count).End(3).Row)
thành:
ar = Sheet1.Range("B8: D" & Sheet1.Range("A" & Rows.Count).End(3).Row).Value2
dòng:
For j = CLng(ar(i, 2)) To CLng(ar(i, 3))
thành:
For j = ar(i, 2) To ar(i, 3)
Để kiểm tra: nhập =ISNUMBER(C2) => kết quả là FALSE
...
Sau khi sửa xong phần trên, sửa dòng:
ar = Sheet1.Range("A8:C" & Sheet1.Range("A" & Rows.Count).End(3).Row)
thành:
ar = Sheet1.Range("B8: D" & Sheet1.Range("A" & Rows.Count).End(3).Row).Value2
dòng:
For j = CLng(ar(i, 2)) To CLng(ar(i, 3))
thành:
For j = ar(i, 2) To ar(i, 3)
Lần chỉnh sửa cuối:
Upvote
0
Bài viết mới nhất
- Question
- Question
- Đã giải quyết
- Question
- Đã giải quyết
- Question
