caps lock tuşu

[mtbi00]

iyi günler.sizden ricam excelde hazırladığım sayfada bilgi girişinde kullanıcının buyuk harflerle girmesini istiyorum.bunun için sayfa açıldığında otomatik olarak "caps lock" tuşunu aktif edebiliyormuyuz (büyük bir ihtimalle edebiliyoruzdur ama ben bilmiyorum) edebiliyorsak bunun makrosunu ve sayfadan çıkılana kadar caps lock tuşunun kullanılmasını engelleyebiliyormuyuz. ilgilenenlere şimdiden teşekkürler.

 

[Orion1]

Öyle olmaz.
Çalışma sayfasının modülüne aşağıdaki kodları yapıştırın.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Application.EnableEvents = False
Target.Value = UCase(Replace(Replace(Target.Value, "ı", "I"), "i", "İ"))
Application.EnableEvents = True
End Sub

 

[mtbi00]

evren hocam eline sağlık. ama yaptığım sayfada 4 tane modul var. hepsine ayrı ayrı koydum ama nafile.sanırım bir yerde yanlış yapıyorum. çalışma sayfasının modülü nerdedir? teşekkürler.

 

[mtbi00]

hocam tamamdır buldum. çok teşekkür ederim.

 

[Orion1]

evren hocam eline sağlık. ama yaptığım sayfada 4 tane modul var. hepsine ayrı ayrı koydum ama nafile.sanırım bir yerde yanlış yapıyorum. çalışma sayfasının modülü nerdedir? teşekkürler.

Kullanacağınız sayfanın en altta bulunan(sayfanın adının yazılı olduğu sekme) sekmesine sağ tıklayın.Kodu görüntüleyi seçin.Ve çıkan pencereye verdiğim kodları yapıştrın.Sonra pencereyi kapatım vbe'den çıkın.İşlem tamamdır.