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̀

Ai có add-in CRYSTAL BALL chạy được trên Excel 2013 (bản 64 bit) có thể cho Cả nhà cho em hỏi đã ai in hóa đơn điện tử của Maersk chưa ạ? Chỉ em cách in Mn ơi, có nhóm nào về kế toán ở zalo thì add e vs ạ các anh chị cho em hỏi Cách replace xuống dòng zxczxczxczxc § Nội Quy § § Nội Quy § --- §0 - Trước khi đọc nội quy: quy định đưa ra là Có hàm nào làm cho chữ đậm hoặc nghiêng không nhi? Cách để tính nhanh khi nhảy lung tung tính tiền ăn mỗi bữa lỗi hàm trong wps excel Xem thêm