Jak wyłączyć funkcje wycinania, kopiowania i wklejania w programie Excel?
Przypuśćmy, że masz skoroszyt z ważnymi danymi, które musisz chronić przed wycinaniem, kopiowaniem i wklejaniem. Jak to osiągnąć? W tym artykule przedstawiono metodę VBA, która umożliwia jednoczesne wyłączenie funkcji wycinania, kopiowania i wklejania w skoroszycie programu Excel.
Wyłącz funkcje wycinania, kopiowania i wklejania za pomocą kodu VBA
Wyłącz funkcje wycinania, kopiowania i wklejania za pomocą kodu VBA
Wykonaj następujące czynności, aby wyłączyć funkcje wycinania, kopiowania i wklejania w skoroszycie programu Excel.
1. W skoroszycie musisz wyłączyć funkcje wycinania, kopiowania i wklejania, naciśnij przycisk inny + F11 klawisze jednocześnie, aby otworzyć Microsoft Visual Basic for Applications okno.
2. w Microsoft Visual Basic for Applications kliknij dwukrotnie Ten zeszyt po lewej Projekt okienko, a następnie skopiuj i wklej poniższy kod VBA do pliku ThisWorkbook (kod) okno. Zobacz zrzut ekranu:
Kod VBA: wyłącz jednocześnie funkcje wycinania, kopiowania i wklejania w programie Excel
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. Następnie naciśnij inny + Q klawisze, aby wyjść z Microsoft Visual Basic for Applications okno.
Teraz nie możesz wycinać ani kopiować danych z tego skoroszytu, tymczasem danych skopiowanych z innych arkuszy lub skoroszytów nie można wkleić do tego skoroszytu.
Uwagi: Funkcja przeciągnij i upuść jest również wyłączona po uruchomieniu powyższego kodu VBA.
Powiązane artykuły:
- Jak wyłączyć kliknięcie prawym przyciskiem myszy na karcie arkusza w programie Excel?
- Jak wyłączyć menu prawego przycisku myszy w określonym arkuszu lub całym skoroszycie w programie Excel?
- Jak zapobiec lub wyłączyć tryb edycji, klikając dwukrotnie komórkę w programie Excel?
Najlepsze narzędzia biurowe
Kutools dla programu Excel rozwiązuje większość problemów i zwiększa produktywność o 80%
- Ponowne użycie: Szybko włóż złożone wzory, wykresy i wszystko, czego używałeś wcześniej; Szyfruj komórki z hasłem; Utwórz listę mailingową i wysyłaj e-maile ...
- Pasek Super Formula (łatwo edytować wiele wierszy tekstu i formuły); Układ do czytania (łatwe odczytywanie i edytowanie dużej liczby komórek); Wklej do filtrowanego zakresu...
- Scal komórki / wiersze / kolumny bez utraty danych; Podziel zawartość komórek; Połącz zduplikowane wiersze / kolumny... Zapobiegaj zduplikowanym komórkom; Porównaj zakresy...
- Wybierz Duplikat lub Unikalny Wydziwianie; Wybierz puste wiersze (wszystkie komórki są puste); Super Find i Fuzzy Find w wielu zeszytach ćwiczeń; Losowy wybór ...
- Dokładna kopia Wiele komórek bez zmiany odwołania do formuły; Automatyczne tworzenie odniesień do wielu arkuszy; Wstaw punktory, Pola wyboru i nie tylko ...
- Wyodrębnij tekst, Dodaj tekst, Usuń według pozycji, Usuń przestrzeń; Tworzenie i drukowanie podsumowań stronicowania; Konwertuj zawartość komórek i komentarze...
- Super filtr (zapisz i zastosuj schematy filtrów do innych arkuszy); Zaawansowane sortowanie według miesiąca / tygodnia / dnia, częstotliwości i innych; Specjalny filtr pogrubieniem, kursywą ...
- Połącz skoroszyty i arkusze robocze; Scal tabele na podstawie kluczowych kolumn; Podziel dane na wiele arkuszy; Konwersja wsadowa xls, xlsx i PDF...
- Ponad 300 zaawansowanych funkcji. Obsługuje Office / Excel 2007-2021 i 365. Obsługuje wszystkie języki. Łatwe wdrażanie w przedsiębiorstwie lub organizacji. Pełne funkcje 30-dniowa bezpłatna wersja próbna. 60-dniowa gwarancja zwrotu pieniędzy.

Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!


































