capslok kontrolü

[orcunerkek54]

bunla ilgili bazı örnekler buldum ama kendime uyarlamayı başaramadım. benim istediğim userformumdaki combobox3 ün içine girdiğimde capslock kapalıysa açsın eğer açıksa değiştirmesin... yani her halükarda combobox3 ün içine girdiğimizde capslock açık olsun ve büyük harf yazayım.... teşekkürler

 

[karadami]

Private Sub ComboBox1_Change()

    On Error Resume Next
   
    ComboBox1 = Evaluate("=upper(""" & ComboBox1 & """)")

End Sub

istediğiniz böyle bir şey mi ?

 

[orcunerkek54]

evet tam olarak buydu istediğim... çok teşekkürler

 

[karadami]

rica ederim.
iyi çalışmalar.......