Parola Korumalı Çalışma Sayfası: Çalışma Sayfasını Kapatırken Parolayla Korumak için VBA Kodu

Kapatıldığında Çalışma Sayfasını Parolayla Korumak için VBA Kodu
İçindekiler

Password Protect Worksheet on Close with VBA (with Images)

Ne bu mu:

When you want others to only view the workbook data and no editing should be permitted then you have to make sure you protect the workbook with password while closing it. So that even if someone tries to edit the data it will ask for the password unless they input the password data will not be editable.

The manual way of doing the same is

Gözden geçirmekProtect Sheet and then Kaydetmek workbook.

Password Protect

Neden bu mu:

If you make frequent updates in the workbook then Every time when you make changes in the workbook you have to make sure you protect it while closing. Some day if you forget to protect then the data will be editable by others.

The below VBA code will help you to protect the workbook automatically while closing the workbook. That means you don’t have to protect it manually everything when you make changes in the workbook.

Nasıl to password protect with VBA upon Close:

Step 1: Open the workbook that need to be protected and press Alt + F11




Adım 2: Aşağıdaki kodu VBA düzenleyici penceresine kopyalayıp yapıştırın ve çalışma kitabını kaydedin.

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Sheets(“Sheet1″).Protect Password:=”Your Password Here”   ‘Replace “Sheet1” with your sheet name and “Your Password Here” with the password of your choice.

ActiveWorkbook.Save

Son Alt

Not: Workbook should be saved in a macro enabled format (.xlm, .xlsm, .xlsb etc.) also make sure you protect the VBA code as well. 🙂

That’s It Now Onward your Data will be Safe Always!!

Anson Antony
Anson Antony
Anson katkıda bulunan bir yazar ve kurucudur. www.askeygeek.com. Yeni bir şeyler öğrenmek her zaman onun tutkusu olmuştur, ASKEYGEEK.com teknoloji ve iş tutkusunun bir sonucudur. İş Süreci Dış Kaynak Kullanımı, Finans ve Muhasebe, Bilgi Teknolojisi, Operasyonel Mükemmellik ve İş Zekası alanlarında on yıllık çok yönlü bir deneyime sahiptir. Görev süresi boyunca Genpact, Hewlett Packard, M*Modal ve Capgemini gibi kuruluşlarda çeşitli rol ve sorumluluklarda çalıştı. İş ve teknoloji dışında, birlikte saatlerce Sinema ve Film Yapımcısı izleyerek ve öğrenen bir film tutkunu!

Bir yanıt yazın

E-posta adresiniz yayınlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

Tebrikler!
Başardın,
Kapatmayın!

Yukarı Çık 60.000 Ücretsiz UberTTS Karakter Kredisi!!!

Bu açılır pencere gösterilmeyecek size kalmış Tekrar!!!

UberTTS
Share to...