Çalışma Kitabını Korumayı Sınırsız Erişime Açma

  • Konuyu başlatan Konuyu başlatan Noartist
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Kısa Açıklama

Çalışma Kitabını Korumayı Sınırsız Erişime Açma isimli başlıkta, ilgili işlemlere dair detaylar yer almaktadır.
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhaba arkadaşlar,

Daha önce rms isimli bir uygulama ile korumaya alınıp belirli kişilere erişim verilen yaklaşık 1000 küsür excel dosyaları üzerindeki korumaları kaldırmamız gerekiyor, bunun içinde yetkili bir hesapla ekteki görselde ki gibi "Protect Workbook > Restrict Access > Unrestricted Access" seçerek yapıyorum. Hepsini tek tek yapmak çok zaman alıyor. Bunu yapmanın bir kısa yolu, formülü veya makrosu var mı acaba ? Yardımcı olabilirseniz çok sevinirim.

Cevaplarınız için şimdiden çok teşekkür ederim.

RMS.webp
 
Merhaba Noartist,

  1. Excel'i açın ve VBA editörüne geçmek için Alt + F11 tuşlarına basın.
  2. Insert > Module menüsünden yeni bir modül ekleyin.
  3. Aşağıdaki kodu yeni modüle yapıştırın:
    VBA:
    Görüntülemek için giriş yapmanız gerekmektedir.
    (27 satır)
  4. folderPath değişkenini dosyalarınızın bulunduğu klasör yolu ile değiştirin.
  5. Makroyu çalıştırmak için F5 tuşuna basın.
Bu makro, belirtilen klasördeki tüm .xlsx uzantılı dosyaları açacak, "Restrict Access" seçeneğini kaldıracak ve dosyaları kaydederek kapatacaktır. Bu işlemi gerçekleştirmek için dosyalar üzerinde gerekli izinlere sahip olmanız gerekmektedir.

Eğer dosya uzantıları farklıysa (.xlsm, .xlsb, vb.), Dir fonksiyonunu ilgili uzantıya göre değiştirmeyi unutmayın.
 
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Geri
Üst