Zabezpečenie Word a Excel dokumentov

Obsah článku

Nenechaj v tom známych samých – zdieľaj

Citlivé dokumenty si vyžadujú nielen šifrovanie, ale aj možnosť automatickej likvidácie obsahu. Zabezpečenie Word a Excel súborov preto neznamená len ochranu heslom, ale aj schopnosť dokument zničiť v správny čas. V tomto článku predstavujem efektívne spôsoby, ako zabezpečiť dokumenty vo Worde a Exceli a ako automaticky zmazať ich obsah na základe špecifických podmienok. Preto všetky riešenia využívajú VBA skripty v činnom rode a ponúkajú prechod medzi jednotlivými scenármi zabezpečenia.

1. Zabezpečenie heslom

Používateľ nastaví heslo priamo v dokumente:

Vo Worde klikne na Súbor > Informácie > Ochrániť dokument > Zašifrovať heslom.
V Exceli postupuje cez Súbor > Informácie > Ochrániť zošit > Zašifrovať heslom.

Po zadaní hesla sa dokument zašifruje pomocou algoritmu AES-256. Tento krok zabezpečí dokument pred neoprávneným prístupom.

2. Vymazanie obsahu po určitom dátume

Používateľ vloží nasledujúcu VBA rutinu do dokumentu pomocou Visual Basic for Applications:

Private Sub Document_Open()
    If Date &gt; #6/1/2025# Then
        ThisDocument.Content.Delete
    End If
End Sub

Private Sub Document_Open()

If Date > #6/1/2025# Then

ThisDocument.Content.Delete

End If

End Sub

Používateľ nahradí dátum vlastným termínom. Po uplynutí tohto dátumu sa obsah automaticky zmaže. V Exceli sa použije nasledovný kód:

Private Sub Workbook_Open()
    If Date &gt; #6/1/2025# Then
        Worksheets(1).Cells.ClearContents
    End If
End Sub

Private Sub Workbook_Open()

If Date > #6/1/2025# Then

Worksheets(1).Cells.ClearContents

End If

End Sub

3. Vymazanie obsahu po prečítaní

Používateľ zabezpečí okamžité vymazanie po otvorení dokumentu:

Private Sub Document_Open()
    MsgBox "Toto je jednorazový dokument."
    ThisDocument.Content.Delete
End Sub

Private Sub Document_Open()

MsgBox "Toto je jednorazový dokument."

ThisDocument.Content.Delete

End Sub

Táto metóda sa hodí pre jednorazové dokumenty. V Exceli sa skript upraví nasledovne:

Private Sub Workbook_Open()
    MsgBox "Tento súbor sa po prečítaní zmaže."
    Worksheets(1).Cells.ClearContents
End Sub

Private Sub Workbook_Open()

MsgBox "Tento súbor sa po prečítaní zmaže."

Worksheets(1).Cells.ClearContents

End Sub

4. Vymazanie obsahu po počte otvorení

Používateľ vytvorí počítadlo otvorení uložené v systémovom nastavení:

Private Sub Document_Open()
    Dim opens As Integer
    opens = GetSetting("MySecureDoc", "Counter", "Opens", 0)
    opens = opens + 1
    SaveSetting "MySecureDoc", "Counter", "Opens", opens

    If opens &gt; 3 Then
        ThisDocument.Content.Delete
    End If
End Sub

Private Sub Document_Open()

Dim opens As Integer

opens = GetSetting("MySecureDoc", "Counter", "Opens", 0)

opens = opens + 1

SaveSetting "MySecureDoc", "Counter", "Opens", opens

If opens > 3 Then

ThisDocument.Content.Delete

End If

End Sub

Skript pri každom otvorení zvyšuje hodnotu. Po prekročení nastaveného limitu sa obsah automaticky zmaže. V Exceli sa tento princíp použije v procedúre Workbook_Open().

5. Praktické odporúčania

Používateľ upozorní príjemcu, že dokument obsahuje makrá a vyžaduje ich povolenie. Preto kombinácia hesla a VBA skriptu výrazne zvyšuje úroveň ochrany. Zároveň odporúčam vyhýbať sa zverejňovaniu takýchto dokumentov bez doplnkovej šifrovacej vrstvy.

Tieto metódy predstavujú praktický doplnok k bežnej ochrane a umožňujú časovo obmedzený prístup k citlivým informáciám. Netreba však zabúdať, že skúsený používateľ môže makrá deaktivovať. Preto je vhodné aplikovať zabezpečenie Word a Excel súborov v kombinácii s ďalšími bezpečnostnými technikami. V prípade správy citlivých údajov odporúčam zvážiť aj použitie digitálneho podpisu na overenie integrity dokumentu. Rovnako je dôležité pravidelne aktualizovať používaný softvér, aby ste minimalizovali riziko zneužitia známych zraniteľností. Nakoniec, vždy informujte príjemcov o bezpečnostných opatreniach a správnom zaobchádzaní s dokumentom.