Document.SetPasswordEncryptionOptions メソッド (Word)

  • [アーティクル]

パスワードが設定されている文書の暗号化に使用されるオプションを設定します。

構文

expression. SetPasswordEncryptionOptions( _PasswordEncryptionProvider_ , _PasswordEncryptionAlgorithm_ , _PasswordEncryptionKeyLength_ , _PasswordEncryptionFileProperties_ )

expression 必須です。 Document オブジェクトを表す変数を指定します。

パラメーター

名前 必須 / オプション データ型 説明
PasswordEncryptionProvider 必須 String 暗号化プロバイダーの名前を指定します。
PasswordEncryptionAlgorithm 必須 String 暗号化のアルゴリズムの名前を指定します。 Word ではストリーム暗号化アルゴリズムがサポートされています。
PasswordEncryptionKeyLength 必須 長整数型 (Long) 暗号化のキーの長さを指定します。 40 以上の 8 の倍数にする必要があります。
PasswordEncryptionFileProperties 省略可能 バリアント型 (Variant) True を指定 するファイルのプロパティを暗号化します。 既定では true を指定 します。

注釈

セキュリティを強化するために、Weak Encryption (XOR) ("OfficeXor" とも呼ばれます) または "Office97/2000 Compatible" ("OfficeStandard" とも呼ばれます) アルゴリズムを使用しないでください。

例

次の使用例は、使用中のパスワード暗号化アルゴリズムが "OfficeXor" または "OfficeStandard" の場合に、より強固な暗号化を使用するパスワード暗号化を設定します。

Sub PasswordSettings() 
 With ActiveDocument 
 If .PasswordEncryptionAlgorithm = "OfficeXor" Or _ 
 .PasswordEncryptionAlgorithm = "OfficeStandard" Then 
 
 .SetPasswordEncryptionOptions _ 
 PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _ 
 PasswordEncryptionAlgorithm:="RC4", _ 
 PasswordEncryptionKeyLength:=56, _ 
 PasswordEncryptionFileProperties:=True 
 
 End If 
 End With 
End Sub

関連項目

ドキュメント オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。