1
Word文書内のカラーワードをカウントすることは可能でしょうか。私の文書には2つの色の単語があるとしましょう。私は色が青であるという言葉を数える必要があり、色が赤であるという言葉を数える必要がある。VBA Microsoft Word文書のワード数をカラーで計算する
私は、スクリプトの下に使用して
"フォントでMicrosoft Word文書内の単語を数える" が見つかり:文字列限り のConst書体
サブCountTypeface() 薄暗いlngWord限り 薄暗いlngCountIt = "カンブリア"
For lngWord = 1 To ActiveDocument.Words.Count
'Ignore any document "Words" that aren't real words (CR, LF etc)
If Len(Trim(ActiveDocument.Words(lngWord))) > 1 Then
If ActiveDocument.Words(lngWord).Font.Name = Typeface Then
lngCountIt = lngCountIt + 1
End If
End If
Next lngWord
MsgBox "Number of " & Typeface & " words: " & lngCountIt
End Subの
してください助言。
ありがとうございます。
ありがとうございました。色の数については、私が参考に使用できるWebページをアドバイスできますか?本当にありがとう。 – Rico
最良の選択肢は、単語を1つだけ書き、それを実行するとその色が見えるように、自分で確認することです。これは即時のウィンドウに表示されます。それ以外の場合はページが少し難しいですが、http://dmcritchie.mvps.org/excel/colors.htmを試してみてください – Vityata