Excel 2013 vba oluşturulmuş çalışma kitabı "Korunan Görünüm" içindeki kullanıcılar için açılır

Question

Bir çalışma sayfasından geçen ve istemcilere e-postayla gönderilen çalışma kitaplarını oluşturan VBA kodum var. Oldukça basit, gerçekten, çıktı dosyalarını Belgelerim'e yazar.

worksbook açıldığında

With wkbOutputBook 
.CheckCompatibility = False 
.Save 
.Close 
End With 

Excel diyor:

GÖRÜNÜM Ofisi bu dosyada bir sorun algıladı korumalı İşte kurtarmak kodudur. Düzenleme bilgisayarınıza zarar verebilir. Daha fazla bilgi için tıklayın.

Tamam Bunun ne anlama geldiğini biliyorum, nedeni bilinmeyen Excel'in bu dosyanın Outlook üzerinden gönderildiğini veya Internet'ten indirildiğini düşünüyor. Ama değildi. Açıkça korumalı modu kapatmak farklı versiyonları/dosya biçimleri

Kullanım Kaydet yerine Kaydet

yılında

Kaydet: Aşağıdaki denedim. Korumalı mod, Korumalı Görünümle aynı şey değildir.

Şüphesiz "Belgelerim" bir "güvenli olmayan" konum olarak kabul edilmez.

Teşekkürler.

Answer 1

Salt okunur modda kaydedilmiş dosyaları kabul ederseniz, bu muhtemelen bir hata mesajını ortadan kaldırmalıdır.

Dim path As String 

path = "full-path-with-filename-and-extension" 

With wkbOutputBook 
    .SaveCopyAs (path) 
    SetAttr (path), vbReadOnly 
    .Close 
End With 

Yalnızca okunur ayarı içeren kod satırı olmadan .SaveCopyAs (yol) yöntemi deneyin, ama yardımcı olmaz sanırım.

Dosyanızı hangi biçimde kaydetmeye çalışıyorsunuz? Sorun sadece PC'nizde mi görünüyor veya Makro/çıktı dosyalarınızı başka bilgisayarlarda test ettiniz mi? Sorun, sistem kayıt defterindeki maddeleri içerebilir.