選択範囲の単語の先頭の1文字を大文字にしたり小文字にしたりできます。
1つ以上の単語を選択して実行できます。
↑ ↓
こんな感じで、実行するたびに切り替えます。
無理矢理作った感じのプログラムですが、たいていの場合素直に動きます。
<目次>
プログラム
1 2 3 4 5 6 7 8 9 | Sub Case_Control() If Selection.Range. Case = wdTitleWord Then Selection.Range. Case = wdLowerCase Else Selection.Range. Case = wdTitleWord End If End Sub |