Excel'de kes, kopyala ve yapıştırma fonksiyonlarını nasıl devre dışı bırakılır?

Diyelim ki önemli veriler içeren bir çalışma kitabınız var ve bu verilerin kesilmesini, kopyalanmasını ve yapıştırılmasını engellemeniz gerekiyor. Bunu nasıl başarabilirsiniz? Bu makale, Excel çalışma kitabında aynı anda kesme, kopyalama ve yapıştırma fonksiyonlarını devre dışı bırakmak için size bir VBA yöntemi sunar.

VBA kodu ile kes, kopyala ve yapıştırma fonksiyonlarını devre dışı bırakma

VBA kodu ile kes, kopyala ve yapıştırma fonksiyonlarını devre dışı bırakma

Lütfen bir Excel çalışma kitabında kesme, kopyalama ve yapıştırma fonksiyonlarını devre dışı bırakmak için aşağıdaki adımları izleyin.

1. Kesme, kopyalama ve yapıştırma fonksiyonlarını devre dışı bırakmanız gereken çalışma kitabında, lütfen Microsoft Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına aynı anda basın.

2. Microsoft Visual Basic for Applications penceresinde, lütfen sol Proje bölmesinde ThisWorkbook öğesine çift tıklayın ve ardından aşağıdaki VBA kodunu ThisWorkbook (Kod) penceresine kopyalayıp yapıştırın. Ekran görüntüsüne bakın:

VBA Kodu: Excel'de aynı anda kesme, kopyalama ve yapıştırma fonksiyonlarını devre dışı bırakma

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. Ardından lütfen Microsoft Visual Basic for Applications penceresinden çıkmak için Alt + Q tuşlarına basın.

Şimdi bu çalışma kitabından veri kesemez veya kopyalayamazsınız; aynı zamanda, diğer sayfalar veya çalışma kitaplarından kopyaladığınız veriler bu çalışma kitabına yapıştırılamaz.

Not: Yukarıdaki VBA kodunu çalıştırdıktan sonra sürükleyip bırakma fonksiyonu da devre dışı kalır.

Kutools AI ile Excel Sihirini Keşfedin

• Akıllı Yürütme: Hücre işlemleri gerçekleştirin, verileri analiz edin ve grafikler oluşturun—tümü basit komutlarla sürülür.
• Özel Formüller: İş akışlarınızı hızlandırmak için özel formüller oluşturun.
• VBA Kodlama: VBA kodunu kolayca yazın ve uygulayın.
• Formül Yorumlama: Karmaşık formülleri kolayca anlayın.
• Metin Çevirisi: Elektronik tablolarınız içindeki dil engellerini aşın.

Yapay zeka destekli araçlarla Excel yeteneklerinizi geliştirin. Şimdi İndirin ve daha önce hiç olmadığı gibi bir verimlilik deneyimi yaşayın!

İlgili makaleler:

• Excel'de sayfa sekmesinde sağ tıklamayı nasıl devre dışı bırakılır?
• Excel'de belirli bir çalışma sayfasında veya tüm çalışma kitabında sağ tıklama menüsünü nasıl devre dışı bırakılır?
• Excel'de hücreye çift tıklayarak düzenleme modunu nasıl önlersiniz veya devre dışı bırakırsınız?