Pinterest Pixel

Protect All Worksheets Using Macros In Excel

You can protect all worksheets using Macros in Excel! You will ask the user for the password... read more

Download Excel Workbook
Bryan
Posted on

Overview

You can protect all worksheets using Macros in Excel! You will ask the user for the password then use it to protect all of the worksheets in the file.

Make sure your Excel has the Developer Tab enabled following this tutorial.

I explain how you can do this below step by step!

What does it do?

Protects all worksheets with the user-given password

Copy Source Code:


Sub ProtectAllWorksheets()

Dim worksheet As Worksheet
Dim pword As String

'Get the password from the user
pword = InputBox("Enter a Password to Protect All Worksheets", "Password")

'Loop through the worksheets and protect all of them
For Each worksheet In ActiveWorkbook.Worksheets
worksheet.Protect Password:=pword 
Next worksheet

End Sub

Final Result: 

Protect All Worksheets Using Macros In Excel

Exercise Workbook:

Protect All Worksheets Using Macros In Excel | MyExcelOnline

Download excel workbookProtect-All-Worksheets.xlsm


This is our list of worksheets:

Protect All Worksheets Using Macros In Excel

STEP 1: Go to Developer > Code > Visual Basic

Protect All Worksheets Using Macros In Excel | MyExcelOnline

 

STEP 2: Paste in your code and Select Save. Close the window afterwards.

Protect All Worksheets Using Macros In Excel

 

STEP 3: Let us test it out!

Go to Developer > Code > Macros

Protect All Worksheets Using Macros In Excel | MyExcelOnline

 

See also  Delete Blank Worksheets Using Macros In Excel

Make sure your macro is selected. Click Run.

Protect All Worksheets Using Macros In Excel

Type in a password and click OK.

Protect All Worksheets Using Macros In Excel

With just one click, all of your worksheets are now protected!

 Protect All Worksheets Using Macros In Excel

 

How to Protect All Worksheets Using Macros In Excel

 

101 Macros Book

If you like this Excel tip, please share itEmail this to someone

email

Pin on Pinterest

Pinterest

Share on Facebook

Facebook

Tweet about this on Twitter

Twitter

Share on LinkedIn

Linkedin

Get Video Training

Advance your Microsoft Excel & Office Skills with the MyExcelOnline Academy!

Dramatically Reduce Repetition, Stress, and Overtime!
Exponentially Increase Your Chances of a Promotion, Pay Raise or New Job!

Learn in as little as 5 minutes a day or on your schedule.

Learn More!