Postupy: Zamykání sešitů prostřednictvím kódu programu

Článek
05/16/2015

Sešit aplikace Microsoft Office Excel můžete chránit tak, že uživatelé nemohou přidávat nebo odstraňovat listy a také programově Odemknout sešit.Volitelně můžete zadat heslo, uveďte, zda chcete struktura chráněn (takže se uživatelé nemohou pohybovat listy) a uveďte, zda má windows sešit chráněn.

Platí pro: Informace v tomto tématu se vztahují na projekty na úrovni dokumentu i na úrovni aplikace v Excelu 2013 a v Excelu 2010. Další informace najdete v tématu Dostupné funkce podle aplikací systému Office a typů projektu.

Ochrana sešitu nezastaví uživatelům úpravy buněk.K ochraně dat, musíte chránit listy.Další informace naleznete v tématu Postupy: Zamykání listů prostřednictvím kódu programu.

Následující příklady kódu používají proměnnou obsahovat heslo, získanou od uživatele.

Ochrana sešitu, který je součástí přizpůsobení úroveň dokument

Chcete-li zamknout sešit

Volání Protect metoda sešit a heslo.Použít následující příklad kódu, spustit v ThisWorkbook třídy nejsou v listu třídy.
```
Me.Protect(getPasswordFromUser)
```
```
this.Protect(getPasswordFromUser, missing, missing);
```

Odemknout sešit

Volání Unprotect metodu předání hesla, pokud je požadováno.Použít následující příklad kódu, spustit v ThisWorkbook třídy nejsou v listu třídy.
```
Me.Unprotect(getPasswordFromUser)
```
```
this.Unprotect(getPasswordFromUser);
```

Ochrana sešitu pomocí doplňku pro úroveň aplikace

Chcete-li zamknout sešit

Volání Protect metoda sešit a heslo.Tento příklad kódu používá aktivní sešit.Chcete-li použít tento příklad spustit kód z ThisAddIn tříd v projektu.
```
Me.Application.ActiveWorkbook.Unprotect(getPasswordFromUser)
```
```
this.Application.ActiveWorkbook.Protect(getPasswordFromUser);
```

Odemknout sešit

Volání Unprotect metoda aktivního sešitu, předání hesla, pokud je požadováno.Chcete-li použít tento příklad spustit kód z ThisAddIn tříd v projektu.
```
Me.Application.ActiveWorkbook.Protect(getPasswordFromUser)
```
```
this.Application.ActiveWorkbook.Unprotect(getPasswordFromUser);
```