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

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

18 Октябрь 2018, 01:48 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Вы можете задать вопрос по LibreOffice или Apache OpenOffice  без регистрации, используя форму
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1   Вниз
  Печать  
Автор Тема: макрос ссылка на диапазон  (Прочитано 985 раз)
0 Пользователей и 1 Гость смотрят эту тему.
lenchik_vla
Новичок
*
Offline Offline

Сообщений: 4


« Стартовое сообщение: 16 Октябрь 2017, 12:08 »

Доброго дня, прошу помощи в решении, необходимо написать макрос с ссылкой на диапазон ячеек.
К примеру мне необходимо в ячейки A1 диапазон ячеек на основании которого макрос выполняет действия копирует область.
Записан
rami
Гуру
*******
Offline Offline

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


MacBook Pro, LibreOffice и Apache OpenOffice


« Ответ #1: 16 Октябрь 2017, 12:45 »

Доброго дня, прошу помощи в решении, необходимо написать макрос с ссылкой на диапазон ячеек.
К примеру мне необходимо в ячейки A1 диапазон ячеек на основании которого макрос выполняет действия копирует область.
А не поясните откуда что брать и куда тащить Непонимающий
Записан

lenchik_vla
Новичок
*
Offline Offline

Сообщений: 4


« Ответ #2: 16 Октябрь 2017, 12:55 »

Вложил таблицу, вот только нужно чтобы выделение диапазона было по адресу из А1.

* 12.ods (9.08 Кб - загружено 9 раз.)
Записан
rami
Гуру
*******
Offline Offline

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


MacBook Pro, LibreOffice и Apache OpenOffice


« Ответ #3: 16 Октябрь 2017, 13:20 »

Назначьте макрос на кнопку:
Код:
Sub Main
Dim oSheet, s$
oSheet=ThisComponent.Sheets(0)
s=oSheet.getCellRangeByName("A1").String
ThisComponent.CurrentController.Select(oSheet.getCellRangeByName(s))
End Sub
Записан

lenchik_vla
Новичок
*
Offline Offline

Сообщений: 4


« Ответ #4: 16 Октябрь 2017, 14:02 »

Благодарю.  Всё хорошо , Возможно ли реализовать без выделения при защищенном листе, простым языком чтобы вычисления формул стали числами.
Записан
rami
Гуру
*******
Offline Offline

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


MacBook Pro, LibreOffice и Apache OpenOffice


« Ответ #5: 16 Октябрь 2017, 15:37 »

Возможно ли реализовать без выделения при защищенном листе, простым языком чтобы вычисления формул стали числами.
Можно, если снять защиту:
Код:
Sub Main1
Dim oSheet, s$, oRange
oSheet=ThisComponent.Sheets(0)
s=oSheet.getCellRangeByName("A1").String
oRange=oSheet.getCellRangeByName(s)
oSheet.unprotect("")   'в квычках записать пароль (если нужен)
oRange.setDataArray(oRange.DataArray)
oSheet.protect("")     'в квычках записать пароль (если нужен)
End Sub
Записан

lenchik_vla
Новичок
*
Offline Offline

Сообщений: 4


« Ответ #6: 19 Октябрь 2017, 14:39 »

Большое спасибо! Подмигивающий
Записан
Страниц: 1   Вверх
  Печать  
 
Перейти в:  

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