|
|
|
% выполнения
|
|||
|---|---|---|---|
|
#18+
есть цикл For Next Как мне при во время выполнения вывести на экран Excel индикатор, показывающий % выполнения процедуры? у меня Application.ScreenUpdating=False до For стоит, если это важно... Спасибо! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2008, 13:39 |
|
||
|
% выполнения
|
|||
|---|---|---|---|
|
#18+
> Автор: PlanB > есть цикл For Next > Как мне при во время выполнения вывести на экран Excel индикатор, показывающий % выполнения процедуры? > у меня Application.ScreenUpdating=False до For стоит, если это важно... > Спасибо! Как вариант, заводишь форму с прогресбаром, перед началом цикла показываешь её, а в цикле ставишь: UserForm1.ProgressBar1.Value = UserForm1.ProgressBar1.Value + 1 UserForm1.ProgressBar1.Refresh() DoEvents По окончании цикла прячешь её -- С уважением Горбонос Игорь Леонидович Posted via ActualForum NNTP Server 1.4 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2008, 14:40 |
|
||
|
% выполнения
|
|||
|---|---|---|---|
|
#18+
Спасибо!!!! Прогу доделал, запустил :) На совещание сходить успел, пока выгружала данные, зато всё чётко :) Под это дело решил вывести % выполнения, чтобы люди не пугались... сейчас 30 мин, до этого руками, слышал, 4 дня народ ковырял... Вот она, сила автоматизации ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2008, 14:44 |
|
||
|
% выполнения
|
|||
|---|---|---|---|
|
#18+
> Автор: PlanB > сейчас 30 мин, до этого руками, слышал, 4 дня народ ковырял... Вот она, сила автоматизации Ага у меня тоже самое было, у особо "трудолюбивых" это и до недели доходило, а недавно перестало влазить на один лист, добавил ещё и автоматическое добавление листов Так что у тебя есть куда расти -- С уважением Горбонос Игорь Леонидович Posted via ActualForum NNTP Server 1.4 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2008, 15:06 |
|
||
|
% выполнения
|
|||
|---|---|---|---|
|
#18+
C учётом того, что я не могу добавить на форму прогрессбар, т.к. не имею понятия, где мне галочку в References поставить, то расти есть куда ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2008, 15:15 |
|
||
|
|
start [/forum/topic.php?fid=60&msg=35660750&tid=2161611]: |
0ms |
get settings: |
9ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
57ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
45ms |
get tp. blocked users: |
1ms |
| others: | 193ms |
| total: | 338ms |
| 0 / 0 |
