Cum să împiedicați mutarea sau copierea registrului dvs. de lucru Excel

Furtul de date poate fi minimizat prin dezactivarea diferitelor funcții de meniu și clic dreapta în Excel. Vom discuta mai jos cum să faceți acest lucru folosind VBA.

Se presupune că cititorul are afișată panglica Excel Developer și este familiarizat cu Editorul VBA.

Interfața cu utilizatorul

Construiți o foaie de lucru cu două butoane și puține date. 

Această foaie va avea afișată panglica și toată funcționalitatea de clic dreapta pe care o oferă Excel.

Foaia este disponibila aici.

Codul VBA

Există o varietate de comenzi din bara de comandă care pot fi dezactivate. Va trebui să căutați pe Google numerele de identificare ale acestor comenzi. Vom folosi ID-urile 19 și 21 pentru acest exercițiu.

Sub Auto_Open()    ‘Auto_open runs automatically when the workbook is opened
    Dim Control As Office.CommandBarControl

    Application.CommandBars("ply").Enabled = False     'disables right-Click on sheet tab

    For Each Control In Application.CommandBars.FindControls(ID:=21)    'disables CUT
        Control.Enabled = False
    Next Control

    For Each Control In Application.CommandBars.FindControls(ID:=19)     'disables COPY
        Control.Enabled = False
    Next Control
    Application.CellDragAndDrop = False
 
    Application.ExecuteExcel4Macro "Show.ToolBar(""Ribbon"", False)"     'Hides ribbon
End Sub

Sub Restore()
    Application.CommandBars("ply").Enabled = True     'enables right-click on sheet tab

    Dim Control As Office.CommandBarControl

    For Each Control In Application.CommandBars.FindControls(ID:=21)     'enables CUT
        Control.Enabled = True
    Next Control

    For Each Control In Application.CommandBars.FindControls(ID:=19)     'enables COPY
        Control.Enabled = True
    Next Control
    Application.CellDragAndDrop = True

    Application.ExecuteExcel4Macro "Show.ToolBar(""Ribbon"", True)"     'shows ribbon
End Sub

Sub Auto_close()    
    Call Restore    ‘Ensure other workbooks work properly
End Sub

Atribuiți butonul Restaurare pentru sub Restaurare și butonul Dezactivare pentru deschidere secundară.

Rulați codul Auto_open; veți observa că Cut și Copy sunt dezactivate în meniul de clic dreapta și că panglica a dispărut. De asemenea, nu veți putea muta foaia într-un alt registru de lucru din fila foaie.

Vor exista întotdeauna modalități de a evita aceste măsuri de precauție, dar scopul este acela de a face dificilă pentru toți, cu excepția hackerului serios; protejarea foii de calcul este un alt factor de descurajare, precum și asigurarea că aceasta nu poate fi copiată direct dintr-un subdosar.

În cele din urmă, protejați-vă codul de a fi vizualizat sau modificat:  Instrumente>Proprietăți>Protecție.

Corupția fișierului Excel

„Am dedupat dosarul; acum mă confrunt cu eșecuri Excel fără niciun motiv vizibil. Cu toate acestea, încă mă aștept să fiu terminat astăzi.”

Dacă acest lucru are un final fericit sau nu, ar putea depinde de dacă utilizatorul are sau nu un instrument eficient cu care să facă repara Excel. În cazul de față, foaia de calcul avea peste 90,000 de rânduri.

Introducerea autorului:

Felix Hooker este un expert în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv reparare fișiere rar și produse software de recuperare sql. Pentru mai multe informații vizitați www.datanumen.com