Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Звуковое оповещение при добавлении нового ряда в таблицу - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Звуковое оповещение при добавлении нового ряда в таблицу (Формулы/Formulas)
Звуковое оповещение при добавлении нового ряда в таблицу
Руслан422 Дата: Воскресенье, 06.03.2016, 10:45 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 20% ±

Excel 2010
Здравствуйте уважаемые форумчане! Такая вот задачка. В режиме реального времени из торгового терминала импортируется данные в таблицу с зелёным заголовком (новые данные добавляются в конец таблицы), и как только в столбце сумма число достигает 8000, этот ряд добавляется в таблицу с желтым заголовком (так же снизу добавляется). Всё это уже автоматизировано и просчитывается. Но Задача в том чтобы при добавлении нового ряда из 1ой таблицы во 2ую прозвучал сигнал. То есть, звуковой сигнал отслеживал столбец сумма числа кратное 8000, но не все числа совсем кратные 8000. Например 2 ое число после 8000 может быть не ровно 16000, а 15995 или 16078 и так далее. Как это можно проще сделать?
К сообщению приложен файл: 2010.rar(55Kb)


Сообщение отредактировал Руслан422 - Воскресенье, 06.03.2016, 20:15
 
Ответить
СообщениеЗдравствуйте уважаемые форумчане! Такая вот задачка. В режиме реального времени из торгового терминала импортируется данные в таблицу с зелёным заголовком (новые данные добавляются в конец таблицы), и как только в столбце сумма число достигает 8000, этот ряд добавляется в таблицу с желтым заголовком (так же снизу добавляется). Всё это уже автоматизировано и просчитывается. Но Задача в том чтобы при добавлении нового ряда из 1ой таблицы во 2ую прозвучал сигнал. То есть, звуковой сигнал отслеживал столбец сумма числа кратное 8000, но не все числа совсем кратные 8000. Например 2 ое число после 8000 может быть не ровно 16000, а 15995 или 16078 и так далее. Как это можно проще сделать?

Автор - Руслан422
Дата добавления - 06.03.2016 в 10:45
StoTisteg Дата: Воскресенье, 06.03.2016, 20:08 | Сообщение № 2
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
А теперь раскройте секрет — как нужно определять "первость" значения? Когда что-то появляется в ячейке I8? При первом изменении в колонках I:M после открытия книги? Одним словом — первым после чего должен быть этот самый раз?


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
СообщениеА теперь раскройте секрет — как нужно определять "первость" значения? Когда что-то появляется в ячейке I8? При первом изменении в колонках I:M после открытия книги? Одним словом — первым после чего должен быть этот самый раз?

Автор - StoTisteg
Дата добавления - 06.03.2016 в 20:08
Руслан422 Дата: Воскресенье, 06.03.2016, 20:41 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 20% ±

Excel 2010
Да, как только что- то появляется в ячейке, нужен сигнал, а в ячейке появляется первое значение как только в 1ой таблице в столбце "сумма" образуется число кратное 8000 (но не все числа совсем кратные 8000. Например 2 ое число после 8000 может быть не ровно 16000, а 15995 или 16078 и так далее) . Но числа уже отбираются, нужно как только во 2ую таблицу добавится новый ряд- прозвучал сигнал. Но значения в последнем ряду постоянно меняются т.к постоянно в режиме реального времени поступают новые значения. Короче в каждом ряду, интервалах 0-8000, 8000-16000, прозвучал 1 раз сигнал.
 
Ответить
СообщениеДа, как только что- то появляется в ячейке, нужен сигнал, а в ячейке появляется первое значение как только в 1ой таблице в столбце "сумма" образуется число кратное 8000 (но не все числа совсем кратные 8000. Например 2 ое число после 8000 может быть не ровно 16000, а 15995 или 16078 и так далее) . Но числа уже отбираются, нужно как только во 2ую таблицу добавится новый ряд- прозвучал сигнал. Но значения в последнем ряду постоянно меняются т.к постоянно в режиме реального времени поступают новые значения. Короче в каждом ряду, интервалах 0-8000, 8000-16000, прозвучал 1 раз сигнал.

Автор - Руслан422
Дата добавления - 06.03.2016 в 20:41
StoTisteg Дата: Воскресенье, 06.03.2016, 20:58 | Сообщение № 4
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
Короче. Вот это
[vba]
Код
Private Sub Worksheet_Calculate()

    Application.EnableEvents = True
    Application.Speech.Speak "Hello"

End Sub
[/vba]
в модуле листа (открывается через правый клик на ярлычке — Исходный текст) даст Вам противное блеяние всякий раз, когда в жёлтой таблице будет появляться строчка. Противность блеяния определяет "Beeeeeeeeeeeeeeeeeeeeeeeeeeeep", сохранять как книгу с поддержкой макросов.


Проверь всё. ThisWorkbook.Save. On Error Resume Next.

Сообщение отредактировал StoTisteg - Воскресенье, 06.03.2016, 21:19
 
Ответить
СообщениеКороче. Вот это
[vba]
Код
Private Sub Worksheet_Calculate()

    Application.EnableEvents = True
    Application.Speech.Speak "Hello"

End Sub
[/vba]
в модуле листа (открывается через правый клик на ярлычке — Исходный текст) даст Вам противное блеяние всякий раз, когда в жёлтой таблице будет появляться строчка. Противность блеяния определяет "Beeeeeeeeeeeeeeeeeeeeeeeeeeeep", сохранять как книгу с поддержкой макросов.

Автор - StoTisteg
Дата добавления - 06.03.2016 в 20:58
Pelena Дата: Воскресенье, 06.03.2016, 21:02 | Сообщение № 5
Группа: Модераторы
Ранг: Местный житель
Сообщений: 11028
Репутация: 2462 ±
Замечаний: 0% ±

Excel 2010 & Mac Excel 2011
[offtop]
противное блеяние
[/offtop]


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
Сообщение[offtop]
противное блеяние
[/offtop]

Автор - Pelena
Дата добавления - 06.03.2016 в 21:02
StoTisteg Дата: Воскресенье, 06.03.2016, 21:04 | Сообщение № 6
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
[offtop]Ну а как ещё назвать этот вопль разъярённого барана? :D


Проверь всё. ThisWorkbook.Save. On Error Resume Next.
 
Ответить
Сообщение[offtop]Ну а как ещё назвать этот вопль разъярённого барана? :D

Автор - StoTisteg
Дата добавления - 06.03.2016 в 21:04
Serge_007 Дата: Воскресенье, 06.03.2016, 21:41 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 13122
Репутация: ±
Замечаний: ±

Excel 2010
Решение есть здесь: http://forum.msexcel.ru/index.php/topic,11327.0.html


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
СообщениеРешение есть здесь: http://forum.msexcel.ru/index.php/topic,11327.0.html

Автор - Serge_007
Дата добавления - 06.03.2016 в 21:41
Руслан422 Дата: Понедельник, 07.03.2016, 11:20 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 20% ±

Excel 2010
Спасибо! Всё работает!
 
Ответить
СообщениеСпасибо! Всё работает!

Автор - Руслан422
Дата добавления - 07.03.2016 в 11:20
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Звуковое оповещение при добавлении нового ряда в таблицу (Формулы/Formulas)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!