Xin hỏi về Lỗi Path Not Found (1 người xem)

[GCQ]

Khi dùng VBA để copy Sheet, Lệnh là:
Sheets("AB1").Copy After:=Sheets(Sheets.Count)
Thì xuất hiện lỗi : Path not found.
Xin mọi người chỉ dẫn cách xử lý. Cảm ơn nhiều.

 

[Hoàng Tuấn 868]

Khi dùng VBA để copy Sheet, Lệnh là:
Sheets("AB1").Copy After:=Sheets(Sheets.Count)
Thì xuất hiện lỗi : Path not found.
Xin mọi người chỉ dẫn cách xử lý. Cảm ơn nhiều.

Kiểm tra tên sheet của bạn có bị thừa dấu cách không, ngoài ra nên thêm các chỗ Sheets thành ThisWorkbook.Sheets cho cẩn thận.
Nếu vẫn chưa được thì bạn gửi file lên để xem cụ thể hơn

 

[ptm0412]

Có thể do 1 file khác đang mở và đang active (là file hiện hành), file này không có sheet AB1.

 

[GCQ]

Kiểm tra tên sheet của bạn có bị thừa dấu cách không, ngoài ra nên thêm các chỗ Sheets thành ThisWorkbook.Sheets cho cẩn thận.
Nếu vẫn chưa được thì bạn gửi file lên để xem cụ thể hơn

Bạn thử nhân bản sheet từ 1 sheet có sẵn. Trước đó bạn mở 1 file excel nào đó thì sẽ thấy hiện tượng báo lỗi như tôi đã trình bầy.

 

[Hoàng Tuấn 868]

Bạn thử nhân bản sheet từ 1 sheet có sẵn. Trước đó bạn mở 1 file excel nào đó thì sẽ thấy hiện tượng báo lỗi như tôi đã trình bầy.

Bạn đã sửa lại code theo bài #2 và chạy thử chưa?

 

[Nguyễn Duy Tuân]

Kiểm tra tên sheet của bạn có bị thừa dấu cách không, ngoài ra nên thêm các chỗ Sheets thành ThisWorkbook.Sheets cho cẩn thận.
Nếu vẫn chưa được thì bạn gửi file lên để xem cụ thể hơn

Chỉ chỉ có đoạn code này thì không xuất hiện nội dùng báo lỗi mà bạn cũng cấp, lỗi đó thương xuất hiện ở các lệnh liên quan đên đọc, mở tập tin, cụ thể là đường dẫn tập tin sai. Bạn gửi đầy đủ code lên sẽ thấy chính xác lý do.

 

[GCQ]

Bạn đã sửa lại code theo bài #2 và chạy thử chưa?

Vẫn báo lỗi vậy khi thay code là: ThisWorkbook.Sheets("AK1").Copy After:=Sheets(Sheets.Count)
Hiện tượng như sau:
1. Nếu chỉ chạy riêng file Excel để nhân bản Sheet thì sẽ không báo lỗi.
2. Nhưng nếu mở thêm 1 file excel khác nữa (kể cả là sau đó có đóng lại) thì sẽ báo lỗi. Nếu file excel mở thêm này để ở Destop thì lại không lỗi. Còn nếu để ở 1 nơi có đường dẫn dài hoặc tên đường dẫn phức tạp chút là lại báo lỗi.

 

[Hoàng Tuấn 868]

Vẫn báo lỗi vậy khi thay code là: ThisWorkbook.Sheets("AK1").Copy After:=Sheets(Sheets.Count)
Hiện tượng như sau:
1. Nếu chỉ chạy riêng file Excel để nhân bản Sheet thì sẽ không báo lỗi.
2. Nhưng nếu mở thêm 1 file excel khác nữa (kể cả là sau đó có đóng lại) thì sẽ báo lỗi. Nếu file excel mở thêm này để ở Destop thì lại không lỗi. Còn nếu để ở 1 nơi có đường dẫn dài hoặc tên đường dẫn phức tạp chút là lại báo lỗi.

Ở bài #2 mình có nêu là những chỗ nào có chữ Sheets thì bạn thêm thành ThisWorkbook.Sheets
Bạn thử thay lại hết xem sao.