Không add tên sheet được theo list cho trước (1 người xem)

[Lê Duy Thương]

Xin các anh em xem dùm code tôi viết có bị sai chỗ nào mà sao kq không như ý muốn.
Vui lòng xem file

 

[Quang_Hải]

Xin các anh em xem dùm code tôi viết có bị sai chỗ nào mà sao kq không như ý muốn.
Vui lòng xem file

Bác Bill đã giành xài từ HISTORY rồi nên mình không dùng để tạo tên cho sheet được

 

[dhn46]

Code của anh sai tại vấn đề sau:

- Lỗi 1004: sheet trùng tên, sheet chưa được tạo đã select, Excel không cho đặt tên sheet là "HISTORY" trong khi Code anh có đoạn:

        If Err.Number > 0 Then
            ThisWorkbook.Worksheets.Add.Name = wshname
            Err.Number = 0
        End If

Anh có thể Test Err.Number cho các trường hợp để thấy rõ hơn

 

[Lê Duy Thương]

Code của anh sai tại vấn đề sau:

- Lỗi 1004: sheet trùng tên, sheet chưa được tạo đã select, Excel không cho đặt tên sheet là "HISTORY" trong khi Code anh có đoạn:

        If Err.Number > 0 Then
            ThisWorkbook.Worksheets.Add.Name = wshname
            Err.Number = 0
        End If

Anh có thể Test Err.Number cho các trường hợp để thấy rõ hơn

@dhn46-code tôi test các từ gì cũng được riêng history là không.
@quanghai1969-nếu bác bill dùng history vậy history nằm ở đâu mà tôi tìm không thấy.?

 

[Quang_Hải]

@dhn46-code tôi test các từ gì cũng được riêng history là không.
@quanghai1969-nếu bác bill dùng history vậy history nằm ở đâu mà tôi tìm không thấy.?

Khi mình sử dụng chức năng shareworkbook, excel sẽ tạo ra 1 sheet tên là HISTORY. Bác Bill dùng sheet này để lưu thông tin track change. Hình như là vậy đó