TExTBOX PASİF OLMASI

[bitmez13]

userform üzerindeki checkbox 1 işaretliyken testbox2 ve 3 pasif diğerleri aktif checkbox 2 işaretli iken textbox4.ve 5 pasif diğerleri aktif pasiflerin rengi donuk olacak tab tuşu ile textboxlar arası geçiş olacak böyle bir makroya yardım edebilirmisiniz

 

[Korhan Ayhan]

Selamlar,

Bu tarz sorularınızı örnek dosya ile desteklerseniz bizler dosya hazırlamak için vakit harcamak sorunda kalmayız.

Ekteki örnek dosyayı incelermisiniz.


Kullanılan kod; (UserFormun kod bölümüne uygulayın.)

Option Explicit
 
Private Sub OptionButton1_Click()
    If OptionButton1 = True Then
    TextBox2.Enabled = False
    TextBox3.Enabled = False
    TextBox4.Enabled = True
    TextBox5.Enabled = True
    TextBox4.SetFocus
    End If
End Sub
 
Private Sub OptionButton2_Click()
    If OptionButton2 = True Then
    TextBox2.Enabled = True
    TextBox3.Enabled = True
    TextBox4.Enabled = False
    TextBox5.Enabled = False
    TextBox2.SetFocus
    End If
End Sub