下記のVBAを他の同じエクセルファイル内の他のワークシート(Sheet2,Sheet3,Sheet4)にも反映するためにはどのようにしたらよろしいでしょうか?
現在書きVBAを本ワークブックという箇所に貼り付けております。
お手数ですがご教示いただきます様お願いいたします。
Private Sub Workbook_Open()
With Sheets("Sheet1")
.EnableOutlining = True
.Protect Password:="****", UserInterfaceonly:=True
End With
End Sub
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
次のようにすればよいでしょう。
Private Sub Workbook_Open()
For Each ws InWorksheets
.EnableOutlining = True
.Protect Password:="****", UserInterfaceonly:=True
Next ws
End Sub
早速ご教示いただきありがとうございます。
下記構文を使用しましたところ、エラーが発生したのですが、どのように修復したら宜しいでしょうか。
(構文最初の行が黄色でハイライトされ、2行目が赤字となりエラーが発生いたしました)。
お手数ですが、改めてご教示いただけますと幸いです。
どうぞよろしくお願いいたします。
Private Sub Workbook_Open()
For Each ws InWorksheets
.EnableOutlining = True
.Protect Password:="1", UserInterfaceonly:=True
Next ws
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【変更】ファイルを閉じてダイアログで保存した時、更新したシートだけの処理の実行をする 5 2022/03/26 18:31
- Visual Basic(VBA) EXCELのVBAについて 2 2023/07/05 17:17
- Visual Basic(VBA) userformでSheetを選択して開くコード 1 2023/05/15 16:27
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) vbaのvlookup関数エラー原因を教えていただけないでしょうか。 3 2022/04/25 16:16
- Visual Basic(VBA) エクセルVBA ダブルクリックしたら色反転を指定したセルのみにしたい 2 2022/04/06 12:52
- Visual Basic(VBA) 改行ごとに行を追加し、数量を分割 4 2023/07/11 16:39
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) VBAでシートの保護をかける際に「書式設定の変更」を有効にする 1 2023/04/17 18:18
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルファイルを開く時、常...
-
エクセルの一部のセルの背景色...
-
Excel 特定のシートを印刷不可...
-
エクセル印刷時 一枚の書類に...
-
エクセルの行タイトルを特定の...
-
エクセルで行番号、列アルファ...
-
エクセルのシート名を印刷した...
-
エクセルで複数のシートを同じ...
-
マクロで印刷→セルの値から部数...
-
1ヶ月分の日付を一度に出す方法...
-
条件によって印刷するシートを...
-
特定のセルに数値が入っている...
-
エクセルで複数のシートの1枚目...
-
エクセルでシートの色がグレー...
-
エクセルのページ設定を他のペ...
-
【Excel】複数シートがあるエク...
-
カラーで一括印刷したいです
-
Excelでシートを複数シート選択...
-
エクセルのマクロで複数シート...
-
エクセルシート複数ページ印刷...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルファイルを開く時、常...
-
エクセルの一部のセルの背景色...
-
エクセル印刷時 一枚の書類に...
-
1ヶ月分の日付を一度に出す方法...
-
マクロで印刷→セルの値から部数...
-
エクセルの行タイトルを特定の...
-
エクセルのマクロで複数シート...
-
Excel 特定のシートを印刷不可...
-
エクセルで複数のシートの1枚目...
-
エクセルでのヘッダーをページ...
-
エクセルでシートの色がグレー...
-
エクセルで行番号、列アルファ...
-
条件によって印刷するシートを...
-
EXCELで複数のシートを同時に印...
-
エクセルのシート名を印刷した...
-
エクセルで複数のシートを同じ...
-
エクセルで、ヘッダーに他のシ...
-
EXCELで宛名だけ連続変更...
-
Excelであるシートだけ印刷でき...
-
エクセルの複数シートをNアップ...
おすすめ情報