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

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

11 Август 2022, 20:22 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

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

Сообщений: 63


« Стартовое сообщение: 4 Ноябрь 2015, 13:01 »

День добрый! Помогите, нужен макрос, который бы запускал два других макроса исходя из присвоенных значений ячейки А1 ("ТЕКСТ1" или "ТЕКСТ2"). Например: если значение в ячейке А1-"ТЕКСТ1", следовательно выполняется Макрос1, а если "ТЕКСТ2", то Макрос2. Заранее спасибо!
Записан
JohnSUN
Капитана в тот день называли на "ты"
Гуру
*******
Offline Offline

Пол: Мужской
Расположение: Киев
Сообщений: 2 764


Помогаю людям и компьютерам понимать друг друга


WWW
« Ответ #1: 4 Ноябрь 2015, 13:15 »

Макрос1 и Макрос2 - это процедуры или функции?
Записан

Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне
rami
Гуру
*******
Offline Offline

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


iMac, LibreOffice и Apache OpenOffice


« Ответ #2: 4 Ноябрь 2015, 13:24 »

День добрый! Помогите, нужен макрос, который бы запускал два других макроса исходя из присвоенных значений ячейки А1 ("ТЕКСТ1" или "ТЕКСТ2"). Например: если значение в ячейке А1-"ТЕКСТ1", следовательно выполняется Макрос1, а если "ТЕКСТ2", то Макрос2. Заранее спасибо!
Код:
Sub abCase
s=ThisComponent.CurrentController.ActiveSheet.getCellRangeByName("A1").String
Select Case s
Case "ТЕКСТ1"
Macros1
Case "ТЕКСТ2"
Macros2
End Select
End Sub

Sub Macros1
End Sub

Sub Macros2
End Sub
Записан

dimmon777
Форумчанин
***
Offline Offline

Сообщений: 63


« Ответ #3: 5 Ноябрь 2015, 20:43 »

rami
Очередное спасибо, помогло!
Записан
Страниц: 1   Вверх
  Печать  
 
Перейти в:  

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