Userform (yeni başlayanlar için)

Katılım
24 Ağustos 2005
Mesajlar
34
aşağıdaki sorularım çok basit kaçabilir ama şu an benim için hayati öneme sahipler, yeni başladığım için işin içinden çıkamıyorum ve elimdeki kaynaklar yeterli değil.
1. excel dosyasını açtığım zaman hiçbir makroya tıklamadan userform3 isimli formumun otomatikman açılmasını ve en önde aktif olmasını istiyorum.
2. Bu formdaki textbox1 değerlerini sayfa1 deki A1 hücresine nasıl atarım.
teşekkürler
faruk
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
1.Sorunuz için aşağıdaki kodu deneyin. Dosya açıldığında otomatikman userform3 ü aktif hale getirecektir.

[vb:1:fbdf5bd38e]Sub auto_open()
userform3.show
end sub[/vb:1:fbdf5bd38e]

2.İkinci sorunuz içinde aşağıdaki kodu ilgili textboxa yazın.
[vb:1:fbdf5bd38e]Private Sub TextBox1_Change()
[a1] = TextBox1.Value
End Sub
[/vb:1:fbdf5bd38e]
 
Katılım
24 Ağustos 2005
Mesajlar
34
1. kısım için verdiğiniz kodu hem modüller, sayfalar ve kitabın VB kodu kısmına yazdım ve Ambigiousname detected: auto_open uyarısı verdi.
sadece sayfa 1 in kod kısmına yazınca hiçbir şekilde formu tanımadı.

2. soruda ise farklı sayfalar için a1 hücresinin gösterimi nasıl olmalıdır.
örneğin sayfa2.[a1] = userform3.textbox1.value yazılabilir mi?
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
1-Bu kodu normal modül sayfasına kopyalayacaksınız. Tek hata verme sebebi userformun adı hatalı ise olacaktır.

2-Aşağıdaki şekillerde yazabilirsiniz.

[sayfa2!a1] = userform3.textbox1.value veya

sheets("sayfa2").[a1]=userform3.textbox1.value
 
Üst