エクセルのテキストボックスの保護で文字列のロックをするには？ (ID:115744)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 はじめまして、VB初心者です。 早速ですが、VBを使ってエクセル操作を行いたいのですが、 テキストボックスの保護の設定で文字列のロックをするには どのようにしたらよろしいでしょうか？ 以下のようにSelectしてからWithステートメント使えば一応 ロックすることはできましたが、2回目の実行では エラーが出てしまいましたので、Setステートメントを 使用しようとしましたが、方法がわかりませんでした。 申し訳ありませんがよろしくお願い致します。 '---------------------------------- Dim xlSheet As Excel.Worksheet xlSheet.Shapes("Text Box 10").Select With Selection .Locked = True .LockedText = False End With