CS5 тормозит на замене текста VB6

[Sanchos]

В ЦС4 код работает нормально, а вот в ЦС5 существенно тормозит на больших объёмах текста.

myID.ChangeGrepPreferences.FontStyle = "Bold"
myFindChangeGrep myStory.Paragraphs(cntPar), "(?i)^<@Osnovnoy text:><b>(.*?)<p>", "$1", True

Private Sub myFindChangeGrep(myStory As InDesign.Paragraph, myFind$, myChange$, myRevers As Boolean)
myID.FindGrepPreferences.FindWhat = myFind
myID.ChangeGrepPreferences.ChangeTo = myChange
myStory.ChangeGrep myRevers
End Sub

Это недоработка ЦС5 или что?
может кто знает. Может проще тогда на JS переписать? там нормально? проверял кто то или нет?

 

[Sanchos]

Ответ: CS5 тормозит на замене текста VB6

Всё, я уже разобрался. Тормоза из за вертикального выравнивания.