powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как создать эффект процесса выполнения в VBA?
17 сообщений из 17, страница 1 из 1
Как создать эффект процесса выполнения в VBA?
    #34332100
Belkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Написал на VBA рассылку писем на e-mail, но хотелось чтобы пользователь производящий рассылку(нажатие кнопки ОТПРАВИТЬ) видел что идет процес. В идеале это либо "бегунок" или сообщение отправленно 17 из 253, но можно просто сообщение(модальное) идет отправка. При этом чтобы он не мог выполнять никаких действий.
Подскажите как это сделать.

Заранее благодарен.
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34332415
vbModal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
имхо проще всего:
Код: plaintext
UserForm1.Show vbModal
а сам код, который отправляет вставить в форму...

Если по другому, то имхо надо задействовать API...
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34332553
Belkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vbModalимхо проще всего:
Код: plaintext
UserForm1.Show vbModal
а сам код, который отправляет вставить в форму...

Если по другому, то имхо надо задействовать API...
Нет, так не покатит для формы vbModal это параметр по умолчанию.
Поэтому в процессе отправки(если много писем) пользователь может подумать что ничего не происходит и закрыть эту форму.
Поэтому нужно "бегунок", что отправленно 37%...
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34332838
Проходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что мешает использовать
Tools > Additional Controls.
В списке выбрать Microsoft ProgressBar Control
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34332874
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть такой вот бесплатный контрол XP Style Progress Bar
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34332882
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А вот сам компонент, с примером использования
Можете в ActiveX контрол преобразовать если ест VB
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34332965
Belkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ПроходящийА что мешает использовать
Tools > Additional Controls.
В списке выбрать Microsoft ProgressBar Control
А как ей пользоваться для моего случая, какие у нее свойства и методы?
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34332974
Belkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
orunbekЕсть такой вот бесплатный контрол XP Style Progress Bar
А где ее взять и как использовать?
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34333257
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
orunbekА вот сам компонент, с примером использования
Можете в ActiveX контрол преобразовать если ест VB
Скачай архив
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34333269
Belkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
orunbek orunbekА вот сам компонент, с примером использования
Можете в ActiveX контрол преобразовать если ест VB
Скачай архив
Скачал, и что с ним делать...
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34337486
Belkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Все разобрался с ProgressBar, да и сделал чтобы пользователь не прервал отправку при закрытии формы.
В Access все просто, там для формы можно задать свойство, чтобы не было кнопки закрытия окна(крестик), а задать отдельную кнопку, для закрытия формы, которая становится не доступной при рассылке(отправке сообщений).
В Excel, такой свойства не нашел, поэтому пошел по другому пути:
Вынес в отдельный модуль процедуру по рассылке, там определил 2 глобальные переменные(колличество отправленных писем и всего писем). Далее если пользователь жмет закрыть окно, обрабатываю это событие и там сравниваю сколько отправленно писем и сколько всего. Если они не равны, то отменяю закрытие окна Cancel=1 и вызываю процедуру отправки, а там в свою очередь отправляю начиная с неотправленного e-mail.

Всем спасибо за помощь!

Андрей.
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34337985
AndreyMp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гы... А я бы просто ролик какой нить повесил коротенький, вроде майкросовтовского поиска, и дешевле бы вышло.
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34338973
Фотография Ser Artur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А может поделитесь опытом отправки писем из Excel
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34339128
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1. www.ostrosoft.com
OstroSMTP ActiveX-компонент для отправки почты

2. www.vbip.com
Отправка почты на уровне Winsock, тоже есть готовые примеры
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34339177
Фотография Ser Artur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Pomogaja drugim pomogaesh svoej dushe bytj schastlivym
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34339806
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ser ArturPomogaja drugim pomogaesh svoej dushe bytj schastlivym
ыыыы.... в смысле ;)
...
Рейтинг: 0 / 0
Как создать эффект процесса выполнения в VBA?
    #34339942
Belkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ser ArturА может поделитесь опытом отправки писем из Excel
Посмотри здесь .
Особо мне понравилоси это , но обрати внимание на библиотеку CDO
А можно отправлять и через Microsoft Office Outlook, но это будет дольше и лишнии диалоги, смотри и пробуй.
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как создать эффект процесса выполнения в VBA?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]