hücreden çıkınca büyük harfe dönsün

hücreden çıkınca büyük harfe dönsün - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: hücreden çıkınca büyük harfe dönsün (/konu-hucreden-cikinca-buyuk-harfe-donsun.html)

Sayfalar: 1 2 3

Cvp: hücreden çıkınca büyük harfe dönsün - kadirdursun - 11/04/2011

sayın mehmetdemiral;
bunu yaptım ama uzun bir kod oldu.
bunun yerine

If Target.Address = "$A$" & Target.Row Then

satırına b sutununuda ekleyebilir miyiz diye sordum.
olur mu?

Cvp: hücreden çıkınca büyük harfe dönsün - mehmetdemiral - 11/04/2011

Img-grin

) Tamam. İşin kolayına kaçalım dedik, altına da en kolayı dedik ama kurtulamadık demek ki Img-grin

Kod:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target = Empty Then Exit Sub

If Target.Address = "$A$" & Target.Row Or Target.Address = "$B$" & Target.Row Then

Application.EnableEvents = False

kelime = Replace(Target.Value, "i", "İ")

kelime = Replace(kelime, "ı", "I")

Target.Value = StrConv(kelime, vbUpperCase)

Application.EnableEvents = True

End If

End Sub

Cvp: hücreden çıkınca büyük harfe dönsün - kadirdursun - 11/04/2011

teşekkür ederim... Img-grin