Vba kullanarak bir sayfayı koruma / korumadan kaldirma nasıl yapılır?

VBA’da sayfa ile kullanabileceğiniz PROTECT yöntemi vardır. Bu yöntemde, bir sayfayı şifreli veya şifresiz koruma seçeneğiniz vardır. Ayrıca bir nesneyi sayfadan da koruyabilirsiniz. Tüm bunları bu eğitimde ayrıntılı olarak göreceğiz.

Eğitimde, VBA kodunu kullanarak tek bir sayfayı veya birden fazla sayfayı nasıl koruyacağımızı ve korumasının nasıl kaldırılacağını göreceğiz.

Bir sayfayı korumak için VBA kodunu yazın

Bir sayfayı korumak için önce sayfayı belirtmeniz, ardından koruma yöntemini kullanmanız gerekir. İşte adımlar.

  1. Sayfayı belirtmek için sayfalar nesnesini kullanın.
  2. Korumak istediğiniz sayfanın adını girin.
  3. Yöntem ve özelliklerin listesini almak için bir nokta yazın.
  4. Proje yöntemini seçin veya girin.
korunacak-sayfayı-belirlemek için-sayfa-nesnesini-kullan
 Sheets("Sheet1").Protect

Yararlı bağlantılar: Makro çalıştırmaMakro kaydediciVisual Basic DüzenleyiciKişisel Makrolar El Kitabı

Bir sayfanın korumasını kaldırmak için VBA kodunu yazın

Bir sayfayı korumak için önce sayfayı belirtmeniz, ardından korumayı kaldırma yöntemini kullanmanız gerekir. İşte adımlar.

  1. Sayfa nesnesini kullanarak sayfayı belirtin.
  2. Daha sonra korumak istediğiniz sayfanın adını girin.
  3. Yöntem ve özelliklerin listesini almak için bir nokta girin.
  4. “Korumayı Kaldır” yöntemini seçin veya girin.
koruması kaldırılacak sayfayı belirtmek için sayfa nesnesini kullanın
 Sheets("Sheet1").Unprotect

Bir sayfayı parolayla koruma

Bir sayfayı korurken parola ayarlamak istiyorsanız bu durumda parola belirlemek için parola bağımsız değişkenini kullanmanız gerekir. Diyelim ki sayfayı korumak için “test123” şifresini ayarlamak istiyorsunuz, kod aşağıdaki gibi olacaktır.

-bir-sayfayı-şifreyle-koru
 Sheets("Sheet1").Protect Password:="test123"

Bir sayfanın korumasını parolayla kaldırma

Benzer şekilde, bir sayfanın korumasını kaldırmak istiyorsanız parola argümanında parolayı belirtmeniz gerekir. Sayfayı korumak için kullandığınız şifrenin “ADSBP” olduğunu varsayalım, dolayısıyla korumayı kaldıracak kod aşağıdaki gibi olacaktır.

 Sheets("Sheet1").Unprotect Password:="ADSBP"

Dikkat etmeniz gereken bir şey var, büyük harfe dikkat edin çünkü VBA büyük ve küçük harf ayrımı yapıyor.

Bilinmesi gereken diğer şeyler

Dediğim gibi VBA’nın “Protect” yöntemini kullanıyoruz ve bu yöntemle “Password” dışında kullanabileceğiniz argümanlar da mevcut.

 expression.Protect (Password, DrawingObjects, Contents, Scenarios, UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns, AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows, AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows, AllowSorting, AllowFiltering, AllowUsingPivotTables)
  1. DrawingObjects : Şekilleri korumak ve korumayı kaldırmak için.
  2. İçerik : Kilitli hücreleri ve tüm grafiği korumak İÇİN.
  3. Senaryolar : Elektronik tablodaki senaryoları korumak için.
  4. UserInterfaceOnly : Makroları değil, yalnızca kullanıcı arayüzünü korumak için.
  5. AllowFormattingCells : Kullanıcının hücrelere biçimlendirme uygulamasına izin vermek için.
  6. AllowFormattingColumns : Kullanıcının sütunlara biçimlendirme uygulamasına izin vermek için.
  7. AllowFormattingRows : kullanıcının satırlara biçimlendirme uygulamasına izin vermek için.
  8. AllowInsertingColumns : kullanıcının yeni sütunlar eklemesine izin vermek için.
  9. AllowInsertingRows : Kullanıcının yeni satırlar eklemesine izin vermek için.
  10. AllowInsertingHyperlinks : Kullanıcının köprüler oluşturmasına izin vermek için.
  11. AllowDeletingColumns : kullanıcının sütunları silmesine izin vermek için.
  12. AllowDeletingRows : Kullanıcının satırları silmesine izin vermek için.
  13. Sıralamaya izin ver : Kullanıcının satırları, sütunları ve tabloları sıralamasına olanak tanır.
  14. AllowFiltering : Sütunların filtrelenmesine izin vermek için.
  15. AllowUsingPivotTables : Kullanıcının pivot tablo kullanmasına izin vermek için.

Yorumlar

  • Büyük ve küçük harfleri, sayıları ve simgeleri birleştiren güçlü şifreler kullandığınızdan emin olun.
  • Parolanızı unutursanız Microsoft parolanızı kurtaramaz. Bu nedenle şifrenizi güvenli bir yere yazdığınızdan emin olun.
  • Bir sayfa şifresiz korunuyorsa ve şimdi onu şifreyle korumak istiyorsanız, önce korumayı kaldırmalısınız. Daha sonra yukarıda gördüğünüz kodu kullanarak şifre ile tekrar koruma altına alın.

Yorum ekle

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