「検索ヒット数表示（選択文字列）」を編集中 (節単位)

== 組み込み用関数バージョン ==

2019/07/20 追加、 2019/12/03 更新
*引数に指定した文字列の出現回数 "'''ヒット数：n 件 ( m 件目 )''' " を返します。

※ 動作仕様・制限事項は [[#単独マクロバージョン|単独マクロバージョン]] に準じます。

=== 使用例 ===
<syntaxhighlight lang="javascript">
// 選択範囲の文字列のヒット数をステータスバーの表示内容に追加
var word = document.selection.Text;
if ( word ) {
  Status += "  " + HitStatus( word, true, false );
}
</syntaxhighlight>

=== 組み込み関数コード ===
<syntaxhighlight lang="javascript">
/* 
 * 関数 HitStatus( word, matchCase, countMinimum )
 * 引数に指定した文字列の出現回数 "ヒット数：n 件 ( m 件目 ) " を返す
 * 
 * 第一引数 str： 選択範囲の文字列などの「文字列」オブジェクト
 * 第二引数 matchCase： 大文字と小文字を区別するなら true、区別しないなら false
 * 第三引数 countMinimum：「あああああ」にたいして「ああ」のヒット数を
 *                        2 件とカウントするなら true、4 件とカウントするなら false
 */
function HitStatus( word, matchCase, countMinimum ) {
  word = matchCase ? word : word.toLowerCase();
  var d = editor.ActiveDocument, s = d.selection;
  var docu = matchCase ? d.Text : d.Text.toLowerCase();
  var tPos = Math.min( s.GetActivePos(), s.GetAnchorPos() );
  var count = 0,  hit = 0, append = "*";
  var next = countMinimum ? word.length : 1;
  var pos = docu.indexOf( word );
  while ( pos >= 0 ) {
    count ++;
    if ( pos <= tPos ) {
      hit = count;
      if ( pos == tPos ) { append = ""; }
    }
    pos = docu.indexOf( word, pos + next );
  }
  return ( " ヒット数：" + count + " 件"
           + " ( " + hit + " 件目" + append + " ) "
         ).replace( /(\d)(?=(?:\d{3})+(?!\d))/g, "$1," );
}
</syntaxhighlight>