Есть ли более быстрый способ макроса Excel для преобразования нестандартных символов в объекты HTML?

Я нашел этот действительно полезный фрагмент по < strong>Джей, который помог мне преобразовать текст в объекты HTML в Excel ( путем переключения до и после) при подготовке к экспорту в CSV.

e.g. ReplaceCharacter cell, "€","&euro;" 'euro

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

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

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


person Mosey    schedule 10.07.2011    source источник
comment
Вы ищете только более быстрый макрос Excel или открыты и для других инструментов?   -  person KatieK    schedule 11.08.2011
comment
@KatieK: Я полагаю, что думал о более быстром макросе Excel, но я также внимательно отношусь к другим предложениям. Спасибо.   -  person Mosey    schedule 13.08.2011


Ответы (1)


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

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

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

person hydrox467    schedule 06.03.2012