Excel Vba Forum - Excelce.Net

SORU ve CEVAPLAR (Yazılabilir) => Microsoft Excel, Vba, Makro, Formül vb. Soruları => Çözülen Excel, Vba, Makro, Formül vb. Soruları => Konuyu başlatan: yesilyurtlu - 29 Nisan 2010, 20:03:31

Başlık: [Çözüldü] CheckBox1 Onayı
Gönderen: yesilyurtlu - 29 Nisan 2010, 20:03:31

Üstadım;

CheckBox1' e onaylı olunca "Paraflı " Yazsın ve AY1 hücresinede 1 yazsın
CheckBox1' e onaysız olunca "Parafsız " Yazsın ve AZ1 hücresinede 2 yazsın

Bu konuda Yardımcı olabilir misiniz?

Başlık: Ynt: CheckBox1 Onayı
Gönderen: Bülent Öztürk - 29 Nisan 2010, 20:23:17

Deneyin;

Kod: [Seç]

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
    CheckBox1.Caption = "Paraflı"
    [AY1] = 1
Else
    CheckBox1.Caption = "Parafsız"
    [AY1] = 2
End If
End Sub

Başlık: Ynt: CheckBox1 Onayı
Gönderen: Bülent Öztürk - 29 Nisan 2010, 20:27:48

Bazı örnekler için şurayı takip edebilirsiniz;  ;)

http://www.excelce.net/forum/index.php?board=47.0

Başlık: Ynt: CheckBox1 Onayı
Gönderen: yesilyurtlu - 29 Nisan 2010, 20:41:00

Bülent Abi;
Excel'de bunların kullanımı anlatsanız varya ne mükemmel olur vallaha.

Ayrıca cevap için teşekkür ederim abi.