Word () 的 Selection.SelectCurrentColor 方法

向前延伸選取項目，直到遇到具有不同色彩的文字為止。

語法

expression. SelectCurrentColor

需要 expression。 代表 Selection 物件的變數。

範例

這則範例會將選取項目從文件的開頭延伸至以不同色彩格式化的第一個字元，然後顯示產生之選取項目中的字元數。

Selection.HomeKey Unit:=wdStory, Extend:=wdMove 
Selection.SelectCurrentColor 
n = Len(Selection.Text) 
MsgBox "Contiguous characters with the same color: " & n

另請參閱

Selection 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。