Userform'un TextBox v.s. gibi Controls Özelliği

[Ergün Güler]

Selam,

Bir Form Üzerindeki TextBox gibi nesneleri Controls Özelliği ile aşağıdaki gibi kontrol edebiliyoruz.

metin = "TextBox1"

Controls(metin).Text = "denemedir"

Peki, Userformların aynı özelliği var mıdır? var ise nasıldır?

metin = "Userform1"

MsgBox Controls(metin).Name

gibi.

Yardımcı olabilirseniz sevinirim.

 

[Levent Menteşoğlu]

Ergün bey userform adını değişken yaparak yapmak istediğiniz nedir? ona göre farklı önerilerde bulunulabilir.

 

[Ergün Güler]

Ergün bey userform adını değişken yaparak yapmak istediğiniz nedir? ona göre farklı önerilerde bulunulabilir.

Selam,
Levent Hocam,
Aslında istediğimin tek bir sebebi yok. Metotları öğrenmeye çalışıyorum.
İlginize çok teşekkür ederim. Aradığım şu idi.

Private Sub CommandButton1_Click()

formadı = "UserForm1"
'MsgBox VBA.UserForms.Add(formadı).Name
'MsgBox VBA.UserForms.Add(formadı).Controls("Label1").Caption
'VBA.UserForms.Add(formadı).Show
VBA.UserForms.Add("UserForm2").Show

End Sub

diğer sorduğum konulardaki arkadaşların yardımlarından alıntıdır. Neden Add anlayamadım? bir de benim kod sayfamda VBA.Userforms. yazdıktan sonra Add çıkmıyor. VBA yardım menüsünde de bulamadım. Add ve benzeri özellikleri öğrenmek istemiştim.
İyi çalışmalar.