2

誰かが次のシナリオで私を助けてくれませんか: 読み取り、読み取りと実行、書き込み、変更、フル コントロールなどの異なるセキュリティ アクセス権を持つ特定の Excel シートのコピー (複製) を作成する必要があります (これらのオプションは、ファイルのプロパティを確認すると表示されます) ）。

ワークブックを複製するとき、マクロはユーザーにセキュリティ アクセスの組み合わせのいずれかを選択するように求め、ユーザーが [OK] をクリックすると、そのアクセスでファイルが生成されます。

このようなシナリオは、Excel VBA マクロを使用して実現できますか。達成するためにどの API または関数を使用する必要がありますか。

誰かが私を正しい方向に向けてください。それは大きな助けになるでしょう。

4

1 に答える 1

0

私はこれをテストしました。質問をし、現在の読み取りモードに応じて再度開きます。これは明らかにあなたのニーズに合わせて調整されます。

ファイルを別のモードで再度開くだけで、コピーすることはありません。

Private Sub Workbook_Open()

    With ThisWorkbook
    Stop
        If .ReadOnly Then
            If MsgBox("Change to write mode?", vbYesNo) = vbYes Then
                .ChangeFileAccess xlReadWrite
            End If
        Else
            If MsgBox("Change to read only mode?", vbYesNo) = vbYes Then
                .ChangeFileAccess xlReadOnly
            End If
        End If
    End With

End Sub
于 2013-05-09T09:54:38.810 に答える