[vb:1:ac66853c70]Private Sub MultiPage1_Click(ByVal Index As Long)
If MultiPage1.SelectedItem.Name = "Page1" Then Sheets("sayfa1").Select
If MultiPage1.SelectedItem.Name = "Page2" Then Sheets("sayfa2").Select
If MultiPage1.SelectedItem.Name = "Page3" Then Sheets("sayfa3").Select
End Sub
[/vb:1:ac66853c70]
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.