Wanted to protect your active worksheet programmatically? We will show you how to protect the active worksheet using Macros in Excel!

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 the active worksheet with the password specified by the user

Copy Source Code:


Sub ProtectActiveWorksheet()

Dim pword As String

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

'Protect the Active Worksheet
ActiveSheet.Protect pword, True, True
End Sub

Final Result: 

Protect Active Worksheet Using Macros In Excel | MyExcelOnline

Exercise Workbook:

YouTube video
Protect Active Worksheet Using Macros In Excel | MyExcelOnline

DOWNLOAD EXCEL WORKBOOK


Here are our worksheets:

Protect Active Worksheet Using Macros In Excel | MyExcelOnline

STEP 1: Go to Developer > Code > Visual Basic

Protect Active Worksheet Using Macros In Excel | MyExcelOnline

 

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

Protect Active Worksheet Using Macros In Excel | MyExcelOnline

 

STEP 3: Let us test it out!

Select your sheet to protect. For our example let us select the Americas worksheet.

Go to Developer > Code > Macros

Protect Active Worksheet Using Macros In Excel | MyExcelOnline

Make sure your macro is selected. Click Run.

Protect Active Worksheet Using Macros In Excel | MyExcelOnline

Type in the password to protect the worksheet. Click OK.

Protect Active Worksheet Using Macros In Excel | MyExcelOnline

Try editing your worksheet. You can verify that the worksheet is now protected!

 Protect Active Worksheet Using Macros In Excel | MyExcelOnline

 

How to Protect Active Worksheet Using Macros In Excel

 

101 Macros Book

HELPFUL RESOURCES:

JOIN OUR FREE EXCEL COURSES BELOW
Click here to access these FREE Excel courses!

 

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