OptionButton yardımı

[ipkins]

option buttonun tıkladığımda ilgili sayfanın bir hücresine birşey yazmasını istiyorum mesela : optionbutton a tıkladığımda sayfa1 in a2 hücresine "geldi" yazmasını istiyorum yardım ederseniz çok sevinirim belki biraz saçma oldu ama bir türlü yapamadım

 

[ipkins]

arkadaşlar zanınızı almayayım hallettim kusura bakmayın

 

[Selçuk1]

option buttonun tıkladığımda ilgili sayfanın bir hücresine birşey yazmasını istiyorum mesela : optionbutton a tıkladığımda sayfa1 in a2 hücresine "geldi" yazmasını istiyorum yardım ederseniz çok sevinirim belki biraz saçma oldu ama bir türlü yapamadım

aşağıdaki gibi dener misiniz?

Sub optionbutton1_Tıklat()
If optionbutton1 = True Then
Sheets("Sayfa1").Range("A1") = "geldi"
End If
End Sub

 

[ipkins]

sağolasın cellchuc arkadaş fakat bir şey daha sora bilirmiyim userformumda iki adetde checkbox var bunlarda seçiliyken sayfanın ilgili hücresine değerler atıyor fakat seçili değilken değerlerin silinmesini istiyorum nasıl yapabilirim acaba yani o hücrenin boş olmasını istiyorum.

 

[Selçuk1]

sn. ipkins;

kodu aşağıdaki gibi yazabilirsiniz. ekteki dosyayı inceleyiniz, sanırım istediğiniz böyle bir şey.

Private Sub CheckBox1_Click()
If CheckBox1 = True Then Sheets("sayfa1").Range("a1") = "excel.web.tr"
If CheckBox1 = False Then Sheets("sayfa1").Range("a1") = ""
End Sub

 

[ipkins]

tam manasıyla buydu arkadaşım ellerin dert görmesin bilgin herzaman daim olsun bu vakitte zaman ayırdığın için teşekkürler