Combobox değeri ile sayfa seçme

[vtelli]

selam arkadaşlar.

yardımcı olursanız sevinirim.

Comboboxta seçtiğim değerlerle sayfalar arası gezinmek istiyorum aceba nasıl yapabilirim.örneğin 50 sayfam var ve comboboxta 5 i seçtim 5.sayfaya geçmek istiyorum...

 

[Orion1]

Ekli dosyayı inceleyiniz.

Private Sub ComboBox1_Click()
Sheets(ComboBox1.Value).Select
End Sub

Private Sub UserForm_Initialize()
Dim syf As Worksheet
For Each syf In Worksheets
    ComboBox1.AddItem syf.Name
Next
ComboBox1.ListIndex = 0
End Sub

 

[vtelli]

yardımlarınız için çok teşekkürler.

aslında 5-10 dk inceledim siteyi bulamadım anacak soruyu yazdıktan sonra biraz daha inceledim ve bir örnekte buldum


Sheets(ComboBox1.Value).Activate

yada sizin dediğiniz gibi

Sheets(ComboBox1.Value).select

çok teşekkürler....

 

[Orion1]

yardımlarınız için çok teşekkürler.

aslında 5-10 dk inceledim siteyi bulamadım anacak soruyu yazdıktan sonra biraz daha inceledim ve bir örnekte buldum


Sheets(ComboBox1.Value).Activate

yada sizin dediğiniz gibi

Sheets(ComboBox1.Value).select

çok teşekkürler....

Rica ederim.
İyi çalışmalar.