Vũ Thắng Duy Khoa
Vũ Thắng Duy Khoa
Thảo luận 3 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 152 lượt xem

nhờ tư vấn giúp em code nếu em muốn viết code copy tạo và tự động đặt

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 

Thảo luận 3 câu trả lời
Lượt xem 152 lượt xem
Vỗ tay vỗ tay
Vũ Thắng Duy Khoa 08:09 - Sep 26, 2021

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
Vỗ tay vỗ tay
Vũ Thắng Duy Khoa 14:09 - Sep 27, 2021
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
Vỗ tay vỗ tay
Vũ Thắng Duy Khoa 16:09 - Sep 27, 2021

Chào bạn phần này sẽ phải có code xác định thứ tự tuần bạn nhé.

Vỗ tay vỗ tay
Câu hỏi liên quan
© 2020 - Bản quyền của Công Ty Cổ Phần Công Nghệ Giáo Dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông