SetPasswordEncryptionOptions 方法

使用密码来设置对工作簿进行加密的选项。

expression   必需。该表达式返回“应用于”列表中的对象之一。

PasswordEncryptionProvider   Variant 类型，可选。区分大小写的加密技术提供商的字符串。

PasswordEncryptionAlgorithm   Variant 类型，可选。区分大小写的算法简称的字符串（例如“RC4”）。

PasswordEncryptionKeyLength   Variant 类型，可选。加密密钥的长度，为 8 的倍数（40 或更大）。

PasswordEncryptionFileProperties   Variant 类型，可选。如果为 True（默认值），则加密文件的属性。

说明

PasswordEncryptionProvider、PasswordEncryptionAlgorithm 和 PasswordEncryptionKeyLength 参数不相互独立。选定的加密提供商限制了可以选择的算法和密钥长度的设置。

对于 PasswordEncryptionKeyLength 参数来说，没有固定的对密钥长度范围的限制。该范围是由“加密服务提供商”确定的，同时还确定加密算法。

示例

本示例设置活动工作簿的密码加密选项。

Sub SetPasswordOptions()

    ActiveWorkbook.SetPasswordEncryptionOptions _
        PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
        PasswordEncryptionAlgorithm:="RC4", _
        PasswordEncryptionKeyLength:=56, _
        PasswordEncryptionFileProperties:=True

End Sub