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

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

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

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

Сообщений: 401


« Стартовое сообщение: 21 Ноябрь 2018, 15:48 »

       Здравствуйте.
       Скажите, пожалуйста, как сделать следующее: в 10:00 я открываю эксель, запускаю макрос и с 10:25 каждые 20 минут включается звуковой сигнал так, чтобы я мог его сразу отключить?
       Вообще главная проблема - как указать на звуковой сигнал? Пробовал писать Beep, по аналогии с эксель, но тогда макрос вываливается в ошибку. Помогите, пожалуйста.
Записан
kompilainenn
Мастер
*****
Online Online

Сообщений: 2 520



« Ответ #1: 21 Ноябрь 2018, 16:38 »

а можно узнать цель бибикания каждые 20 минут именно средствами электронной таблицы?
Записан

Поддержать разработчиков LibreOffice можно тут, а наш форум вот тут
OOKapitan
Форумчанин
***
Offline Offline

Сообщений: 401


« Ответ #2: 21 Ноябрь 2018, 16:40 »

а можно узнать цель бибикания каждые 20 минут именно средствами электронной таблицы?
На телефоне приходится вручную каждый раз ставить сигнал на следующие 20 минут (такой уж у меня телефон). А мне нужно, чтобы раз поставил - и каждые 20 минут бибикает. Помогите, пожалуйста.
Записан
Bigor
Опытный пользователь
***
Offline Offline

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


« Ответ #3: 21 Ноябрь 2018, 17:39 »

Зачем бибикать это твои проблемы, нам интересно почему ты хочешь через электронные таблицы.

Во вложении батник.
Батники нельзя вкладывать, пришлось упаковывать . Пропиши его в планировщик и забудь про телефон Улыбка

ps хотя тебе еще и останов нужен... тогда поставь в планировщик плеер с песней Улыбка ее тормозить и будешь

* beep.zip (0.16 Кб - загружено 2 раз.)
« Последнее редактирование: 21 Ноябрь 2018, 17:51 от Bigor » Записан
OOKapitan
Форумчанин
***
Offline Offline

Сообщений: 401


« Ответ #4: 21 Ноябрь 2018, 21:23 »

нам интересно почему ты хочешь через электронные таблицы.
Потому, что в макросах я хоть что-то понимаю.
Скажите, пожалуйста, как все-таки через Calc звук воспроизводить?
Записан
rami
Гуру
*******
Offline Offline

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


MacBook Pro, LibreOffice и Apache OpenOffice


« Ответ #5: 21 Ноябрь 2018, 21:49 »

Пробовал писать Beep, по аналогии с эксель, но тогда макрос вываливается в ошибку.
Не должно вываливаться:
Код:
Sub Main
For i=0 To 10
wait 1000        'каждую секунду
beep             'производит системный звук (на Маке слышен щелчок)
Next
End Sub
Записан

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

Сообщений: 401


« Ответ #6: 22 Ноябрь 2018, 10:10 »

Пробовал писать Beep, по аналогии с эксель, но тогда макрос вываливается в ошибку.
Не должно вываливаться:
Код:
Sub Main
For i=0 To 10
wait 1000        'каждую секунду
beep             'производит системный звук (на Маке слышен щелчок)
Next
End Sub
1) Я пробовал без For - может поэтому вываливалось? Нет, видимо не поэтому, так как по-прежнему вываливается с ошибкой "Недостаточный размер стека" (подробнее на скрине (там, правда без For, но и с For - та же ошибка).
2) Как установить не каждую секунду, а каждые 20 минут?


* BEEP_ОШИБКА.jpg (259.35 Кб, 1366x768 - просмотрено 9 раз.)
« Последнее редактирование: 22 Ноябрь 2018, 10:19 от OOKapitan » Записан
Bigor
Опытный пользователь
***
Offline Offline

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


« Ответ #7: 22 Ноябрь 2018, 10:28 »

1. обзови процедуру по другому, например beep_1
2. еще раз напишу что не дело электронных таблиц таймером работать, но раз хочется, то считай сам
wait с параметром 1000 =задержке 1 сек, для 20 минут 1000*60*20
(и будет всего лишь один пик в 20 минут, а не трезвонить пока не выключишь)
« Последнее редактирование: 22 Ноябрь 2018, 10:33 от Bigor » Записан
OOKapitan
Форумчанин
***
Offline Offline

Сообщений: 401


« Ответ #8: 22 Ноябрь 2018, 11:41 »

1. обзови процедуру по другому, например beep_1
ИИИИИИХУУУУУУУУУУУУУ! Сработало!
Скажите, пожалуйста, если wait 1000 отвечает за количество секунд, через которое будет звонок, то для чего тогда в этом коде цикл For?
Записан
Bigor
Опытный пользователь
***
Offline Offline

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


« Ответ #9: 22 Ноябрь 2018, 11:46 »

для чего тогда в этом коде цикл For?
тебе ж надо каждые 20 минут, вот цикл и задает количество 20 минутных интервалов.
Записан
OOKapitan
Форумчанин
***
Offline Offline

Сообщений: 401


« Ответ #10: 22 Ноябрь 2018, 11:49 »

для чего тогда в этом коде цикл For?
вот цикл и задает количество 20 минутных интервалов.
Огромнейшее спасибо.
Только звук всё-равно воспроизводится 1 раз. Пардон - мой косяк!
« Последнее редактирование: 22 Ноябрь 2018, 11:52 от OOKapitan » Записан
Bigor
Опытный пользователь
***
Offline Offline

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


« Ответ #11: 22 Ноябрь 2018, 11:57 »

вообще-то макрос rami выдает 10 пиков с интервалом 1 сек.
мы его немного поломали, и получили 1 пик в 20 минут, можно оставить макрос как он был и приделать к нему еще один цикл - тогда получим по 10 пиков через 20 минут.
Но все равно это задача не для офиса, посмотри в сторону планировщика
Записан
rami
Гуру
*******
Offline Offline

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


MacBook Pro, LibreOffice и Apache OpenOffice


« Ответ #12: 22 Ноябрь 2018, 12:23 »

OOKapitan и Bigor какие звуки у вас издаёт beep? они хорошо слышны? У меня звук слышен довольно хорошо, но если бы я чем-то занимался в этот момент, я бы его пропустил. Предлагаю сделать так, чтобы каждые двадцать минут воспроизводился не одиночный звук, а "очередь" из, скажем, 10 звуков каждые 0,2 секунды (будет слышан "треск")
Записан

Bigor
Опытный пользователь
***
Offline Offline

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


« Ответ #13: 22 Ноябрь 2018, 12:30 »

Если громкость колонок на середину выкрутить, то слышно хорошо Улыбка Но музыку тогда не послушаешь
Записан
kompilainenn
Мастер
*****
Online Online

Сообщений: 2 520



« Ответ #14: 22 Ноябрь 2018, 12:33 »

Предлагаю сделать так, чтобы каждые двадцать минут воспроизводился не одиночный звук, а "очередь" из, скажем, 10 звуков каждые 0,2 секунды (будет слышан "треск")
сигнал SOS морзянкой, не стесняйтесь уже
Записан

Поддержать разработчиков LibreOffice можно тут, а наш форум вот тут
Страниц: 1 2 3   Вверх
  Печать  
 
Перейти в:  

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