wordのスタイルの定義
まめせぶん'Word VBA WdBuiltinStyle定数一覧（定数名、数値、説明）
'これらの定数は言語に依存せず、日本語版・英語版どちらでも使用可能
'=== 見出しスタイル ===
wdStyleHeading1 ' -2 見出し1 / Heading 1
wdStyleHeading2 ' -3 見出し2 / Heading 2
wdStyleHeading3 ' -4 見出し3 / Heading 3
wdStyleHeading4 ' -5 見出し4 / Heading 4
wdStyleHeading5 ' -6 見出し5 / Heading 5
wdStyleHeading6 ' -7 見出し6 / Heading 6
wdStyleHeading7 ' -8 見出し7 / Heading 7
wdStyleHeading8 ' -9 見出し8 / Heading 8
wdStyleHeading9 ' -10 見出し9 / Heading 9
'=== 基本スタイル ===
wdStyleNormal ' -1 標準 / Normal
wdStyleTitle ' -63 タイトル / Title
wdStyleSubtitle ' -75 副題 / Subtitle
'=== リスト関連 ===
wdStyleList ' -48 リスト / List
wdStyleListBullet ' -49 箇条書き / List Bullet
wdStyleListNumber ' -50 段落番号 / List Number
wdStyleList2 ' -51 リスト2 / List 2
wdStyleList3 ' -52 リスト3 / List 3
wdStyleList4 ' -53 リスト4 / List 4
wdStyleList5 ' -54 リスト5 / List 5
wdStyleListBullet2 ' -55 箇条書き2 / List Bullet 2
wdStyleListBullet3 ' -56 箇条書き3 / List Bullet 3
wdStyleListBullet4 ' -57 箇条書き4 / List Bullet 4
wdStyleListBullet5 ' -58 箇条書き5 / List Bullet 5
wdStyleListNumber2 ' -59 段落番号2 / List Number 2
wdStyleListNumber3 ' -60 段落番号3 / List Number 3
wdStyleListNumber4 ' -61 段落番号4 / List Number 4
wdStyleListNumber5 ' -62 段落番号5 / List Number 5
'=== 引用・コメント ===
wdStyleQuote ' -181 引用文 / Quote
wdStyleCaption ' -35 図表番号 / Caption
wdStyleIntenseQuote ' -182 引用文(強調) / Intense Quote
'=== 特殊スタイル ===
wdStyleBodyText ' -67 本文 / Body Text
wdStyleBodyTextIndent ' -68 本文インデント / Body Text Indent
wdStyleBodyText2 ' -81 本文2 / Body Text 2
wdStyleBodyText3 ' -82 本文3 / Body Text 3
wdStyleBodyTextFirstIndent ' -78 本文(最初の行のインデント) / Body Text First Indent
wdStyleBodyTextFirstIndent2 ' -79 本文2(最初の行のインデント) / Body Text First Indent 2
'=== 目次・索引 ===
wdStyleTOC1 ' -20 目次1 / TOC 1
wdStyleTOC2 ' -21 目次2 / TOC 2
wdStyleTOC3 ' -22 目次3 / TOC 3
wdStyleTOC4 ' -23 目次4 / TOC 4
wdStyleTOC5 ' -24 目次5 / TOC 5
wdStyleTOC6 ' -25 目次6 / TOC 6
wdStyleTOC7 ' -26 目次7 / TOC 7
wdStyleTOC8 ' -27 目次8 / TOC 8
wdStyleTOC9 ' -28 目次9 / TOC 9
wdStyleIndex1 ' -11 索引1 / Index 1
wdStyleIndex2 ' -12 索引2 / Index 2
wdStyleIndex3 ' -13 索引3 / Index 3
wdStyleIndex4 ' -14 索引4 / Index 4
wdStyleIndex5 ' -15 索引5 / Index 5
wdStyleIndex6 ' -16 索引6 / Index 6
wdStyleIndex7 ' -17 索引7 / Index 7
wdStyleIndex8 ' -18 索引8 / Index 8
wdStyleIndex9 ' -19 索引9 / Index 9
'=== ヘッダー・フッター ===
wdStyleHeader ' -31 ヘッダー / Header
wdStyleFooter ' -32 フッター / Footer
'=== 脚注・文末脚注 ===
wdStyleFootnoteText ' -30 脚注文字列 / Footnote Text
wdStyleFootnoteReference ' -29 脚注参照 / Footnote Reference
wdStyleEndnoteText ' -44 文末脚注文字列 / Endnote Text
wdStyleEndnoteReference ' -43 文末脚注参照 / Endnote Reference
'=== ハイパーリンク ===
wdStyleHyperlink ' -86 ハイパーリンク / Hyperlink
wdStyleHyperlinkFollowed ' -87 たどったハイパーリンク / FollowedHyperlink
'=== 文字スタイル ===
wdStyleStrong ' -88 強調 / Strong
wdStyleEmphasis ' -89 強調文字 / Emphasis
wdStyleIntenseEmphasis ' -262 強調文字(強調) / Intense Emphasis
'=== その他 ===
wdStylePlainText ' -91 テキストのみ / Plain Text
wdStyleNoSpacing ' -158 スペースなし / No Spacing
wdStyleIntenseReference ' -264 参照(強調) / Intense Reference
wdStyleBookTitle ' -265 書籍のタイトル / Book Title
'使用例:
Sub スタイル適用例()
'選択範囲に見出し1を適用（3つの方法すべて同じ結果）
'方法1: 定数名で指定
Selection.Style = wdStyleHeading1
'方法2: 数値で指定
Selection.Style = -2
'方法3: 文字列で指定（言語依存）
'Selection.Style = "見出し 1" '日本語版
'Selection.Style = "Heading 1" '英語版
End Sub
Sub 数値でスタイル適用()
'数値を使った例
Selection.Style = -2 '見出し1
Selection.Style = -3 '見出し2
Selection.Style = -1 '標準
Selection.Style = -63 'タイトル
Selection.Style = -49 '箇条書き
End Sub