Excel VBA でオートシェイプの「文字列のロック」プロパティの設定

Question

Anonymous

Excel 2010 を使用しています。

オートシェイプを右クリックし、「図形の書式設定」－「プロパティ」をたどると「文字列のロック」のチェックボックスがあります。

これのOn/OffをVBAで制御したいと思っていますが、該当するプロパティがなく、どうすれば良いのか困っております。

Worksheets(1).Shapes(1).Locked プロパティはあるので「ロック」の制御はできるのですが。。。

ネットで調べたところ LockedText プロパティなるものがあるようですが、そのようなものは見つからないです。

ご教授をお願い致します。

ロックされた質問。この質問は、Microsoft サポートコミュニティから移行されました。役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント

1 件の回答

Answer 1

確かにshapeのプロパティには無いのですが、

'Worksheets(1).Shapes(1).Select 　または

Worksheets(1).Shapes(1).TextFrame2.TextRange.Select

のようにselectしておいて

Selection.LockedText = False　　'true

にすれば設定を切り替えられます。

　Worksheets(1).Shapes(1)..LockedText = False

のように書くとエラーになります。