如何获取单元格中粗体单词的准确位置?

如何获取单元格中粗体单词的准确位置?

我有两个单元格(假设为 A1 和 B1),它们的内容相同,但格式不同(边框、大小、背景等)

我需要在两个单元格中使用相同的粗体字。但我不想更改 A1 和 B1 的任何其他格式

我对 A1 中的文本进行了循环,以检测每个字母是否为粗体:

对于 i = 1 至 Len([A1])

如果 [A1].Characters(i, 1).Font.Bold = True 则 [B1].Characters(i, 1).Font.Bold = True

接下来我

当A1中的文本长度超过200个字母时,这个循环需要几秒钟才能执行,我需要对其进行优化。

我的想法是将“[A1].characters”对象传输到一个变量中,以便更快地检查 A1 的每个字母是否为粗体。

所以我创建了对象[A1].characters:

设置 chr=[A1].字符

如何获取文本每个字母的“粗体/不粗体”属性?

(我一直在寻找一种方法来构建一个数组,其维度是 A1 的字母数量,其中 1 表示粗体字母,0 表示非粗体字母,但我找不到它)

在此先感谢您的帮助。

相关内容