【Word VBA】改ページによって行番号、文字位置の取得が崩れる問題

Question

実現したいこと

改ページのある文書で、マクロ実行前にカーソルを置いていた位置を取得したいのですが、なぜかうまくいきません。

下図のように、改ページを入れたあと、「Tttttt・・・」の前にカーソルを置き、
以下のコードを実行すると、MsgBoxで取得した文字開始位置に差が生じ、想定とは別の場所が選択されてしまいます。

この違いは、改ページを挿入していない場合は見られませんでした。

◆実行前（ハイライト色はあらかじめついた状態）

◆実行後（「T」よりも上の位置が選択されている）

どなたか、解消方法などご存じないでしょうか。

該当のソースコード

※Selection.Startで取得している値は、私が適当な文字、改行を挟んでいるため、おそらくほかの環境では再現されません。
ここでは「同じ位置の値を取得しているはずなのに、値が異なる」ことだけ見ていただければと思います。

'カーソル位置の1文字を色付け
Selection.MoveRight wdCharacter, 1, wdExtend
Selection.Range.HighlightColorIndex = wdBrightGreen

MsgBox Selection.Start
>126

'色付けた箇所を捜索
With Selection
    .HomeKey Unit:=wdStory
    .Find.ClearFormatting
    .Find.Highlight = True

    Do Until .Find.Execute = False
        If .Range.HighlightColorIndex = wdBrightGreen Then
            d = .Range.Start
            
            MsgBox d
            >124
            
'色を付けた範囲を選択
            ThisDocument.Range(d, d).Select
            Selection.MoveRight wdCharacter, 1, wdExtend

            Exit Do
        End if
    Loop
End With

End Sub

補足情報（FW/ツールのバージョンなど）

Windows11
Word 2019

Answer 1

「マクロ実行前にカーソルを置いていた位置を取得」はできています。
「改ページの箇所（改行マークが表示されている位置）」と「改ページを設定している行の行頭（左端）」で2か所あるためです。

Comments

[netz-eng]

ご回答ありがとうございます。
Word VBA、かなり仕様が？　なところがあるのですが、

マクロ実行前から改ページされていても、改ページの影響を受けてハイライト部分のStart値が異なるのは何故なんでしょうか？

[mdj]

すいませんがご質問の意図がわかりませんでした。
まずは私のご回答についてはご理解いただけていますでしょうか。
ついで「改ページの影響を受けてハイライト部分のStart値が異なる」は言い換えていただければお答えできるかもしれません。

[netz-eng]

ご返信ありがとうございます。
回答に追加いただいた図については、おおよそ理解しております。

そこで私のお尋ねしたいことですが、
同じ位置であるはずの「はじめにカーソルがあった位置のStart値」と「ハイライト位置を検索した際のStart値」のずれがなぜ生じるのか、です。
言い換えると、なぜ「はじめにカーソルがあった位置のStart値」でのみ、改ページの影響を受けてStart値が2加算されるのでしょうか？

マクロ実行によって文章は変わっていないため、ハイライト位置を検索した場合でも、同じく改ページの影響を受け、Start値は一致すると思うのですが、
実際そうなっていない理由がよく理解できておりません。

[mdj]

再現性がないのですが、同様の動きになる場合が確認できました。
その際、（一致していない）カーソルの位置にスペースないしは文字を入力するとハイライトされていました。
よって、何が作用してそうなるかは理解していませんが、ハイライト箇所が増えているため、な気がします。

[netz-eng]

なるほど、そういった謎の事象が発生しうるんですね……
ご確認いただきありがとうございます。