veri tablosu

[yaşar681]

yaptıgım veri tablosun da örneği a sütunun tamamına girdiğim kelimelerin baş harfleri büyük . c sütunun tamamına girdiğim kelimelerin ise tamamı büyük olmasını istiyorum nasıl yapabilirim. açıklama yaparak yazarmısınız

 

[Orion1]

Ekli dosyayı inceleyiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A:A,C:C]) Is Nothing Then Exit Sub
If Target.Column = 1 Then
    Target.Value = WorksheetFunction.Proper(Target.Value)
    ElseIf Target.Column = 3 Then
    Target.Value = UCase(Replace(Replace(Target.Value, "ı", "I"), "i", "İ"))
End If
End Sub

 

[yaşar681]

nereye yazacağım

kod yazan yer neresidir

 

[Orion1]

kod yazan yer neresidir

Uygulayacağınız sayfa sekmesine sağ klik yapınız.
Kod görüntüleyi tıklayınız.
Çıkan sayfaya bu kodları yazınız.
VB editörünü kapatınız.İşlem tamamdır.