A1 hücresindeki veriyi OptinButton'un ismi yapmak

[YAKAKENTİM]

arkadaşlar herkese selam:
gene abuk subuk sorularla karşınızdayım

bir tane optionbutton'um var yanlız caption(ismini) sayfa1'deki A1 hücresindeki verinin olması gerekiyor birşeyler denedim
ama beceremedim :lol:

 

[Ali]

Private Sub UserForm_Initialize()
OptionButton1.Caption = Worksheets("Sayfa1").Range("A1")
End Sub

 

[YAKAKENTİM]

:hiho: hepsini yaptımda Worksheets koymak aklıma gelmedi

çok saol :hey:

 

[Ali]

İnsanın bazen bildiği basit bir birşey o an aklına gelmeyebiliyor. Bende de oluyor .

Rica ederim.İyi çalışmalar

 

[Seyit Tiken]

Değerli ustalardan Fructose arkadaşımız ilgili soruyu cevaplamış. Alternatif olsun diye ve "Worksheets" argümanı olmadan yapılabilirliğini göstermek niyetiyle; bu kodta aynı işi görüyor...

Private Sub UserForm_Initialize()
OptionButton1.Caption = [a1].Value
End Sub

 

[Ali]

Sn Seyit Tiken,

YAKAKENTİM,

yanlız caption(ismini) sayfa1'deki A1 hücresindeki verinin olması gerekiyor

dediği için mecburen Worksheets("Sayfa1") eklemek gerekecek diğer türlü hangi sayfa aktif ise ilgili sayfanın A1 değeri gelmiş olacak.

İyi çalışmalar. :hey:

 

[abdi]

Bir Alternatifte Benden

Private Sub UserForm_Initialize()
OptionButton1.Caption = Sayfa1.[a1].Value
End Sub

Saygılar Sevgiler