在Excel VBA中，如何檢索單元格內的文本格式

Question

在Excel VBA中，我想要檢索單元格的文本以及每個單詞的格式。例如，單元格A1的值爲「」示例文本「。 Range（「A1」）。Value屬性僅返回純文本（即「示例文本」）。我想要的是一個對象，它給了我一些像「< i>樣本</i> < b>文本</b>」。 Excel DOM中的對象是什麼？

Answer 1

您可以通過一個檢查的CharactersFont，一個這樣做的，和開/在你的輸出相應關閉格式化標籤：

dim i as long 
for i=1 to activecell.characters.count 
    with activecell.characters(i,1).font 
    if .bold then 
     'open <b>, if not already opened 
    else 
     'close <b>, if not already closed 
    end if 

    if .italic then 
     'open <i>, if not already opened 
    else 
     'close <i>, if not already closed 
    end if 

    ' etc 
    end with 
next