Note: The other languages of the website are Google-translated. Back to English

Excel'e özel karakterlerin girilmesi nasıl engellenir?

Bazı durumlarda, hücrelere harf veya sayı girmek ve @ # $% vb. Gibi özel karakterlerin yazılmasını engellemek istiyoruz. Değerleri girerken özel karakterlerin girilmesini engelleyen Excel'de herhangi bir işlev var mı?

Veri Doğrulama ile özel karakterlerin girilmesini önleyin

VBA kodu ile özel karakterlerin girilmesini önleyin

Kutools for Excel ile özel karakterlerin girilmesini önleyin iyi fikir3


Veri Doğrulama ile özel karakterlerin girilmesini önleyin

Excel'in Veri Doğrulaması, yalnızca alfanümerik değerleri girmenize izin vermeye yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın:

1. Özel karakterlerin girmesini engellemek istediğiniz bir aralık seçin.

2. Sonra tıklayın Veri > veri Doğrulama > veri Doğrulama, ekran görüntüsüne bakın:

doc-önlemek-karakterler-1

3. In veri Doğrulama iletişim kutusunu tıklayın Ayarlar sekmesini tıklayın ve seçin görenek itibaren izin vermek açılır listeyi, ardından bu formülü girin =ISNUMBER(SUMPRODUCT(SEARCH(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),"0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"))) içine formül metin kutusu, ekran görüntüsüne bakın:

Not:A1 seçtiğiniz aralığın ilk hücresini gösterir (soldan sağa).

doc-önlemek-karakterler-1

4. Sonra tıklayın OK bu diyaloğu kapatmak için ve şimdi belirtilen sütuna özel karakterleri içeren değerleri girdiğinizde seçeneği uyguluyorsunuz, aşağıdaki uyarı mesajını alacaksınız.

doc-önlemek-karakterler-1


VBA kodu ile özel karakterlerin girilmesini önleyin

Aşağıdaki VBA kodu da metin değerlerini girerken özel karakterleri önlemenize yardımcı olabilir.

1. Basılı tutun ALT + F11 anahtarlar ve açılır Uygulamalar için Microsoft Visual Basic penceresi.

2. Ardından soldan kullanılmış çalışma sayfanızı seçin Proje Gezginiaçmak için çift tıklayın modülve ardından aşağıdaki VBA kodunu kopyalayıp boşluğa yapıştırın modül:

VBA kodu: Excel'e özel karakterlerin girilmesini engelleyin

Private Const FCheckRgAddress As String = "A1:A100"
Private Sub Worksheet_Change(ByVal Target As Range)
'Update 20140905
    Dim xChanged As Range
    Dim xRg As Range
    Dim xString As String
    Dim sErrors As String
    Dim xRegExp As Variant
    Dim xHasErr As Boolean
    Set xChanged = Application.Intersect(Range(FCheckRgAddress), Target)
    If xChanged Is Nothing Then Exit Sub
    Set xRegExp = CreateObject("VBScript.RegExp")
    xRegExp.Global = True
    xRegExp.IgnoreCase = True
    xRegExp.Pattern = "[^0-9a-z]"
    For Each xRg In xChanged
        If xRegExp.Test(xRg.Value) Then
            xHasErr = True
            Application.EnableEvents = False
            xRg.ClearContents
            Application.EnableEvents = True
        End If
    Next
    If xHasErr Then MsgBox "These cells had invalid entries and have been cleared:"
End Sub

doc-önlemek-karakterler-1

not: Yukarıdaki kodda aralığı değiştirebilirsiniz A1: A100 of Özel Sabit FCheckRgAddress As String = "A1: A100" özel karakterleri önlemek istediğiniz kendi aralığınıza komut dosyası.

3. Ardından bu kodu kaydedip kapatın ve şimdi A1: A100 aralığında bazı özel karakterlerle metin değerleri girdiğinizde, değeriniz bir anda silinecek ve aşağıdaki uyarı mesajını alabilirsiniz.

doc-önlemek-karakterler-1


Kutools for Excel ile özel karakterlerin girilmesini önleyin

Aslında, eğer varsa Kutools for Excel - kullanışlı ve çok işlevli bir araç, özel karakterleri bir seçime yazmayı hızlı bir şekilde önleyebilirsiniz. Yazmayı Önle tek çek ile yardımcı program.

Kutools for Excel, ile daha fazla 300 kullanışlı fonksiyonlar, işlerinizi daha kolay hale getirir. 

