Deaktivering slettemulighederne i dig Microsoft Office Excel program ved hjælp af Visual Basic for Applications eller VBA , kan beskytte data i regneark , som ikke bør ændres. Brug " Workbook_SheetBeforeRightClick " begivenhed for at deaktivere "Slet " fra menulinjen. I VBA kan du også beskytter regnearket ved ikke at tillade brugeren at slette ethvert indhold ved hjælp af " Delete "-tasten på deres tastatur. Instruktioner
1
Launch Microsoft Office Excel , og skriv " 1" i "A1 ", " 2" i " A2 ", " 3 " i " A3 ", " 4 " i " A4 " og "5 " i " A5 ". Klik på " Udvikler " fanen, og klik på " Visual Basic " for at starte VB -editoren.
2
Dobbeltklik på " ThisWorkbook " fra Project Explorer ruden for at åbne koden modulet.
< br >
3
Kopier og indsæt følgende kode til at deaktivere "Delete" på regnearket : Hej
Private Sub Workbook_SheetBeforeRightClick ( ByVal Sh As Object , ByVal Target Som Range , Annuller Som Boolean ) < br >
Dim cmdBCntrl Som CommandBarControl
Dim pos As Integer
On Error Resume Next
Sh.Protect UserInterFaceOnly : = Sand
Med Application . . . CommandBars ( " celle" )
pos = Controls ( "Delete ...") Index
Set cmdBCntrl = Controls.Add . ( Før: = pos, Midlertidig : = Sand ) Salg
. Controls ( "Delete ...") . Slet
End With
Fejl GoTo 0
End Sub
4
Skift tilbage til Microsoft Excel, og prøv højreklik på enhver celle. Menuen vil ikke omfatte "Slet" valgmulighed. Tryk på " Delete "-tasten på dit tastatur , og du vil få en meddelelse om, at cellen er beskyttet.