Userform üzerinde checkbox uygulaması

[hikmet]

Sn.Hocalarım, bir userform üzerine iki adet checkbox seçeneği koyarak (iki ayrı sayfayı temsil eden) hangi seçenek işaretlerinirse girilen bilgileri o sayfaya kaydetmek mümkünmüdür. İlginiz için şimdiden teşekkür ederim.

 

[class37]

Merhaba
Çalışmanıza OptionButton daha uygun çünkü birden fazlasını işaretleme şansınız olmaz.ChekBoxta ise iki veya daha fazlasını işaretleyebilirsiniz,onun için hata oluşabilir.İyçalışmalar.

Private Sub CommandButton1_Click()
If OptionButton1.Value = True Then
 Sheets("Sayfa2").Select
 ElseIf OptionButton2.Value = True Then
 Sheets("Sayfa3").Select
 End If
End Sub

 

[hikmet]

sn.class37 emeğinize teşekkür ederim. verdiğiniz bilgi doğrultusunda devam edeceğim çok teşekkür ederim.

 

[mciritci]

Hikmet Senin İstediğini Tek Bİr CheckBox Butonu ile de Yapabilirsin....Kodu Aşağıda yazılıdır Kutucuğu tik atınca istediğiniz olacaktır.

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
MsgBox"Kayıt İşlemleri 1.Sayfaya yapılacaktır."
Sheets("Sayfa2").Select
ElseIf CheckBox1.Value = False Then
MsgBox"Kayıt İşlemleri 2. sayfaya Yapılacaktır."
Sheets("Sayfa3").Select

End If
End Sub

 

[hikmet]

teşekkürler mciritci, verdiğiniz kodu aklıma gelen başka bir konuda kullanacağım. Sağolun