VBA Şifrelenmis Worksheet'lerin Şifresini Kaldırmak

195 Okunma VBA

Çalıştığınız "worksheet" ler şifrelenmiş ve koruma altındaysa ve bu korumayı kaldırmak istiyorsanız aşağıdaki macro kodunu kullanabilirsiniz. 

Sub SifreKaldir() 
   Dim ws As Worksheet 
   Dim password As String 
   password = "Test123" 
   For Each ws In Worksheets 
   ws.Unprotect password:=password 
   Next ws
End Sub
  • Not: Bu kodda geçen şifre metni, koruma altına aldığınız şifre ile aynı olmalıdır. Yani koruma altına almak için hangi şifreyi kullandıysanız korumayı kaldırmak için de aynı şifreyi kullanmak zorundasınız.
VBA

İlginizi Çekebilir

VBA Bir Stringin Büyük Harfe Çevrilmesi

VBA Bir Stringde Tam Sayılar Dışındaki Karakterleri Kaldırma Örne ...

VBA Aktif Olan Dışındaki Tüm Worksheet'leri Gizlemek

VBA Bir Stringdeki Noktalama İşaretlerini Kaldırma Örneği

VBA 1'den N'e Kadar Olan Sayıların Toplamını Bulma Örneği