Nhờ các anh chị giúp em xoá name rác đi (1 người xem)

[Dauthivan]

File của em nhiều name rác quá không xoá đi được, mong các anh chị giúp em với, em đang cần gấp phải báo cáo xếp trong ngày hôm nay. Em xin đa tạ

 

[dat_butmuc]

File của em nhiều name rác quá không xoá đi được, mong các anh chị giúp em với, em đang cần gấp phải báo cáo xếp trong ngày hôm nay. Em xin đa tạ

Bạn tìm mấy code trên diễn đàn hay cài đặt Excel 2007 trở đi -> dùng cho chủ động thì hay hơn.
File đính kèm đã xóa !

 

[nmhung49]

Mình đã xóa xong rồi đó mình thấy anh Ndu có code xóa name rác hay lắm đó mà mình quen rồi có gì bạn tìm trên diễn đàn tham khảo thêm nhen. Thanks

 

[SA_DQ]

To NMHung49: Bạn xóa luôn dùm bạn ấy sheet(000000) đang ẩn đi!; Giúp luôn thể đi mà.

 

[Phanhanhdai]

Mình đã xóa xong rồi đó mình thấy anh Ndu có code xóa name rác hay lắm đó mà mình quen rồi có gì bạn tìm trên diễn đàn tham khảo thêm nhen. Thanks

Bạn có thể cho mình cái xoá name rác của anh NDU được không? Mình đang rất cần, mình cảm ơn nhiều.

 

[ndu96081631]

To NMHung49: Bạn xóa luôn dùm bạn ấy sheet(000000) đang ẩn đi!; Giúp luôn thể đi mà.

Ngoài ra, cả file của dat_butmuc và nmhung49 đều để sót rất nhiều name ẩn (gần 200 thằng)

 

[dat_butmuc]

Ngoài ra, cả file của dat_butmuc và nmhung49 đều để sót rất nhiều name ẩn (gần 200 thằng)

Tôi chỉ tìm và xóa thêm được 75 thằng nữa (từ file tôi gửi lên) thôi bác ơi?
Còn lại thì chịu,... Xin Bác chia sẻ thêm cái code tối ưu nhất của Bác?

 

[ndu96081631]

Tôi chỉ tìm và xóa thêm được 75 thằng nữa (từ file tôi gửi lên) thôi bác ơi?
Còn lại thì chịu,... Xin Bác chia sẻ thêm cái code tối ưu nhất của Bác?

File của bạn tại bài số 2, khi tôi dùng code này:

Sub Test()
  MsgBox ThisWorkbook.Names.Count
End Sub

Nó ra kết quả = 160 đấy nhé