У меня есть две ячейки (скажем, A1 и B1) с одинаковым содержимым, но с разным форматированием (границы, размер, фон и т.д.)
Мне нужно иметь одинаковые жирные слова в двух ячейках. Но я не хочу менять какие-либо другие форматирования А1 и В1
Я сделал цикл для текста в A1, чтобы определить, выделена ли каждая буква жирным шрифтом или нет:
Для i = 1 до Лен ([A1])
Если [А1].Персонажи (я, 1).Шрифт.Жирный = True Тогда [B1].Персонажи (я, 1).Шрифт.Жирный = True
Далее я
Когда длина текста в A1 превышает 200 букв, выполнение этого цикла занимает несколько секунд, и мне нужно оптимизировать его.
Моя идея состоит в том, чтобы передать объект «[A1] .characters» в переменную, чтобы быстрее проверить, выделена ли каждая буква A1 жирным шрифтом или нет.
Поэтому я создаю объект [A1] .characters:
установить chr = [A1]. символы
Как я могу получить свойство "жирный / не жирный" каждой буквы текста?
(Я искал способ построить массив, размерность которого равна числу букв А1, с 1 для жирных букв и 0 для не жирных букв, но я не могу его найти)
Заранее спасибо за помощь.