Hàm lấy tên các sheet trong Workbook không cần dùng VBA (4 người xem)

[lethanh03]

Mọi người giúp em hàm lấy tên tất cả các sheet trong workbook nhưng không cần dùng VBA với ạ....

 

[be_09]

Mọi người giúp em hàm lấy tên tất cả các sheet trong workbook nhưng không cần dùng VBA với ạ....

Góp ý cho bạn:

1/ Tiêu đề và nội dung bài viết không được viết HOA, đọc lại nội quy tại khoản 3, mục II Quy định về Hình thức của bài viết (để hiểu rỏ hơn).
2/ Trong tiêu đề bạn không nên dùng từ Help me, vì vi phạm nội quy tại khoản 3, mục III Quy định về tiêu đề bài viết.
3/ Trong File có sử dụng Name Range là:

SheetName =SUBSTITUTE(GET.WORKBOOK(1),"["&GET.WORKBOOK(16)&"]","")

Sau khi gán hàm xong và Lưu File thì SheetName sẽ biến mất.

A2 Lấy tên sheet =IFERROR(INDEX(SheetName,ROWS($A$2:$A2)),"")

B2 Tạo Link =HYPERLINK("#'"&$A2&"'!A2"," "&$A2)

 

[huonglien1901]

Mọi người giúp em hàm lấy tên tất cả các sheet trong workbook nhưng không cần dùng VBA với ạ....

Sử dụng Macro 4:
Vào DATA-NAME MANAGER:
Đặt tên: Namesheet: =REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),"")
Tại ô A2: Bạn gõ công thức này vào:

=INDEX(namesheet,ROW(A1))

Rồi fill xuống! Xem thành quả.

 

[babyheomoi]

File mình tự học và mò trên 4rum GPE nè bạn, giống anh Be09 ấy!

Bước 1    Tạo name                     
    Wb        =GET.WORKBOOK(16+NOW()*0)           
    Sh_name        =GET.WORKBOOK(1+NOW()*0)           
    num        =GET.WORKBOOK(4+NOW()*0)           
    all_Wb        =SUBSTITUTE(ShN;"["&Wb&"]";"")           
Bước 2                       
    Ô B4 lập công thức        =IF(ROW(2:2)>num;"";INDEX(all_Wb;1;ROW(2:2)))           
    Fill xuống                   
Bước 3    Thêm Hyperlink        =HYPERLINK("["&Wb&"]'"&IF(ROW(2:2)>num;"";INDEX(all_Wb;1;ROW(2:2)))&"'!A1";IF(ROW(2:2)>num;"";INDEX(all_Wb;1;ROW(2:2))))

 

[tam888]

Góp ý cho bạn:

1/ Tiêu đề và nội dung bài viết không được viết HOA, đọc lại nội quy tại khoản 3, mục II Quy định về Hình thức của bài viết (để hiểu rỏ hơn).
2/ Trong tiêu đề bạn không nên dùng từ Help me, vì vi phạm nội quy tại khoản 3, mục III Quy định về tiêu đề bài viết.
3/ Trong File có sử dụng Name Range là:

SheetName =SUBSTITUTE(GET.WORKBOOK(1),"["&GET.WORKBOOK(16)&"]","")

Sau khi gán hàm xong và Lưu File thì SheetName sẽ biến mất.

A2 Lấy tên sheet =IFERROR(INDEX(SheetName,ROWS($A$2:$A2)),"")

Tiêu đề được VIẾT HOA (theo ban quản trị đã trả lời)
Bài này Tiêu đề có chữ HELP ME, bạn và những người khác còn trả lời?

 

[be_09]

Tiêu đề được VIẾT HOA (theo ban quản trị đã trả lời)
Bài này Tiêu đề có chữ HELP ME, bạn và những người khác còn trả lời?

Biết chủ Topic vi phạm nội quy nên tôi nhắc nhỡ để họ tự sửa lại Tiêu đề. Họ sửa hay không đó là quyền của họ, còn họ ngoan cố thì thiệt thòi thuộc về chủ Topic, lần sau gặp Nick này tôi chạy và không cần góp ý nữa.

 

[lethanh03]

Góp ý cho bạn:

1/ Tiêu đề và nội dung bài viết không được viết HOA, đọc lại nội quy tại khoản 3, mục II Quy định về Hình thức của bài viết (để hiểu rỏ hơn).
2/ Trong tiêu đề bạn không nên dùng từ Help me, vì vi phạm nội quy tại khoản 3, mục III Quy định về tiêu đề bài viết.
3/ Trong File có sử dụng Name Range là:

SheetName =SUBSTITUTE(GET.WORKBOOK(1),"["&GET.WORKBOOK(16)&"]","")

Sau khi gán hàm xong và Lưu File thì SheetName sẽ biến mất.

A2 Lấy tên sheet =IFERROR(INDEX(SheetName,ROWS($A$2:$A2)),"")

Cảm ơn anh, em sẽ rút kinh nghiệm lần sau ^^

 

[lethanh03]

Cảm ơn mọi người đã giúp, em lm đc rồi