Lấy tên sheet trong excel

Chia sẻ bởi:hands
★★★★★
Quảng cáo

chào các anh chị. Em xin hỏi cái này mình có thể lấy cái tên của sheet được không để gắn vào hàm HYPERLINK vì khi tên sheet thay đổi thì hàm nó tự đổi theo (xem file em đính kèm

Sub ThemNhieuSheet()
    Dim i As Long
    Dim ws As Worksheet
    Set ws = ActiveSheet
    With ws
        For i = 2 To .Range("A" & Rows.Count).End(3).Row
            On Error Resume Next
            Sheets.Add after:=Sheets(Sheets.Count)
            ActiveSheet.Name = .Cells(i, "A").Value
        Next i
    End With
End Sub

Bạn có thể dùng Code này, bạn muốn thêm bao nhiêu Sheet cũng được
Bạn xem File đính kèm

www.giaiphapexcel.com/diendan/threads/l%E1%BA%A5y-t%C3%AAn-sheet-trong-excel.51220/

Khóa học Power PI – Ứng dung trong Nhân sự
Khóa học SprinGO phù hợp

Khóa học Power PI – Ứng dung trong Nhân sự

TỔNG QUAN KHÓA HỌC: POWER BI CHO NGÀNH NHÂN SỰ Khóa học Power BI cho Nhân sự được thiết kế dành riêng cho các...

Xem khóa học
★★★★★ 5 ★ 1 👤 0 ▥ 0
Quảng cáo

Bạn nên đọc

Bình luận

Quảng cáo

Cũ vẫn chất

Xem thêm