Microsoft Word で VBA を使用して図形を操作しています。選択が変更されると、変数が一部の形状プロパティへの参照を失うインスタンスがあります。以下はコードです。このコードの実行が開始されると、ドキュメント内の画像が選択されます。画像は通常の形状です (つまり、インライン形状ではありません):
Dim MyShape As Shape
Set MyShape = Selection.ShapeRange(1)
MsgBox MyShape.Left
Selection.Collapse
MsgBox MyShape.Left
最初の MsgBox コマンドは正常に動作しますが、選択範囲を折りたたんだ後の 2 番目のコマンドは、次のエラーを引き起こします。
「実行時エラー '4605': 描画操作を現在の選択範囲に適用できないため、Left メソッドまたはプロパティを使用できません。」
選択範囲を折りたたんだ後に MyShape.Top にアクセスしようとすると、同じことが起こります。奇妙なことに、選択範囲を折りたたんだ後に MyShape.Width または MyShape.Height にアクセスしようとすると、正常に動作します。どんな洞察も大歓迎です。