終了」といった検索で、このサイト・インストラクターのネタ帳へのアクセスがありました。Applications)のコードをどう書けばいいのかを探している方による検索です。「何も選択されていない場合」というのが、本当のところ、どういう状態を意味しているのかによって、求められているコードは変わってきます。ここでは「何も選択されていない場合」というキーワードから考えられる2つのマクロをご紹介しておきます。[スポンサードリンク]SelectionオブジェクトのTypeプロパティを使ったサンプルマクロまずは「何も選択されていない場合」というキーワードを、杓子定規に解釈したマクロです。"何かが選択されています。SubWord上で選択されているものを表すSelectionオブジェクトにTypeプロパティが存在しています。Selection.Typeプロパティは、選択されているものに応じて、WdSelectionType列挙に定義されている以下のような値を返してきます。この中のwdNoSelectionが何も選択されていない状態を表します。Subそうではなかったときにメッセージを表示しています。"何かが選択されています。"本文中で1文字も選択されていないかどうかを判定するサンプルマクロ「何も選択されていない場合」というキーワードをそのまま解釈したマクロをご紹介しましたが、「1文字も選択されていない場合」という条件を意味している可能性のほうが高いのではないかと考えています。その場合、以下のようなマクロが参考になるでしょう。Sub上記のマクロを実行すると1文字も選択されていない場合にはSubプロシージャを終了し、そうでない場合は選択されている文字列がメッセージボックスに表示されます。SelectionオブジェクトのStartプロパティが選択範囲の文字の開始位置Endプロパティが選択範囲の文字の終了位置をそれぞれ表しています。SubとしてSubプロシージャからExitしています。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。