エラーでWordマクロがうまく動かない - つれづれ電脳記（日くらしPCに向かひて）

　先日、Word文書内に挿入したブックマークのテキストを、次から次に順次入れ替えるVBAマクロのコードを、当ブログ記事で紹介しました。

　次のVBAコードです。

Dim i As Integer
For i = 1 To 5
　With ThisDocument
　　　 ' ブックマークにテキストを挿入
　　　 .Bookmarks(1).Range.Text = i
　　　 .PrintOut
　　　' ブックマークのテキストを削除
　　　.Bookmarks(1).Range.Delete
　End With
Next i

　週明けの今日（2023年12月18日）、職場のPCでこれを試してみました。
　そうしたら、なんと、なんと、エラーが出てしまいます。

　具体的には、
　　.Bookmarks(1).Range.Delete
のところで、ブックマークのテキストを削除するのではなく、ブックマークそのものを削除してしまいます。

　自宅PCでは、意図どおりに動いてくれたのに、なぜ、職場ではエラーになるのか、原因不明です。
　会社では、次から次に仕事が入ってくるので、原因追及をしているような時間的余裕がありません。

　取り急ぎ、うまく動かないこともあるってことを、この場で報告しておきます。
　エラーが出たときの落胆は、ちょっと大きいものがありました。
　あちゃ～、ってなもんです。

　でも、プログラミングって、こういうもんです。完璧に動作してくれると、最高の気分になれるのですが、そうとばかりは限りません。
　試行錯誤の繰り返しです。そんなもんです。