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

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

28 Сентябрь 2020, 22:26 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Здесь можно поблагодарить участников форума Улыбка
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1   Вниз
  Печать  
Автор Тема: подскажите аналог RefersToRange VBA ?  (Прочитано 295 раз)
0 Пользователей и 1 Гость смотрят эту тему.
Denis_Oleynikof
Участник
**
Offline Offline

Сообщений: 14


« Стартовое сообщение: 31 Август 2020, 11:14 »

Спасибо за ответы. Не стал открывать новую тему, может быть подскажите аналог RefersToRange VBA ?
Записан
sokol92
Форумчанин
***
Offline Offline

Пол: Мужской
Сообщений: 163


WWW
« Ответ #1: 31 Август 2020, 12:37 »

См. описание сервиса NamedRange, метод getReferredCells интерфейса XCellRangeReferrer (или свойство ReferredCells сервиса NamedRange).

Пример
Код:
Sub ShowNames
  Dim NamedRange
  On Error Resume Next  ' не выводим имена, не относящиеся к диапазонам (например, формульные выражения)
  For Each NamedRange In ThisComponent.NamedRanges
    Msgbox "Name: " & NamedRange.Name & "  RefersToRange: " & NamedRange.ReferredCells.AbsoluteName
  Next NamedRange
End Sub
« Последнее редактирование: 31 Август 2020, 13:02 от sokol92 » Записан

Владимир.
Страниц: 1   Вверх
  Печать  
 
Перейти в:  

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