Workbook.HasPassword (Excel)

True, wenn die Arbeitsmappe ein Schutzkennwort besitzt.

Sie können einer Arbeitsmappe mithilfe der SaveAs -Methode ein Schutz Kennwort zuweisen.

Dim booHasPassword As Boolean
booHasPassword = ActiveWorkbook.HasPassword