Могут быть случаи, когда вы разрабатываете рабочий лист, и вам нужно ссылаться на имя, которое вы присвоили рабочему листу. (Это имя отображается на вкладке рабочего листа в нижней части окна Excel.) К сожалению, Excel не содержит встроенных функций для этого. Однако вы можете создать такую ​​функцию, начав с использования функции рабочего листа CELL.

Если вы включите в ячейку следующее, Excel вернет полный путь к книге вместе с именем листа:

=CELL("filename")

Например, если вы ввели это в ячейку на листе Sheet3 книги MyBook, информация, возвращаемая Excel, может быть примерно такой: C: \ My Documents \ [MyBook.xls] Sheet3 (в зависимости, конечно, от диска и каталог, в котором хранится книга).

Чтобы вернуть только имя рабочего листа из этого значения, вы можете использовать в своей ячейке следующее:

=MID(CELL("filename"),(FIND("]",CELL("filename"))+1),50)

Это будет работать для любого имени листа длиной до 50 символов. (Если вы обычно используете другую длину, просто измените значение в выражении.)

Если вы предпочитаете использовать макро-ориентированный подход, вы можете создать полнофункциональный макрос, который выполнит эту работу. Следующий макрос SheetStuff вернет любой из трех отдельных элементов:

Function SheetStuff(numWanted As Byte) As String     Select Case numWanted         Case 1             SheetStuff = ActiveSheet.Name         Case 2             SheetStuff = ThisWorkbook.Name         Case 3             SheetStuff = ThisWorkbook.FullName         Case Else             SheetStuff = ActiveSheet.Name     End Select End Function

Чтобы использовать эту функцию макроса, просто поместите = SheetStuff (X) в ячейку на листе. Вы должны заменить X на 1, 2 или 3, в зависимости от того, какая информация вам нужна. Если вы используете 1, возвращается имя текущего рабочего листа. Если вы используете 2, то возвращается имя книги.

Наконец, 3 возвращает имя и полный путь к книге.

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (2019) применим к Microsoft Excel 97, 2000, 2002 и 2003.