Excel 2013 vba erstellt Arbeitsmappe für Benutzer in "Geschützte Ansicht" geöffnet

Question

Ich habe VBA-Code, der durch ein Arbeitsblatt dreht und Arbeitsmappen erstellt, die an Clients per E-Mail gesendet werden. Es ist ziemlich einfach, wirklich schreibt es die Ausgabedateien nach Eigene Dateien. Hier ist der Code speichern:

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

Wenn der worksbook geöffnet wird, Excel sagt:

geschützte Ansicht Büro ein Problem mit dieser Datei erkannt hat. Die Bearbeitung kann Ihren Computer beschädigen. Klicken Sie für weitere Details.

OK Ich weiß, was das bedeutet, aus unbekannten Gründen denkt Excel, dass diese Datei über Outlook gesendet oder aus dem Internet heruntergeladen wurde. Aber es war nicht. Ich habe versucht, die folgenden:

Speichern in verschiedenen Versionen/Dateiformate

Verwenden Speichern unter statt Speichern

Explizit aus geschützten Modus schalten. Der geschützte Modus ist jedoch nicht dasselbe wie die geschützte Ansicht.

Sicherlich "My Documents" wird nicht als "unsicheren" Ort angesehen.

Danke.

Answer 1

Wenn Sie Dateien im schreibgeschützten Modus speichern können, sollte dies wahrscheinlich eine Fehlermeldung beseitigen.

Dim path As String 

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

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

Sie versuchen .SaveCopyAs (Pfad) Methode ohne Code-Zeile an denen nur Lese-Einstellung, aber ich denke, es wird nicht helfen.

In welchem ​​Format versuchen Sie Ihre Datei zu speichern? Erscheint das Problem nur auf Ihrem PC oder haben Sie Ihre Makro-/Ausgabedateien auf anderen PCs getestet? Das Problem kann Dinge in der Systemregistrierung beinhalten.