VBAのPasswordEncryptionKeyLengthプロパティ

こちらでは、エクセルVBAのPasswordEncryptionKeyLengthプロパティの解説になります。

プロパティとはオブジェクトの属性を指します。属性とは、そのオブジェクトの情報そのものです。プロパティはその値を取得したり、設定することもできます。プロパティを利用するにはオブジェクト名とプロパティ名の間に「.(ピリオド)」で結んで記述します。

オブジェクト名.プロパティ名

また、プロパティを設定する場合は以下のように「=(イコール)」を記述し設定値を代入します。

オブジェクト名.プロパティ名 = 設定値

PasswordEncryptionKeyLengthプロパティ

PasswordEncryptionKeyLengthプロパティは、指定されたブックのパスワードを暗号化するときに使用するアルゴリズムのキーの長さを示す長整数型 (Long) の値を返します。値の取得のみ可能です。

expression.PasswordEncryptionKeyLength
expression 必ず指定します。対象となるオブジェクトへの参照を返すオブジェクト式を指定します。
パスワード保護された指定のブックのファイルプロパティを暗号化するかどうかを指定するには、SetPasswordEncryptionOptions メソッドを使用します。
次の使用例は、指定されたブックのパスワード暗号化のキーの長さが 56 より短い場合は、パスワード暗号化オプションを設定します。


Sub SetPasswordOptions()

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

End Sub

※ドラッグ(スワイプ)すると全体を確認できます。