VBA代码可将我的工作簿副本自动保存为只读

Question

我有一本工作簿，可以由多人共同工作并进行编辑，但是我希望能够保存所做的编辑而不必经常“另存为”。我想出了以下代码将工作簿的副本保存在其他位置，但是如何将其保存为只读文件，而每次有人进入并单击“保存”按钮都不会对其进行编辑？

先谢谢。

Sub Workbook_BeforeSave(ByVal _
  SaveAsUI As Boolean, Cancel As Boolean)
    With ThisWorkbook
        .SaveCopyAs ("G:\Admin\AG\backup of " & .Name)
    End With
End Sub

Answer 1

我过去一直沿用这些方式

Transform[] array = GameObject.FindGameObjectsWithTag("BtnCharacter");
foreach(var item in array)
{
   SaveList.Add(item.transform);
}