マクロ、超初心者です。
どうにか、下記マクロを設定しました。
On Error Resume Next
With ActiveSheet.Range("d:e").SpecialCells(xlCellTypeConstants, 23)
.ClearContents
End With
シートの保護を行うと、上記マクロが機能しません。
ちなみに、セルの保護の状態は、
d列----「ロックなし」「表示する」
e列----「ロックなし」「表示しない」(数式が入っています)
お暑いところ・お忙しいところ申し訳ありませんが、
どなたか、ご教授ください。
よろしくお願いいたします。
No.2ベストアンサー
- 回答日時:
>sheet全てにプロテクトがかかってしまうという状況になり・・
意味がよく解りませんが・・・。
マクロでは保護の掛かったシートを変更することができないので、プログラムを組む場合はそのことを頭に置いて、保護の解除と保護を適切なところで行う必要があります。
基本的には、保護シートを操作するマクロの先頭に「保護の解除」、最後に「保護」のコードを記入すれば良いのですが・・・。
保護設定のオプションもエクセルのバージョンによって違うので書きませんでしたが、記録マクロを使って保護を設定すれば、保護オプションを含めたコードを取得できるので、書き換えれば良いでしょう。
マクロで何度も保護の解除と保護設定をしなくても済むようにする方法がありますが、エクセル起動時に一度だけ実行して置く必要があります。
ActiveSheet.Protect UserInterfaceOnly:=True
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub0 …
この回答への補足
お忙しいところご回答いただきありがとうございました。
マクロを組んでいる際は、シート保護をかけていないのですが、
マクロ1(ソート)
Sub test()
Range("A6:C111").Select
Selection.Sort Key1:=Range("A6"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
Range("D6").Select
End Sub
マクロ2(クリア)
On Error Resume Next
With ActiveSheet.Range("d:e").SpecialCells(xlCellTypeConstants, 23)
.ClearContents
End With
2つのマクロを設定した後、シート保護をかけた段階で、
ソートのマクロはうまく機能いくのですが、クリアのマクロが機能しません (;;)
的外れな、補足かもしれませんが・・・
ご助言いただけると、助かります。
No.1
- 回答日時:
マクロで、シート保護の解除と保護の設定を行うだけです。
sub test()
ActiveSheet.UnProtect
'処理
ActiveSheet.Protect
end sub
この回答への補足
早々にご回答ありがとうございます <(__)>。
ご回答いただいたマクロを利用すると、sheet全てにプロテクトがかかってしまうという状況になり・・・エラーになってしまいます。
実は、もう一つマクロ↓を入れておりまして、
Sub test()
Range("A6:C111").Select
Selection.Sort Key1:=Range("A6"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
Range("D6").Select
End Sub
このマクロを実行した後に、d列およびe列のセル内容表示をクリアし、
『d列は、再入力できる状態に、e列は結果を表示』
を繰り返し行えるようにしたいのですが・・・。
お力を貸して頂けると幸いです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
10代と話して驚いたこと
先日10代の知り合いと話した際、フロッピーディスクの実物を見たことがない、と言われて驚きました。今後もこういうことが増えてくるのかと思うと不思議な気持ちです。
-
【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
2024年は「名探偵コナン30周年」「涼宮ハルヒ20周年」などを迎えますが、 あなたが「もうそんなに!?」と驚いた○○周年を教えてください。
-
「これはヤバかったな」という遅刻エピソード
寝坊だったり、不測の事態だったり、いずれにしても遅刻の思い出はいつ思い出しても冷や汗をかいてしまいますよね。
-
昨日見た夢を教えて下さい
たまにすごいドラマチックな夢見ること、ありませんか? 起きてからも妙に記憶に残っているような、そんな夢。
-
架空の映画のネタバレレビュー
映画のCMを見ていると、やたら感動している人が興奮で感想を話していますよね。 思わずストーリーが気になってしまう架空の感動レビューを教えて下さい!
-
EXCEL シート保護するとマクロが正常動作しない
Excel(エクセル)
-
VBA 数式を残して値をクリアについて
Excel(エクセル)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
-
4
VBAを何回も作り直して、容量が増えた
Excel(エクセル)
-
5
Excelシート上のマクロを登録したボタンの削除が出来ません
Excel(エクセル)
-
6
エクセルを共有にすると、シートを保護するマクロがエラーになります
Excel(エクセル)
-
7
エクセルVBA シートの保護について
Excel(エクセル)
-
8
エクセル マクロ 名前を付けて保存 PDF保存先指定 ファイル名任意+日付
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・一回も披露したことのない豆知識
- ・これ何て呼びますか
- ・チョコミントアイス
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・これ何て呼びますか Part2
- ・許せない心理テスト
- ・この人頭いいなと思ったエピソード
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・あなたの習慣について教えてください!!
- ・ハマっている「お菓子」を教えて!
- ・高校三年生の合唱祭で何を歌いましたか?
- ・【大喜利】【投稿~11/1】 存在しそうで存在しないモノマネ芸人の名前を教えてください
- ・好きなおでんの具材ドラフト会議しましょう
- ・餃子を食べるとき、何をつけますか?
- ・あなたの「必」の書き順を教えてください
- ・ギリギリ行けるお一人様のライン
- ・10代と話して驚いたこと
- ・家の中でのこだわりスペースはどこですか?
- ・つい集めてしまうものはなんですか?
- ・自分のセンスや笑いの好みに影響を受けた作品を教えて
- ・【お題】引っかけ問題(締め切り10月27日(日)23時)
- ・大人になっても苦手な食べ物、ありますか?
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
ExcelのVBA。public変数の値が...
-
メッセージボックスのOKボタ...
-
エクセルに張り付けた写真のフ...
-
一つのTeratermのマクロで複数...
-
ピボットテーブルでの毎回可変...
-
エクセルのマクロをセルの値に...
-
wordを起動した際に特定のペー...
-
ExcelVBAでPDFを閉じるソース
-
Excel_マクロ_現在開いているシ...
-
Excel マクロでShearePoint先の...
-
エクセルの改ページを行ごとに...
-
Excel VBAからAccessマクロを実...
-
ソース内の行末に\\
-
VBAにて別ワークブック上の実行...
-
Excelで特定の文字のところで自...
-
TERA TERMを隠す方法
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
特定のPCだけ動作しないVBAマク...
-
Excel・Word リサーチ機能を無...
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
メッセージボックスのOKボタ...
-
一つのTeratermのマクロで複数...
-
エクセルに張り付けた写真のフ...
-
ExcelのVBA。public変数の値が...
-
Excel マクロでShearePoint先の...
-
TERA TERMを隠す方法
-
ExcelVBAでPDFを閉じるソース
-
特定文字のある行の前に空白行...
-
Excel VBAからAccessマクロを実...
-
wordを起動した際に特定のペー...
-
マクロ実行時、ユーザーフォー...
-
エクセルで別のセルにあるふり...
-
マクロで空白セルを詰めて別シ...
-
ソース内の行末に\\
-
Excel_マクロ_現在開いているシ...
-
ダブルクリックで貼り付けた画...
おすすめ情報