Существует ли более быстрый способ преобразования макроса Excel в HTML-объекты нестандартных символов? - PullRequest
2 голосов
/ 10 июля 2011

Я нашел этот действительно полезный фрагмент от Jay , который помог мне преобразовать текст в HTML-сущности в Excel (путем переключения до и после) при подготовке к экспорту CSV.

например. ReplaceCharacter cell, "€","€" 'euro

Однако, как следует из второго комментария к этой теме, это не самый эффективный метод - например, у меня есть документ с примерно 90 строками и около 13 столбцами. Будучи очень новым для VBA / макросов, я понимаю, как работает скрипт, он просматривает каждую ячейку, находит символы и заменяет их.

Этот конкретный метод занял чуть менее 1:00 минуты (55 секунд) - что я рассчитал, поместив всплывающее окно msgbox после его завершения.

Хотя это все еще разумно (я мог бы уйти и сделать чашку чая за минуту), было бы не так, если бы вместо этого было 1000 рядов, поэтому мне было интересно, кто-нибудь может предложить какие-либо улучшения или альтернативные методы достижения того же самого?

1 Ответ

2 голосов
/ 06 марта 2012

2002 строк за 3 секунды ...

    Cells.Replace What:="€", Replacement:="&euro", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False

Просто сложите пару таких друг на друга, и все будет хорошо! (Не нужно петли!)

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...