Kurduktan sonra Kutools for Excel, lütfen aşağıdaki işlemleri yapın :(Şimdi Excel için Kutools'u Ücretsiz İndirin!)

1. Özel karakterlerin yazılmasını engellemek istediğiniz bir seçim seçin ve Kutools > Yazmayı Önle > Yazmayı Önle. Ekran görüntüsüne bakın:
doc, karakterleri engelle 10

2. içinde Yazmayı Önle iletişim, kontrol et Özel karakterlerde yazmayı engelle seçeneği. Ekran görüntüsüne bakın:
doc, karakterleri engelle 7

3. tık Okve bu yardımcı programı uygularsanız Veri Doğrulamayı kaldıracağını size hatırlatmak için bir iletişim kutusu açılır ve Evet bir sonraki iletişim kutusuna gitmek için, yardımcı programın bölümde çalıştığını hatırlatacaktır. ekran görüntüsüne bakın:
doc, karakterleri engelle 8

4. tık OK iletişim kutusunu kapatmak için ve bundan sonra seçime özel bir karakter girmeye çalıştığınızda bir uyarı iletişim kutusu açılır.
doc, karakterleri engelle 9

İpucu.Bir sütuna yinelenen değerler yazmayı bırakmak istiyorsanız, lütfen Kutools for Excel's'i kullanmayı deneyin. Yinelemeyi Önleyin aşağıdaki ekran görüntüsünde gösterildiği gibi. Sınırlama olmaksızın tam işlevseldir 30 gün, lütfen şimdi indirin ve ücretsiz deneme yapın.

doc kopyayı önle doc kutools 2 yazmayı engelliyor


İlgili yazılar:

Excel'de boşluklarla değer girilmesi nasıl engellenir?

Excel'deki bir sütundaki yinelenen girişleri nasıl önleyebilirim?


En İyi Ofis Üretkenliği Araçları

Kutools for Excel Sorunlarınızın Çoğunu Çözer ve Verimliliğinizi% 80 Artırır

  • Yeniden: Hızlıca yerleştirin karmaşık formüller, grafikler ve daha önce kullandığınız her şey; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
  • Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
  • Hücreleri / Satırları / Sütunları Birleştirme Veri kaybetmeden; Bölünmüş Hücre İçeriği; Yinelenen Satırları / Sütunları Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
  • Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
  • Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
  • Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
  • Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
  • Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
  • 300'den fazla güçlü özellik. Office / Excel 2007-2021 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay devreye alma. Tam özellikler 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.
kte sekmesi 201905

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!
ofis tabanı
Yorumları sıralama ölçütü
Yorumlar (12)
Henüz derecelendirme yok. İlk değerlendiren siz olun!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Veri Doğrulama ile çözüm neredeyse mükemmel. Ama böyle korunan alana "*" karakteri koyabiliyorum. Herhangi bir tavsiye? Çok teşekkürler Pavel
Bu yorum sitedeki moderatör tarafından en aza indirildi
ARAMA işlevi yerine BUL işlevini kullanmayı deneyin: =ESAYISAYI(TOPLA(BUL(ORTA(A1, SATIR(INDIRECT("1:"&UZUNLUK(A1)))),"1abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ")))
Bu yorum sitedeki moderatör tarafından en aza indirildi
uzunluk sınırı nasıl ayarlanır? yani sadece 12 karakter veya sayı ayarlamak istersem
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba, raj,
Sorununuzu çözmek için lütfen aşağıdaki formülü uygulayınız:
=AND(ISNUMBER(SUMPRODUCT(FIND(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),"0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"))),LEN(A1)=12)


Lütfen bir deneyin, umarım size yardımcı olabilir!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Tek bir hücrede belirli karakterlerin metnin uzunluğuyla birlikte yazılmasını engellemem gerekirse ne olur?

Örneğin, belirli karakter engelleme ile birlikte metnin 5-16 karakter arasında olmasını önlemek istiyorum? Herhangi bir tavsiye?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Belki metin uzunluğunu sınırlamak için Veri Doğrulama işlevini deneyebilirsiniz. Ekran görüntüsüne bakın:
Bu yorum sitedeki moderatör tarafından en aza indirildi
VBA kodunuzu excel 2013'te kullandığımda hata ayıklama seçeneği açılacak ve donuyor
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba, WilY, aşağıda gösterilen ekran görüntüsü gibi bir iletişim kutusu açılırsa, kodu etkinleştirmek için Evet'i ve ardından Tamam'ı tıklamanız yeterlidir. Bu sorun Excel 2016'da da görülmektedir.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Bunu diğer sütunlarda nasıl tekrarlayabilirim?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Excelente çözümü. como agregas las comillas (") para que sean acceptidas?
Bu yorum sitedeki moderatör tarafından en aza indirildi
merhaba bitki,

Yardımcı olduğuma sevindim. İlk yöntemi kullanarak bu formülü veri doğrulamada kullanabilirsiniz:
=ISNUMBER(SUMPRODUCT(SEARCH(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),"0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"&CHAR(34))))

CHAR işlevi, ASCII değerini alır ve karşılık gelen karakter değerini döndürür. Çift tırnak için ASCII değeri 34'tür. Dolayısıyla çift alıntıya izin verilecektir. Lütfen bir deneyin.

En içten dileklerimizle,
Mandy
Bu yorum sitedeki moderatör tarafından en aza indirildi
Pessoal, portekizce formülü 7 ile sınırlandırılmış bir karakter miktarıyla karşılaştırın:

=E(ÉNÚM(SOMARPRODUTO(LOCALIZAR(EXT.TEXTO(A1;LIN(INDIRETO("1:"&NÚM.CARACT(A1)));1);"0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ ")));NÚM.CARACT(A1)<8)
Buraya henüz hiç yorum yapılmamış
Lütfen yorum yazın
Misafir olarak yayınlama
×
Bu gönderiyi değerlendirin:
0   Karakterler
Önerilen Konumlar

Bizi takip et

Telif Hakkı © 2009 - www.extendoffice.com. | Tüm hakları Saklıdır. Tarafından desteklenmektedir ExtendOffice. | | | Site Haritası
Microsoft ve Office logosu, Microsoft Corporation'ın Amerika Birleşik Devletleri ve / veya diğer ülkelerdeki ticari markaları veya tescilli ticari markalarıdır.
Sectigo SSL ile korunmaktadır