Liste seçimi ile sayfaları açabilmek.

[feyzo67]

Merhaba arkadaşlar.

Ekte gönderdiğim dosya ile makro kullanarak liste menüsünden hangi sayfaya tıklarsam o sayfa açılsın istiyorum.

Mesela listeden sayfa1'e tıkladığımda Sayfa1, Sayfa5'e tıkladığımda Sayfa5 açılsın.

Yardımcı olursanız çok sevinirim. Şimdiden teşekkürler.

 

[Orion1]

Dosyanız ekte.

Sub Açılan2_Değiştir()
Sheets(Range("B1").Value).Select
End Sub

 

[feyzo67]

Çok Teşekkürler.

 

[airfresh]

Evren abi harika olmuş ellerine sağlık.. size birşey sormak istiyorum.. Eklediğiniz dosyadaki butonu nasıl koyabiliriz. excel 2007 kullanıyorum ve bir türlü bulamadım. ayrıca o butona sizin yaptığınız örnekte olduğu gibi açmak istediğimiz sayfaları nasıl tanıtabiliyoruz.. (yani siz B5:B10 arasında tanıtmışsınız. excel ile yeni tanışıyoruz inş anlatabilmişimdir) saygılarımla...