Calには、テキストボックスと矢印がページ全体をさまよっているという問題があります。

彼は、追加したテキストボックスや描画形状ごとにアンカーをロックするのではなく、デフォルトでアンカーをロックする方法があるのだろうかと考えています。

簡単な答えは、方法がないということです。その理由は、ほとんどの人がドキュメントに配置された最初の場所にオブジェクトをアンカーしたままにしない場合、アンカーをロックすることはあまり意味がないためです。たとえば、テキストボックスの配置を適切に判断できる場合もありますが（したがって、最初から固定されている場合もあります）、矢印を追加した後で矢印を移動して調整する必要がある可能性があります。その動きと調整が行われるまで、それらを固定することはあまり良いことではありません。

次善の策は、オブジェクトを固定または固定解除するマクロを作成することです。次に、マクロをツールバーボタンまたはショートカットキーに追加して、オブジェクトを選択し、アンカーするかどうかを切り替えることができます。これにより、ダイアログボックスを表示したり、アンカー設定を変更したりする手間がかからないため、オブジェクトが多数ある場合に大幅な時間を節約できます。

Sub ToggleShapeAnchor()

Dim newlockAnchorSetting As Boolean     If Selection.Type = wdSelectionShape Then         If (Selection.ShapeRange.Count >= 1) Then             newlockAnchorSetting = Not Selection.ShapeRange(1).LockAnchor         End If         For Each Shape In Selection.ShapeRange             Shape.LockAnchor = newlockAnchorSetting         Next     End If End Sub

注：

このページ（または_WordTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（7745）は、Microsoft Word 97、2000、2002、および2003に適用されます。Wordのリボンインターフェイス（Word 2007）用のこのヒントのバージョンを見つけることができます。以降）ここ：

linkデフォルトでオブジェクトを固定。