Làm sao để không hiện hộp thoại Name khi copy Sheet

Liên hệ QC

vanle33

Thành viên gạo cội
Tham gia
30/10/08
Bài viết
5,913
Được thích
3,979
Giới tính
Nam
Khi tôi copy 1 sheet (ví dụ "TH gia tri") sang 1 file khác thì hiện ra hộp thoại như hình vẽ
Các anh chị và các bạn có thể cho biết cách nào để không phải nhấn Yes quá nhiều lần thì mới copy xong sheet đó. (nghĩa là không hiện ra hộp thoại đó mà vẫn copy được sheet đó)

Mặc dù tôi biết đó là name rác nhưng có những name không phải rác và không thể xóa được.
Thank!
 

File đính kèm

  • Dap tran GD2 den 240,5 (ok).rar
    486.7 KB · Đọc: 20
File này đã xử lý name rác và links. Hy vọng đúng ý bạn!
 
Khi tôi copy 1 sheet (ví dụ "TH gia tri") sang 1 file khác thì hiện ra hộp thoại như hình vẽ
Các anh chị và các bạn có thể cho biết cách nào để không phải nhấn Yes quá nhiều lần thì mới copy xong sheet đó. (nghĩa là không hiện ra hộp thoại đó mà vẫn copy được sheet đó)

Mặc dù tôi biết đó là name rác nhưng có những name không phải rác và không thể xóa được.
Thank!

Trong file bạn, chẳng có name nào gọi là cần dùng cả ---> Toàn bộ đều là rác. Thôi thì xóa hết chúng đi là xong chuyện
Ngoài ra file này còn bị thêm tình trạng Style rác ---> Cũng cần phải làm sạch
Sau khi xóa hết, dung lượng sẽ giảm được gần 1 nửa
--------------
File này đã xử lý name rác và links. Hy vọng đúng ý bạn!
File này vẫn còn style rác nhé
 
Bạn thử dùng cái này xóa name rác và style rác xem thế nào
 
Trong file bạn, chẳng có name nào gọi là cần dùng cả ---> Toàn bộ đều là rác. Thôi thì xóa hết chúng đi là xong chuyện
Ngoài ra file này còn bị thêm tình trạng Style rác ---> Cũng cần phải làm sạch
Sau khi xóa hết, dung lượng sẽ giảm được gần 1 nửa
--------------

File này vẫn còn style rác nhé
Bạn dùng cách nào để tìm và xóa Name rác, Style rác vậy ?
 

File đính kèm

  • DeleteStyles.xlsm
    21 KB · Đọc: 6
  • DeleteName.xlsm
    21.3 KB · Đọc: 6
  • Cách xóa style rác và name rác.doc
    23 KB · Đọc: 8
View attachment 288839
Không tương thích với Excel 64bit rồi bạn
#If VBA7 Then Private Declare PtrSafe Function ShellExecuteEx Lib "shell32.dll" (ByRef lpExecInfo As SHELLEXECUTEINFO) As LongPtr Private Declare PtrSafe Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As LongPtr, ByVal dwMilliseconds As Long) As Long Private Declare PtrSafe Function CloseHandle Lib "kernel32" (ByVal hObject As LongPtr) As Long #Else Private Declare Function ShellExecuteEx Lib "shell32.dll" (ByRef lpExecInfo As SHELLEXECUTEINFO) As Long Private Declare Function WaitForSingleObject Lib "kernel32.dll" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long Private Declare Function CloseHandle Lib "kernel32.dll" (ByVal hObject As Long) As Long #End If
Bạn sửa như thế này xem có được không?
Mình thấy Code trên có nội dung Replace Name bạn cẩn thận với việc phải thay tên mới xóa được Name, một số trường hợp sẽ bị lỗi
 
Web KT

Bài viết mới nhất

Back
Top Bottom