Otomatik Olarak Doğru, Büyük veya Küçük Harfleri Zorla - VBA Kodu Örnekleri

Kullanıcı girdikten sonra bir hücre metnini otomatik olarak Uygun, Büyük veya Küçük harf olarak değiştirmeniz gerekiyor mu? Bunu başarmanın birden çok yolu vardır ve birden çok gereksinim mümkündür. Belirli bir sütuna girildikten sonra her şeyi otomatik olarak değiştiren bir örnek. Umarım bu örnekten inşa edebilirsiniz!

1. Kod penceresini açmak için ALT ve F11 tuşlarına basın

2. Otomatik olarak eklemek istediğiniz sayfa adına çift tıklayın.

kasayı değiştir

3. Bu kodu kod penceresine yerleştirin:

Metni Uygun Harf Olarak Değiştir

için kod Uygun durum

Private Sub Worksheet_Change(ByVal Target As Excel.Range) Application.EnableEvents = False If Target.Column = 5 Then Target = StrConv(Target, vbProperCase) End If Application.EnableEvents = True End Sub

Metni Büyük Harf Olarak Değiştir

İçin büyük harf değiştirebilirsin

StrConv(Hedef, vbProperCase)

ile

Ucase(Hedef)

Metni Küçük Harf Olarak Değiştir

İçin küçük harf değiştirebilirsin

StrConv(Hedef, vbProperCase)

ile

Lcase(Hedef)