Bảng tính tên Excel VBA
Trong VBA, để đặt tên một trang tính không cần bất kỳ kỹ năng đặc biệt nào. Chúng tôi chỉ cần tham chiếu tên trang tính mà chúng tôi đang thay đổi bằng cách nhập tên trang tính hiện có. Ví dụ: nếu chúng ta muốn thay đổi trang tính có tên “Bán hàng” thì chúng ta cần gọi trang tính theo tên của nó bằng cách sử dụng đối tượng Worksheet.
Bảng tính (“Bán hàng”)
Sau khi đề cập đến tên trang tính, chúng ta cần chọn thuộc tính “Tên” để thay đổi tên trang tính.
Bảng tính (“Bán hàng”). Tên
Bây giờ chúng ta cần đặt thuộc tính Name thành tên theo ý muốn của chúng ta. Giả sử bạn muốn thay đổi “Bán hàng” thành “Bảng bán hàng”, sau đó đặt dấu bằng sau thuộc tính “NAME” và nhập tên mới trong dấu ngoặc kép.
Bảng tính (“Bán hàng”). Name = “Bảng bán hàng”
Như vậy, chúng ta có thể thay đổi tên trang tính bằng thuộc tính Name.
Ví dụ để đặt tên bảng tính bằng VBA
Ví dụ 1
Thay đổi hoặc đổi tên trang tính bằng cách sử dụng các biến.
Ví dụ, hãy xem mã mẫu bên dưới.
Mã:
Sub Name_Example1 () Dim Ws As Worksheet Set Ws = Worksheets ("Sales") Ws.Name = "Sales Sheet" End Sub
Ở phần trên, tôi đã khai báo biến là Worksheet.
Dim Ws As Worksheet
Tiếp theo, tôi đã đặt tham chiếu cho biến là “Bán hàng” bằng cách sử dụng đối tượng worksheet.
Đặt Ws = Worksheets ("Bán hàng")
Bây giờ, biến “Ws” giữ tham chiếu của trang tính “Bán hàng”.
Bây giờ bằng cách sử dụng biến “Ws”, tôi đã đổi tên trang tính thành “Bảng bán hàng”.
Mã này sẽ thay đổi tên "Bán hàng" thành "Bảng Bán hàng".
Lưu ý quan trọng cần nhớ
Chúng ta vừa xem cách đổi tên bảng tính excel từ tên này sang tên khác. Tuy nhiên, nếu chúng tôi chạy lại mã, chúng tôi sẽ gặp lỗi Chỉ số Ngoài phạm vi.
Một trong những chìa khóa để trở thành chuyên gia về Macro VBA là xử lý lỗi. Trước khi xử lý lỗi, chúng ta cần biết tại sao lại gặp lỗi này.
Lý do tại sao chúng tôi gặp lỗi này bởi vì, trong chính bước trước đó, chúng tôi đã thay đổi trang tính có tên “Bán hàng” thành “Bảng bán hàng”.
Chúng tôi không có bất kỳ trang tính nào có tên là “Bán hàng”, chúng tôi sẽ nhận được chỉ số phụ này nằm ngoài phạm vi lỗi.
Ví dụ số 2
Lấy tất cả các tên trang tính trong Trang tính đơn .
Giả sử bạn có nhiều trang tính trong sổ làm việc của mình và bạn muốn lấy tên của tất cả các trang tính này trong bất kỳ trang tính nào. Điều này có thể được thực hiện bằng cách sử dụng mã hóa VBA.
Ví dụ, hãy nhìn vào hình ảnh dưới đây.
Chúng tôi có rất nhiều tờ ở đây.
Ngoài tất cả các trang tính này, chúng ta cần tên của mỗi trang tính trong trang tính được gọi là “Bảng chỉ mục”. Tôi đã viết đoạn mã dưới đây cho bạn.
Mã:
Sub All_Sheet_Names () Dim Ws As Worksheet Dim LR Bao lâu cho mỗi W trong ActiveWorkbook.Worksheets LR = Worksheets ("Index Sheet"). Cells (Rows.Count, 1) .End (xlUp) .Row + 1 'LR này có thể thay thế để tìm hàng được sử dụng cuối cùng Các ô (LR, 1). Chọn ActiveCell.Value = Ws.Name Next Ws End Sub
Bây giờ sao chép mã này vào mô-đun của bạn.
Bây giờ hãy chạy mã bằng cách đặt tên bất kỳ trang tính nào là “Trang chỉ mục”. Mã này sẽ cung cấp cho tất cả các tên trang tính trong “Trang chỉ mục”.
Như thế này, bằng cách sử dụng thuộc tính “NAME” của trang tính trong VBA, chúng ta có thể tìm hiểu tên của trang tính. Chúng tôi có thể đổi tên, giải nén và chúng tôi có thể chọn trang tính cụ thể và làm nhiều việc khác có thể được thực hiện bằng cách sử dụng thuộc tính “Name”.
Những điều cần ghi nhớ
- NAME trong VBA là tài sản.
- Sử dụng tên này, chúng ta có thể đổi tên trang tính và cũng có thể trích xuất tên trang tính.
- Chúng tôi có thể thay đổi bất kỳ tên nào của trang tính trong sổ làm việc được chỉ định nếu bạn đang tham chiếu đến các sổ làm việc khác với sổ làm việc được viết mã.
- Nếu tên trang tính không khớp, chúng tôi sẽ nhận được chỉ số phụ nằm ngoài phạm vi.
