Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

16 Июнь 2019, 15:56 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Здесь можно поблагодарить участников форума Улыбка
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: « 1 2   Вниз
  Печать  
Автор Тема: Объединение таблиц на нескольких листах в одну на новом листе.  (Прочитано 13327 раз)
0 Пользователей и 1 Гость смотрят эту тему.
mikekaganski
Мастер
*****
Online Online

Пол: Мужской
Расположение: Хабаровск -> Москва
Сообщений: 1 405


« Ответ #40520: 16 Февраль 2017, 11:33 »

Создайте у себя макрос в My Macros->Standard (или в Мои макросы->Standard):

Код:
Function SheetName(num)
  if (num > 0 AND num <= ThisComponent.Sheets.Count) Then
    SheetName = ThisComponent.Sheets.ElementNames(num-1)
  else
    SheetName = "ERROR!"
  end if
End Function

И пользуйтесь как встроенной функцией Calc. Правда, работать будет только на Вашей машине. Зато нет макроса в файле, нет предупреждений.
Если надо, запишите его не в общую библиотеку макросов, а в документ.
Записан

С уважением,
Михаил Каганский
Страниц: « 1 2   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines Valid XHTML 1.0! Valid CSS!