- Katılım
- 27 Kasım 2007
- Mesajlar
- 20
- Excel Vers. ve Dili
- office 2003 excel türkçe
Arkadaşlar sorunumu ekte belirttim.yardımcı olursanız sevinirim...ilgilenenlere teşekkürler....
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
For a = 4 To 14
Cells(a, "k") = 0
Next
Range("a1").Select
arkadaşım yardımın için teşekkürler.VB kodlar hakkında bi bilgim yok...sölediğini yaparsam ezberden başka bişey olmayacak.sorunumu formlar araç çubuğundan ya da farklı makro atama şekillerinden kod kullanmadan halledemez miyim?fazla şey mi istiyorum acabaİlgili düğmeye aşağıdaki kodları tanımlayınız.
Kod:For a = 4 To 14 Cells(a, "k") = 0 Next Range("a1").Select
Seçenek düğmelerini K4, K5, K6 ... hücrelerine bağlamışsınız. Bu hücrelere, mesela K4'e 1 yazarsanız, 1. sorunuzdaki A şıkkı işaretlenecektir, bu hücreye 2 yazarsanız, B şıkkı işaretlenecektir. 0 (Sıfır) yazarsanız, hiçbiri işaretlenmeyecektir. Benim yaptığım, ilgili hücrelere sıfır yazmaktı sadece. Bundan hareketle bir şeyler yapabilirsiniz belki.arkadaşım yardımın için teşekkürler.VB kodlar hakkında bi bilgim yok...sölediğini yaparsam ezberden başka bişey olmayacak.sorunumu formlar araç çubuğundan ya da farklı makro atama şekillerinden kod kullanmadan halledemez miyim?fazla şey mi istiyorum acaba
valla dostum çok saol ya.hallettim sonunda.mantığı çakınca gerisi gelior.kod bilmioz malesef.mantığı kavrattığın için tekrar teşekkürler...kaç gündür bunla uğraşıodum büyük bi dertten kurtardın...Seçenek düğmelerini K4, K5, K6 ... hücrelerine bağlamışsınız. Bu hücrelere, mesela K4'e 1 yazarsanız, 1. sorunuzdaki A şıkkı işaretlenecektir, bu hücreye 2 yazarsanız, B şıkkı işaretlenecektir. 0 (Sıfır) yazarsanız, hiçbiri işaretlenmeyecektir. Benim yaptığım, ilgili hücrelere sıfır yazmaktı sadece. Bundan hareketle bir şeyler yapabilirsiniz belki.