Nhân bản nội dung và định dạng một sheet thành nhiều sheet không được. (3 người xem)

[Mimosa_Do]

Em chào các anh/chị,
Vấn đề gặp phải: Khi em nhân bản một sheet thì nó hiện ra thông báo không cho nhân bản như hình sau:


Mong các anh/chị chỉ dùm em cách khắc phục tình trạng trên.

 

[Hai Lúa Miền Tây]

Em chào các anh/chị,
Vấn đề gặp phải: Khi em nhân bản một sheet thì nó hiện ra thông báo không cho nhân bản như hình sau:
View attachment 244215

Mong các anh/chị chỉ dùm em cách khắc phục tình trạng trên.

Rất nhiều name rác, bạn nên xóa hết và copy bình thường nhé.

 

[thnghiachau]

Rất nhiều name rác, bạn nên xóa hết và copy bình thường nhé.

Thầy ơi, em không biết làm sao kiểm tra được mấy cái "name rác" này...
Thầy chỉ em cách làm với.
Lần đầu e gặp cái file kiều này ...
Cám ơn Thầy

Bài đã được tự động gộp: 27/8/20

Thầy ơi, em không biết làm sao kiểm tra được mấy cái "name rác" này...
Thầy chỉ em cách làm với.
Lần đầu e gặp cái file kiều này ...
Cám ơn Thầy

Ahhhhh...
Xin lỗi thầy em đã hiểu rồi.
Name này là "Define Name" ...
hic... em tường là Sheet....
Cám ơn thầy

 

[Hai Lúa Miền Tây]

Thầy ơi, em không biết làm sao kiểm tra được mấy cái "name rác" này...
Thầy chỉ em cách làm với.
Lần đầu e gặp cái file kiều này ...
Cám ơn Thầy

Bài đã được tự động gộp: 27/8/20

Ahhhhh...
Xin lỗi thầy em đã hiểu rồi.
Name này là "Define Name" ...
hic... em tường là Sheet....
Cám ơn thầy

Lưu ý file này còn có nhiều name ẩn. Phải xóa hết các name ẩn nữa mới thành công.

 

[Mimosa_Do]

Rất nhiều name rác, bạn nên xóa hết và copy bình thường nhé.
[/QUOTE
Mình đã nhân bản được rồi. Cám ơn bạn Hai Lúa Miền Tây nhiều nhé.

 

[be_09]

Em chào các anh/chị,
Vấn đề gặp phải: Khi em nhân bản một sheet thì nó hiện ra thông báo không cho nhân bản như hình sau:
Mong các anh/chị chỉ dùm em cách khắc phục tình trạng trên.

Do bạn lười biếng chỉ Copy và Paste nên nó mang sang nhiều Name rác và Style rác.
May mắn là chưa bị tăng dung lượng bất thường.

 

[thnghiachau]

Lưu ý file này còn có nhiều name ẩn. Phải xóa hết các name ẩn nữa mới thành công.

Dạ,
Em dùng code tạm thế này để xóa hết các Name

Sub Xoa_Ten_Rac()
Dim oTen As Name
    For Each oTen In Application.ActiveWorkbook.Names
        oTen.Delete
    Next
End Sub

Nhưng không biết là cái Name ẨN có xóa hết không nữa?
Vào trong Name Manager thì không thấy còn cái name nào hết...

 

[Hai Lúa Miền Tây]

Dạ,
Em dùng code tạm thế này để xóa hết các Name

Sub Xoa_Ten_Rac()
Dim oTen As Name
    For Each oTen In Application.ActiveWorkbook.Names
        oTen.Delete
    Next
End Sub

Nhưng không biết là cái Name ẨN có xóa hết không nữa?
Vào trong Name Manager thì không thấy còn cái name nào hết...

Vậy hãy thử copy sheet xem sao. Có thể nó còn name ẩn chưa xóa.

Hiện name ẩn bằng code sau:

Sub HienName()
  Dim nName As Name
  For Each nName In ThisWorkbook.Names
    nName.Visible = True
  Next
End Sub

 

[thnghiachau]

Vậy hãy thử copy sheet xem sao. Có thể nó còn name ẩn chưa xóa.

Hiện name ẩn bằng code sau:

Sub HienName()
  Dim nName As Name
  For Each nName In ThisWorkbook.Names
    nName.Visible = True
  Next
End Sub

Dạ, có lẽ xóa luôn Name ẩn hoặc không có Name ẩn vì khi dùng sub HienName() thì không có name nào thêm và em copy sheet được luôn rồi ạ.
Cám ơn Thầy.

 

[be_09]

Dạ,
Em dùng code tạm thế này để xóa hết các Name

Sub Xoa_Ten_Rac()
Dim oTen As Name
    For Each oTen In Application.ActiveWorkbook.Names
        oTen.Delete
    Next
End Sub

Nhưng không biết là cái Name ẨN có xóa hết không nữa?
Vào trong Name Manager thì không thấy còn cái name nào hết...

Code bài này nó xóa tất cả các Name kể cả Name ẩn.
Thực tế File bài 1 có rất nhiều Name ẩn, trong đó có Name Link đến File khác.

 

[Mimosa_Do]

Code bài này nó xóa tất cả các Name kể cả Name ẩn.
Thực tế File bài 1 có rất nhiều Name ẩn, trong đó có Name Link đến File khác.

View attachment 244263
View attachment 244265

Be09 cho mình hỏi lý do vì sao có những Name rách này bạn có biết không? Vì mình chỉ nhấn nút Ctrl + N từ một file excel chứ không có vào Define Name.

 

[be_09]

Be09 cho mình hỏi lý do vì sao có những Name rách này bạn có biết không? Vì mình chỉ nhấn nút Ctrl + N từ một file excel chứ không có vào Define Name.

Do lười biếng chỉ Copy dữ liệu từ File khác và Paste nên nó mang sang nhiều Name rác và Style rác không mong muốn.
Để phòng tránh thì Copy và Paste > Value.

 

[Nhattanktnn]

Code bài này nó xóa tất cả các Name kể cả Name ẩn.
Thực tế File bài 1 có rất nhiều Name ẩn, trong đó có Name Link đến File khác.

View attachment 244263
View attachment 244265

Trước em có một file show hết name ẩn này và xóa đi rồi, copy sheet một vài lần thì không hiểu sao nó lại tự sinh ra name rác, không biết có phải do virus hay không

 

[be_09]

Trước em có một file show hết name ẩn này và xóa đi rồi, copy sheet một vài lần thì không hiểu sao nó lại tự sinh ra name rác, không biết có phải do virus hay không

File chứa Virus chỉ cần mở File là đã bị rồi chứ đâu cần Copy.
Để biết có xóa hết name ẩn hay không thì dùng code cho nó hiện ra hết, lúc đó khi chạy code xóa name ẩn thì mới biết được.

 

[Nhattanktnn]

File chứa Virus chỉ cần mở File là đã bị rồi chứ đâu cần Copy.
Để biết có xóa hết name ẩn hay không thì dùng code cho nó hiện ra hết, lúc đó khi chạy code xóa name ẩn thì mới biết được.

Thì em dùng code chạy vòng lặp của name rồi name.visible=true như mấy bác trên nói ấy, xóa sạch chỗ name đó rồi nhưng sau khi copy một vài sheet thì name rác lại tự sinh ra. mà cái này lâu rồi nên em không còn file đó để xem lại nữa

 

[Mimosa_Do]

Do lười biếng chỉ Copy dữ liệu từ File khác và Paste nên nó mang sang nhiều Name rác và Style rác không mong muốn.
Để phòng tránh thì Copy và Paste > Value.

Cám ơn be09