Как ускорить работу кода? Пиксельная цветокоррекция битмапов

Программирование на Visual Basic for Applications
ОМО
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 1
Зарегистрирован: 15.11.2008 (Сб) 16:35

Как ускорить работу кода? Пиксельная цветокоррекция битмапов

Сообщение ОМО » 15.11.2008 (Сб) 17:12

У меня проблема с кодами, сама загрузка Visual Basic долгая..))

Допустим у меня на целый ряд строки Line, по 3000 ряда, в кажном по 38 макросов - результат грузки 8 минут, долго однако... Старая программа World 2003 редактировки текста, и модуль макросов. Вот как ускорить?

Вот приклад:
=====================================================
Set MyRange = ActiveDocument.Content
With MyRange.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "text"
.Replacement.Text = "текст"
.Execute Replace:=wdReplaceAll
End With
======================================================

Debugger
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1667
Зарегистрирован: 17.06.2006 (Сб) 15:11

Re: Как ускорить работу кода? Пиксельная цветокоррекция битмапов

Сообщение Debugger » 17.11.2008 (Пн) 14:56

World 2003

Что за программа такая?

Денис
Доктор VB наук
Доктор VB наук
Аватара пользователя
 
Сообщения: 2734
Зарегистрирован: 07.11.2006 (Вт) 13:55
Откуда: Ейск, Краснодарский край

Re: Как ускорить работу кода? Пиксельная цветокоррекция битмапов

Сообщение Денис » 17.11.2008 (Пн) 15:24

Debugger писал(а):Что за программа такая?

Видимо, Microsoft Office World 2003... :lol:

А по сабжу: Недавно поднимали тему: Решение такое: добавляешь в проект формочку, на нее кидаешь прогрессбар и на каждой итерации добавляешь ему значение. пользователь видит, что идет работа и не нервничает.
Программирование — богоизбранная дисциплина! Если бог и есть, то вселенную он скомпилировал, не иначе.


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 67

    TopList