Soru multipage

[sirkülasyon]

1 adet userform
3 adet commandbutton
1 adet multipage (3 sekmeli)
multipagenin 1. sekmesinin adı "Ekle"
multipagenin 2. sekmesinin adı "Sil"
multipagenin 3. sekmesinin adı "Düzelt"

1 - Ekle adlı Butona tıklandığında multipagenin "Ekle" sekmesi görünecek diğer bütün sekmeler görünmeyecek.
Sil adlı Butona tıklandığında multipagenin "Sil" sekmesi görünecek diğer bütün sekmeler görünmeyecek.
Düzelt adlı Butona tıklandığında multipagenin "Düzelt" sekmesi görünecek diğer bütün sekmeler görünmeyecek.

2 - MultiPage1.Value = 0 olarak değilde sekme adı vererek "Ekle" açmak için

yardımcı olabilir misiniz?

 

[hmtstc]

butonların altına
UserForm1.MultiPage1.Page2.Visible = False
şeklinde istediğiniz gibi tanıtabilirsiniz.


2. cevap

Private Sub CommandButton2_Click()
sekmeadı = InputBox("sekme adını giriniz")
UserForm1.MultiPage1.Pages.Add (sekmeadı)
End Sub

 

[sirkülasyon]

InputBox kullanmadan mümkün müdür?

 

[ÖmerFaruk]

Bir şekilde Page Adını vermelisiniz. Hücre, TextBox ya da başka bir öğede belirtilen bir şey ya da sabit "Page Adı" gibi.

 

[hmtstc]

sana ne lazım hocam

 

[sirkülasyon]

hmtstc Verdiğiniz kod ile işimi gördüm.
Teşekkür ederim.