Hogyan lehet letiltani a vágási, másolási és beillesztési funkciókat az Excelben?

Tegyük fel, hogy van egy munkafüzete fontos adatokkal, amelyeket meg kell védenie a kivágás, másolás és beillesztés ellen. Hogyan lehet elérni? Ez a cikk egy VBA-módszert ismertet a vágási, másolási és beillesztési funkciók egyidejű letiltására az Excel munkafüzetében.

Tiltsa le a VBA kóddal a kivágás, másolás és beillesztés funkciókat

Tiltsa le a VBA kóddal a kivágás, másolás és beillesztés funkciókat

Kérjük, tegye a következőket az Excel munkafüzet kivágási, másolási és beillesztési funkcióinak letiltásához.

1. A munkafüzetben le kell tiltania a kivágás, másolás és beillesztés funkciókat, nyomja meg a gombot más + F11 gombok egyszerre a Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablak, kattintson duplán Ez a munkafüzet balra NetPoulSafe projekt ablaktáblán, majd másolja és illessze be az alábbi VBA kódot a Ez a munkafüzet (kód) ablak. Lásd a képernyőképet:

VBA-kód: Tiltsa le egyszerre a kivágás, másolás és beillesztés funkciókat az Excelben

Private Sub Workbook_Activate()
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub

Private Sub Workbook_Deactivate()
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.CellDragAndDrop = True
Application.OnKey "^c"
Application.CutCopyMode = False
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.CutCopyMode = False
End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
Application.CutCopyMode = False
End Sub

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Application.CutCopyMode = False
End Sub

3. Ezután kérjük nyomja meg a gombot más + Q gombokkal lépjen ki a Microsoft Visual Basic for Applications ablak.

Most nem vághatja ki vagy másolhatja le az adatokat erről a munkafüzetről, miközben más lapokról vagy munkafüzetekről másolt adatokat nem lehet beilleszteni ebbe a munkafüzetbe.

Megjegyzések: A drag and drop funkció szintén le van tiltva a fenti VBA kód futtatása után.

Kapcsolódó cikkek:

• Hogyan lehet letiltani a jobb egérgombbal az Excel lap lapját?
• Hogyan lehet letiltani a jobb egérgombbal indított menüt a megadott munkalapon vagy az Excel teljes munkafüzetében?
• Hogyan lehet megakadályozni vagy letiltani a szerkesztési módot az Excel cellájára való dupla kattintással?

---

A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

• újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
• Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
• Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
• Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
• Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
• Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
• Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
• Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
• Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.

Tovább ... Ingyenes letöltés... Vásárlás... 

---

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

• Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
• Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
• 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!

Tovább ... Ingyenes letöltés... Vásárlás...