Excel'de belirli hücre içeriklerinin silinmesini nasıl önleyebilirim?
Bu makale, belirli hücre içeriklerinin Excel'de silinmesini önlemekten bahsediyor. Bu makaledeki yöntemler ile bunu başarabilirsiniz.
Çalışma sayfasını koruyarak belirli hücre içeriklerinin silinmesini önleyin
VBA kodunu kullanarak belirli hücre içeriklerinin silinmesini önleyin
Çalışma sayfasını koruyarak belirli hücre içeriklerinin silinmesini önleyin
Varsayılan olarak, çalışma sayfasındaki tüm hücreler kilitlidir. Belirli hücre içeriklerinin silinmesini önlemek ve koruduktan sonra diğer hücreleri düzenlenebilir hale getirmek istiyorsanız, lütfen aşağıdaki işlemleri gerçekleştirin.
1. Tıklayın Tüm çalışma sayfasını seçmek için çalışma sayfasının sol üst köşesindeki düğmesine basın. Ardından Ctrl + 1 tuşlarını açmak için biçim Hücreler iletişim kutusu.
2. Açılırken biçim Hücreler iletişim kutusu, işaretini kaldırın Kilitli altında seçenek Koruması sekmesini ve sonra da OK buton. Ekran görüntüsüne bakın:
3. İçeriğin silinmesini istemediğiniz hücreleri seçin, Ctrl + 1 tuşunu açmak için biçim Hücreler iletişim kutusunu tekrar kontrol edin. Kilitli altında seçenek Koruması sekmesini ve sonra da OK düğmesine basın.
4. Şimdi tıklayın Değerlendirme > Koruma Sayfası, ardından her ikisinde de parolanızı belirtin ve onaylayın. Koruma Sayfası ve Şifreyi Onayla diyalog kutuları.
Şimdi çalışma sayfası korumalı. Ve belirtilen hücre içeriği artık silinmeyecek.
VBA kodunu kullanarak belirli hücre içeriklerinin silinmesini önleyin
Yukarıdaki iki yöntemin yanı sıra, belirli hücre içeriklerinin bir çalışma sayfasında silinmesini önlemek için VBA kodunu çalıştırabilirsiniz. Lütfen aşağıdaki işlemleri yapın.
1. Silinmesini istemediğiniz hücre içeriğini içeren çalışma sayfasını açın, Sayfa Sekmesine sağ tıklayın ve ardından Kodu Görüntüle sağ tıklama menüsünden.
2. Aşağıdaki VBA kodunu kopyalayıp cihazın Kod penceresine yapıştırın. Uygulamalar için Microsoft Visual Basic pencere.
VBA kodu: Belirli hücre içeriklerinin Excel'de silinmesini önleyin
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:E7")) Is Nothing Then Exit Sub
On Error GoTo ExitPoint
Application.EnableEvents = False
If Not IsDate(Target(1)) Then
Application.Undo
MsgBox " You can't delete cell contents from this range " _
, vbCritical, "Kutools for Excel"
End If
ExitPoint:
Application.EnableEvents = True
End Sub
not: Kodda A1: E17, hücre içeriklerinin silinmesini engelleyeceğiniz aralıktır. Aralığı ihtiyaçlarınıza göre değiştirebilirsiniz.
Şu andan itibaren, hücre içeriğini A1: E17 aralığından silmeye çalıştığınızda, bir Kutools for Excel aşağıda gösterilen ekran görüntüsü gibi iletişim kutusu, lütfen tıklayın OK düğmesine basın.
İlgili Makaleler:
- Excel'de belirli bir çalışma sayfasının silinmesini nasıl önleyebilirim?
- Excel'de birden çok çalışma sayfasının seçilmesi nasıl engellenir?
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!