Deaktivering slettealternativene i deg Microsoft Office Excel-programmet ved hjelp av Visual Basic for Applications , eller VBA , kan beskytte data i regneark som ikke bør endres . Bruk " Workbook_SheetBeforeRightClick " hendelse for å deaktivere "Delete " fra menylinjen . I VBA , kan du også beskytte regnearket ved å ikke tillate brukeren å slette alt innhold ved hjelp av " Delete"-tasten på tastaturet sitt . Instruksjoner
en

Launch Microsoft Office Excel , og skriv inn " 1" i " A1 ", " 2" i " A2 ", " 3" i " A3 ", " 4" i "A4 ", og " 5" i " A5 . " Klikk på " Utvikler " fanen , og klikk " Visual Basic " for å starte VB Editor .
2

Dobbeltklikk på " ThisWorkbook " fra Project Explorer -panelet for å åpne koden modulen.


3

Kopier og lim inn følgende kode for å deaktivere "Slett" i regnearket : en

Private Sub Workbook_SheetBeforeRightClick ( ByVal Sh som objekt, ByVal Target As Range, Cancel As Boolean )

Dim cmdBCntrl Som CommandBarControl

Dim pos As Integer

On Error Resume Next

Sh.Protect UserInterFaceOnly : = sant
p Med Application. . . CommandBars ( " Cell ")

pos = Controls ( " Slett ...") Index

Sett cmdBCntrl = Controls.Add . ( Før: = pos , Midlertidig : = sann)

. Controls ( " Slett ...") . Slett

End With

On Error GoTo 0

End Sub
4

Bytt tilbake til Microsoft Excel , og prøve å høyreklikke på en hvilken som helst celle . Menyen vil ikke inkludere " Slette" . Trykk på " Delete"-tasten på tastaturet , og du vil få en melding om at cellen er beskyttet.