werkblad beveiligen voor verwijderen

[Kosjka]

Hallo mensen,
Ik werk in Excel en maak af en toe mee dat ik per ongeluk een werkblad verwijder (ik werk met een pen ipv een muis) door het weg te slepen.
Weet iemand of er een mogelijkheid is om werkbladen daarvoor te beveiligen? Dat ze niet te verwijderen zijn?

Groet,
Caroline

 

[Excelbat]

Klik met je rechtermuisknop (rechter kant van je pen ???) op de naam van het tabblad en kies 'beveiligen'.
That's all.

Greetz/Excelbat

 

[cow18]

In de module van je gewenste werkblad zet je onderstaande macro, eventueel kan zoiets ook op werkmapniveau via ThisWorkbook en Private Sub Workbook_SheetBeforeDelete(ByVal Sh As Object)

Private Sub Worksheet_BeforeDelete()

    ThisWorkbook.Protect ("password") 'beveiligen van de ganse werkmap, eventueel met paswoord
    MsgBox "Werkmap is vergrendeld, dit werkblad mocht niet worden verwijderd !", vbExclamation

End Sub

via een macro in een gewone module kan je dan je werkmap weer ontgrendelen

Sub Ontgrendelen()
    ThisWorkbook.Unprotect "password"
End Sub

 

[Kosjka]

De eerste lijkt me, voor mij, de gemakkelijkste. Als dat neit werkt zal ik de tweede nader bekijken. Of me dat zal lukken.

Dank jullie wel voor de snelle reactie.

 

[Kosjka]

Helaas, bij de eerste optie krijg ik niet de mogelijkheid dat ik voorkom dat ik het tabblad verwijder. Ik ga die tweede uitpuzzelen

 

[Kosjka]

Probleem is opgelost. Waar ik dacht dat ik de werkbladen verwijderde blijkt dat dat niet zomaar kan, sowieso niet. Je krijgt dan altijd de vraag of je ze echt en definiteif wilt verwijderen.
Wat ik blijkbaar deed was de werkbladen verbergen. Dus die zijn vrij eenvoudig weer terug te krijgen.

Dank jullie voor het meedenken.