ad alanınında ilk harf büyük

[aksoyahmet1]

arkadaşlar şöyle bir sorunum var ad alanında büyük yada küçük yazılsın ilk harf büyük sonrakiler küçük soyad alanınında tamamı büyük yazılmasını istiyorum nasıl yapabilirim şimdiden teşekkürler.

 

[kombo]

Sn Haluk'un güzel bir eklentisi. İndirin çalıştırın.

http://www.excel.web.tr/showthread.php?t=7611&highlight=case+change

 

[kombo]

Özür
Access sorusuymuş. Farketmedim.

 

[gulsum1]

soyadı.value=ucase(soyadı.value)
adı.Value = UCase(Left(Me.adı, 1)) & Mid(Me.adı, 2, 20)

 

[aksoyahmet1]

teşekkürler

teşekkürler sayın gülsüm1 yanlız kızmazsanız bunu nereye yazacağım

 

[modalı]

Sayın aksoyahmet1,

Kodlar herhengi bir metin alanını kendi isteğinize göre değiştirmenize yarar.

Biraz bilgi vereyim kod işleyişleriyle ilgili. Kodlar bir olay gerçekleştikten sonra çalışabilirler. Yani klik olayı, çift klik olayı form açıldığında, ve daha bir sürü. Bunlara kod sayfasını açtığınızda ve bir nesne seçtiğinizde üst sağ taraftaki açılan kutudan ulaşabilirsiniz.

Sizin için en uygunu güncelleşmeden önce olayı olabilir. Yani, bifor update.

Diyelimki adı adında bir metin kutusu olsun formun kod görüntü penceresini açıp sol üsteki açılan pencereden adı adındaki nesneyi seçin. Sol taraftan da beforeupdate olayını seçin ve araya gülsüm1 in verdiği kodları yazın. Kodun son şekli;

Private Sub adı_BeforeUpdate(Cancel As Integer)
adı.Value = UCase(Left(Me.adı, 1)) & Mid(Me.adı, 2, 20)
End Sub

olacaktır. Soyadı alanı için de aynı adımları tekrarlayın.

İyi çalışmalar

 

[aksoyahmet1]

teşekkürler

fazla söze gerek yok harikasınız

 

[gulsum1]

güncelleme sonrasına kodu yazarsa daha iyi olur düşüncesindeyim

 

[ramazanyurt]

bu yazdığınız komut 2 veya daha fazla isimli kişilerde de geçerli mi? Mesala Ali Fuat KARABEKİR gibi!!!!

 

[gulsum1]

eğer boşluk varsa sonrasını da hesaplayacak kod yapılabilir mümkün