nhờ thầy tư vấn giúp em code : nếu em muốn viết code copy , tạo và tự động đặt tên sheet mới lũy tiến thì như thế nào vậy thầy: ví dụ em muốn copy sheet 1 sang sheet mới và đặt tên sheet mới là "sheet 1"+1 là sheet 2.
Em cảm ơn thầy
Chào bạn bạn làm như sau là nhanh nhất
Option Explicit
Sub Doitenshet()
Sheets("Sheet1").Copy After:=Sheets(1)
'de chac chan doan nay len duyet vong lap de kiem tra ten
Sheets("Sheet1 (2)").Name = "a"
End Sub
Em cảm ơn thầy.
Nếu mình đặt tên dựa theo số tuần trên calendar thì đoạn code Sheets("Sheet1 (2)").Name = "a" sẽ như thế nào vậy thầy
Chào bạn phần này sẽ phải có code xác định thứ tự tuần bạn nhé.