Wordでは、選択したテキストの大文字と小文字を調整できます。 Word 2007以降のバージョンを使用している場合は、リボンの[ホーム]タブが表示されていることを確認してから、[フォント]グループの[大文字と小文字を区別する]ツール（Aa）をクリックします。

Wordでテキストの大文字と小文字を調整するさまざまな方法のリストが表示されます。最も一般的なケースの変更の1つは、タイトルケースです。このタイプの変更により、選択したテキストの各単語が大文字になり、残りの文字は小文字になります。これに関する唯一の問題は、Wordが何を大文字にするかについてかなり無差別であるということです。たとえば、「これはテストです」というテキストを選択し、[ケースの変更]ダイアログボックスを使用してテキストをタイトルケースに変更すると、「これはテストです」という結果になります。ただし、大文字の一般的な規則では、「短い」単語（「is」および「a」）は大文字にしないでください。

ここでマクロが役に立ちます。タイトルケースをテキスト選択にインテリジェントに適用するマクロを作成できます。マクロは、作業中に特定の単語のセットを無視するようにプログラムできます。次のマクロについて考えてみます。

Sub TitleCase()

Dim lclist As String     Dim wrd As Integer     Dim sTest As String

' list of lowercase words, surrounded by spaces     lclist = " of the by to this is from a "



Selection.Range.Case = wdTitleWord

For wrd = 2 To Selection.Range.Words.Count         sTest = Trim(Selection.Range.Words(wrd))

sTest = " " & LCase(sTest) & " "

If InStr(lclist, sTest) Then             Selection.Range.Words(wrd).Case = wdLowerCase         End If     Next wrd End Sub

テキストを選択してこのマクロを実行すると、最初にテキストをWordの標準のタイトルケースに変更します。次に、選択範囲内の単語をステップスルーし（WordはWordsコレクションで単語を使用可能にします）、それぞれを調べます。各単語が抽出されてsTest変数に配置され、小文字に変換されます。次に、sTestの内容がlclist文字列と照合され、一致するものがあるかどうかが確認されます。ある場合は、元のテキストの単語が小文字に変換されます。

マクロの鍵はlclist文字列です。この文字列には、常に小文字で表示する単語のリストが含まれています。これらの単語は、文字列の最初と最後の単語を含むスペースで囲まれています。

sTestの比較が行われると、sTestには先頭と末尾のスペースが含まれるため、一致を成功させることができます。 （スペースは、たとえば「he」を「the」の一部に一致させるなど、単語の一致に間違いがないように含まれています。）

また、マクロの比較部分は、テキスト選択の最初の単語に注意を払っていないことに注意してください。この単語は、フレーズまたは文の最初の単語であると見なされ、常に大文字で始まる必要があります。

注：

このページ（または_WordTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

link：/ wordribbon-WordTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（3868）は、Microsoft Word 2007、2010、2013、および2016に適用されます。Wordの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。

link：/ word-Intelligent_Title_Case [Intelligent TitleCase]。