Trang web hiển thị tốt nhất trên các trình duyệt mới và được bật Javascript.

Sub test_namesheet() Sub test_namesheet() Dim i As Integer For i = 1 To

TrinhXuanTuyen

Sub test_namesheet()
Dim i As Integer
For i = 1 To Sheets(Sheets.Count)
ThisWorkbook.Sheets(i).Activate
ActiveSheet.Name = "sheet" & i
Next i
End Sub

mình làm code thây đổi tên sheet mà sao k được ạ

TrinhXuanTuyen

Son Nhat Doan help với

SonDoan

Sub test()
For i = 1 To Worksheets.Count
Sheets(i).Name = "sheet" & i
Next i
End Sub

SonDoan

Lỗi nặng ở For i = 1 to Sheets ..... I là Integer, còn Sheets là Application.Workbook.Worksheet mà

-FULL BỘ TÀI LIỆU SINH TRẮC VÂN TAY CỰC HIẾM- Em nhờ mọi người 1 ca khó với :( Em phải gửi Phiếu lương hàng tháng cho mọi Chia sẻ bộ đôi ebook " Thôi miên bằng ngôn từ" và " Tử huyệt cảm xúc" Có bạn nào có link down Schweser note CFA level 1 2018 cho mình xin với ạ. File Excel của em tăng đột ngột từ 2.1Mb lên 7.2Mb nhưng dữ liệu không có Hưỡng dẫn cách tra cứu mã số thuế online qua mạng HỌC KẾ TOÁN TRƯỞNG CẤP CHỨNG CHỈ CỦA BỘ TÀI CHÍNH Đào tạo chứng chỉ KẾ TOÁN VIÊN Trường Bồi dưỡng Cán bộ Tài chính-BTC ĐÀO TẠO KẾ TOÁN TRƯỞNG HÀNH CHÍNH SỰ NGHIỆP BỘ TÀI CHÍNH TPHCM - Ở đây có ai nhận làm thuê bài tập excel ở trường không ạ, giúp mình vs ?? Xem thêm