Multipage'de page'ler arası koşullu geçiş

[ipkisiyamaksosis]

Herkese Selamlar,

Benim Multipage kullanarak hazırladığım bir userform'um var. Dosyayı ekte bulabilirsiniz.

1.Sorum:
* Page1'de TextBox2'ye [1] girildiğinde diğer Textbox'lar'dan devam etsin. [2] girilip enter'a basıldığında ise Page2'deki Textbox6'ya geçsin istiyorum

"Bunu yapabilmek için (If komutuyla bayağı bir uğraştım ama 2 girildiğinde Page2'ye bir türlü gönderemedim forumda'da o kadar çok aradım ki örnek, makale ama bulamadım"

2.Sorum:
* Page3'te TextBox10'a [1] girildiğinde diğer Textbox'lar'dan devam etsin. [2] girilip enter'a basıldığında ise aşağıdaki Ekle butonuna gitsin.

"Bunu aslında sormalımıyım bilemiyorum 1.sorum dan uyarlayabilirim herhalde ama farklı bir durum olur mu bilemiyorum.

Arkadaşlar inanın 2 gündür full time bunun için çözüm arıyorum. İlk önce foruma yazmak istemedim sonra forumda defalarca farklı şekillerde yazarak araştırdım fakat hiçbir bilgi bulamadım. Kusura bakmayın bir türlü çözemediğim için soruyorum işin kolay kaçmak için değil gerçekten çok uğraştım ve yapamadım.

Teşekkür ederim...

 

[Orion1]

Dosyanız ektedir.

 

[ipkisiyamaksosis]

Çok ama çok teşekkür ederim. Allah binlerce kez razı olsun.

If'i bende bu şekilde denemiştim acemi olduğum için keycode'un ne olduğunu bilmediğimden bir türlü çözemedim çıldırdım adeta. Şimdi araştırıyorum ne olduğunu bulucam ve öğrenicem.

Gerçekten ellerinize sağlık. Bu forumdan o kadar çok şey öğrendim ki.

Tekrar tekrar teşekkür ederim. Birgün benimde böyle yardım edebileceğim birileri olur inşallah.

 

[Orion1]

Rica ederim.
İyi çalışmalar.

 

[metbes]

Rica ederim.
İyi çalışmalar.

Sayın Gizlen,


peki herhangi veri girdikten sonra sonuncu textboxa entera basınca bir sonraki page nasıl bir komut ile geçeriz ???

 

[Explorer]

Merhaba,

TextBox'un Exit olayına aşağıdakine benzer bir kod yazmalısınız.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    MultiPage1.Value = 2    '2 geçmek istediğiniz Page'in value değeridir.
End Sub

Kolay gelsin.

 

[metbes]

Merhaba,

TextBox'un Exit olayına aşağıdakine benzer bir kod yazmalısınız.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    MultiPage1.Value = 2    '2 geçmek istediğiniz Page'in value değeridir.
End Sub

Kolay gelsin.

Teşekkür Ederim.

 

[ilyas annaç]

Dosyanız ektedir.

Orion1 Merhaba,

Çok benzer bir sıkıntı bende de var. Çözüm hakkında örnek dosyayı incelemek istedim fakat eklediğiniz hot_59.xls içi boş olarak geliyor.
yeniden yükleyebilir misiniz?

 

[Orion1]

Orion1 Merhaba,

Çok benzer bir sıkıntı bende de var. Çözüm hakkında örnek dosyayı incelemek istedim fakat eklediğiniz hot_59.xls içi boş olarak geliyor.
yeniden yükleyebilir misiniz?

sorunuzu yeni bir başlık açarak örnek dosya yükleyerek açıklamasıonız yazarak sorunuz.