VBA Tüm Worksheet'leri Şifrelemek

28 Okunma VBA

VBA ile çalıştığınız tüm "worksheet" leri şifreleyip koruma altına almak istiyorsanız, aşağıdaki macro kodunu kullanabilirsiniz.. 

Sub Sifrele() 
   Dim ws As Worksheet 
   Dim password As String 
   password = "Test123"
   For Each ws In Worksheets 
    ws.Protect password:=password 
   Next ws 
End Sub
VBA

İlginizi Çekebilir

VBA Bir Stringdeki Her Karakterin Sayısını Bulma Örneği

VBA Dosya Varsa Oluşturmama

VBA Sayıların Geometrik Ortalamasını Bulma Örneği

VBA Tüm Pivot Tabloları Refresh Etmek

VBA Dikdörtgenin Alanını Hesaplama Örneği