cách lấy tên sheet

3 Responses

1. hands says:

   26/02/2023 at 8:52 am

   anh ơi anh có thể giải thích qua hộ em được không?em xem nhưng chưa hiểu

   Công thức trên rất khó giãi thích nếu bạn chưa có kiến thức cơ bản!
   Vã lại công thức trên là lấy toàn bộ tên sheet có trong Workbook. Nếu bạn chỉ muốn lấy tên sheet hiện hành thì dùng công thức này để hiểu hơn:

   =MID(CELL("filename",$A$1),FIND("]",CELL("filename",$A$1),1)+1,200)

   Cái file getsheetname đó mình không hiểu gì cả, máy cũng báo lỗi, không biết do mình dùng Excel 2003 nên mới vậy.

   Còn công thức lấy tên sheet dùng hàm MID hay quá. Anh Tuấn ơi, có thể đứng ở sheet này nhưng lại lấy tên ở sheet trước nó 1 sheet được không? Đó là câu mình cần để tính công thức trong chủ đề mình nêu sáng nay https://www.giaiphapexcel.com/forum/showthread.php?p=84861&posted=1#post84861

   Yêu cầu của bạn ko thể dùng công thức này dc đâu! Phải dùng macro 4 thôi!
   Bạn chuẩn bị cho Excel như sau:
   1> Khởi động Excel
   2> Vào menu ToolsMacroSecurity và chọn vào mục "Medium", OK
   3> Đóng Excel lại
   4> Khởi động file của ndu và bấm Yes khi có cảnh báo

   Nếu em chỉ muốn lấy tên của sheet mình đang đứng thì dùng công thức nào vậy các bác?

   Quan trọng là bạn dùng nó để làm gì, bạn có thể gõ thử thế này : đứng tại sheet đó gõ công thức này vào 1 cell bất kỳ Cell("filename",A1) xem nó hiện gì nhé hoặc có thể dùng macro, tùy vào mục đích sử dụng bạn ạ/

   Reply
2. hands says:

   26/02/2023 at 8:53 am

   Chào mọi người, cho mình hỏi là mình muốn gọi tên workbook đang hiện hành thì có cách nào không? Mong nhận được sự giúp đỡ

   Đây là cách xem tên; Cách gọi tên thì mình . . .

   Sub TenWorkbook()
   MsgBox ThisWorkbook.Name
   End Sub

   Cảm ơn bác ChanhTQ. ý của em là viết 1 hàm trong VBA, rồi dùng hàm đó đặt vào 1 ô cell, viết hàm, vậy là khi tên workbook bị thay đổi thì cell vừa đặt công thức thay đổi theo.

   Tôi thử nhập
   =CELL("filename")

   cũng được kết quả như
   =Cell("filename",A1).

   À. Máy tôi cải E2003 và E2010. Có điều lạ là mở E2003 rồi mởi file *.xlsx cũng được, nhưng chỉ có số dòng là 65xxx dòng.

   Reply
3. hands says:

   26/02/2023 at 8:53 am

   =MID(CELL("filename",$A$1),FIND("]",CELL("filename",$A$1),1)+1,200)
   =Cell("filename")
   =Cell("filename",A1)

   Tôi đang dùng Office 2013, đã thử cách viết trên nhưng không cho kết quả nếu test trên file .xlsx
   Còn nếu Save dạng .xls thì lại cho kết quả đúng.

   Không hiểu nếu là file .xlsx thì làm cách nào để sử dụng được hàm Cell() nhỉ???

   Bạn phải save file vào nhé

   Ah. ra thế, quên mất cái vụ phải save file….thì mới có đường dẫn đầy đủ: hixxxxxxxxxxxxxx&&&%$R&&&%$R&&&%$R&&&%$R&&&%$R

   Reply