インテリジェントタイトルケース(Microsoft Word)
Wordには、選択したテキストの大文字と小文字を調整できるいくつかの異なる方法が含まれています。 1つの方法は、[フォーマット]、[フォーマット]の順にクリックすることです。 [ケースを変更]ダイアログボックスを表示します。 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_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。
(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(215)は、Microsoft Word 97、2000、2002、および2003に適用されます。Wordのリボンインターフェイス(Word 2007)用のこのヒントのバージョンを見つけることができます。以降)ここ: