ActiveWorkbook Property

expression.ActiveWorkbook

expression    Required. An expression that returns a Spreadsheet object.

Example

This example protects the structure of the open workbook in Spreadsheet1.

Speadsheet1.ActiveWorkbook.Protect , True