![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
エクセルでシートの保護をかけたまま
行のコピー・挿入ができるマクロを教えてください。
下記のままでは『Selection.Insert Shift:=xlDown』
のところでエラー表示されます。
行は必ず2行1セットとなっており、
2行を選択、選択行の下にコピーした行にを挿入したいのです
宜しくお願い致します。
Sub Macro1()
'
ActiveCell.Offset(-1, 0).Rows("1:2").EntireRow.Select
Selection.Copy
ActiveCell.Offset(2, 0).Rows("1:1").EntireRow.Select
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub
No.1ベストアンサー
- 回答日時:
こんばんは!
おそらくシートの保護を一旦解除する必要があるのではないでしょうか?
↓のようなコードにしてみてはどうでしょう。
ActiveSheet.Unprotect Password:="abc" '//←「abc」は実際のパスワード
'行いたい操作
ActiveSheet.Protect Password:="abc"
といった感じで
一旦解除し、操作が終われば再びシートの保護を行う
といった手順です。m(_ _)m
tom04様
ありがとうございます!
出来ました!
パスワードの解除・ロック保護のコードを
入れたところ、できました。
本当にありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) マクロで最終行を取得してコピーしたい 3 2022/04/06 19:07
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
- Excel(エクセル) エクセルで最下行にデータを追加するVBA 6 2023/05/09 09:30
- Excel(エクセル) エクセルのVBAにショートカットキーの割り当て 3 2022/07/13 14:19
- Excel(エクセル) エクセルのマクロでコピー後の貼り付け先を毎回指定したところにしたい 5 2022/08/12 10:47
- Visual Basic(VBA) Excelマクロ Application.Run 5 2023/06/17 15:16
- Excel(エクセル) ②Excel 簡単にシートコピーしたら前日の残高と日付を変更させたい→マクロの記録でエラーが出ます 8 2022/07/16 20:40
- Excel(エクセル) エクセル VBAでシートのコピーを作りたい 1 2023/05/18 07:42
- Visual Basic(VBA) サブフォルダ(データ)にある複数の.xlsxファイルのSheet3のA2セルの値で01から左側をB2 2 2022/08/14 15:46
- Excel(エクセル) 【マクロ】プリントスクリーンした画像をエクセルに貼付して印刷したい 6 2022/11/30 20:11
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
シート保護の状態で行の追加を行いたい
その他(Microsoft Office)
-
Excel 数式の保護をしたセルを保護のままコピーする方法
Excel(エクセル)
-
ロックしたセルのコピー&貼り付け
Excel(エクセル)
-
-
4
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
5
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
6
EXCEL(VBA)でシート保護がかかったシートにクリックボードから貼り付けしたい
Visual Basic(VBA)
-
7
Excelで保護のかかったシートのコピー
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで複数のシートを一度に「...
-
特定のシートのみ再計算させな...
-
特定のシート名のシートのみ除...
-
エクセルでブック内の倍率がバ...
-
EXCELの図形(テキストボックス)...
-
エクセル、特定のシートにパス...
-
PCで使用できる暗記シート ア...
-
ワークシートそのものの色を変...
-
エクセルの2つのシートを並び...
-
エクセルで、特定のシートを印...
-
エクセルで複数のシートに画像...
-
Excelで条件に一致したものだけ...
-
エクセルで色つきセルを一括で...
-
Excel、Aのシートにあって、Bの...
-
Excelで入力シート、印刷シート...
-
VBA/指定の複数シートをHTML化...
-
Excel2019 シート名をプルダウ...
-
エクセルのシートタブの鍵マーク
-
Excelでシートを簡単に見つける...
-
エクセル シートのグループ化...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで複数のシートを一度に「...
-
エクセルでブック内の倍率がバ...
-
特定のシートのみ再計算させな...
-
エクセルで複数のシートに画像...
-
ハイパーリンクでジャンプした...
-
ワークシートそのものの色を変...
-
エクセルの2つのシートを並び...
-
【ExcelVBA】マクロの入ったシ...
-
エクセル、特定のシートにパス...
-
エクセルのシート連番の振り直し
-
EXCELの図形(テキストボックス)...
-
特定の複数のシートに同じ処理...
-
【Excel VBA】データ貼り付け先...
-
エクセルのシー名を二段表示に...
-
EXCELの「シートの見出し」のフ...
-
Accessのテーブルを既存のExcel...
-
Wordで差し込み印刷時に表示す...
-
accessへエクセルの複数のシー...
-
エクセル、別のシートの表をポ...
-
指定したシート名以外を非表示...
おすすめ情報