makroyla belirli hücreleri otomatik büyük harfe çevirme

[esun333]

arkadaşlar isteğimi şey makroyla belirli hücreleri otomatik büyük harfe çevrilmesi bana bu konuda yardımcı olursanız sevinirim. teşekkürler. dua ile kalın.

 

[hamitcan]

Deneyin.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target = Empty Then Exit Sub
    If Intersect(Target, [a1:e1,c4:e7,h4:h16]) Is Nothing Then Exit Sub
    Target = StrConv(Target.Text, vbUpperCase)
End Sub

 

[Necdet]

Merhaba,

Aşağıdaki kodları modüle kopyalayıp deneyiniz.

Sub BuyukHarf()
    Dim Hucre As Range
    
    For Each Hucre In Range("A1:E1,C4:E7,H4:H16")
        Hucre = UCase(Replace(Replace(Hucre, "i", "İ"), "ı", "I"))
    Next Hucre
End Sub

 

[esun333]

teşekkür ederim işime çok yaradı.