girilen veriye göre sayfa ismi ve o sayfaya gitme.

[ahmetozbey]

örnek: sayfa1 de a1 hücresine veri girdim butona basdığımda sayfa2 nin adı girdiğim veri ismine göre değişiyor buraya kadar tamam. sayfa1 e bir buton daha ekleyip ismi değişen sayfaya gitmek istiyorum. ama nasıl?

 

[Levent Menteşoğlu]

Aşağıdaki linkte vermiş olduğum kodu aşağıdaki ile değiştirin.

http://www.excel.web.tr/viewtopic.php?p=9680&highlight=#9680

[vb:1:92dc0adfbf]Sub isimdegistir()
Sheets(2).Name = Sheets("sayfa1").[a1]
Sheets([a1].Value).Select
End Sub
[/vb:1:92dc0adfbf]

 

[danersin]

ad değiştirdiğiniz prosedürün end sub'dan bir satır öncesine

worksheets("A1 hücresinde hangi ismi verdi iseniz").activate

demeniz yeterli.. başka butona bağlamak istiyorsanız bu tek satırı başka bir prosedüre yazmanız yeterli.

 

[ahmetozbey]

dediğiniz şekilde yaptım sayfaya gidiyor ancak her defasında run-time 9 error hatası veriyor.

 

[Levent Menteşoğlu]

Ekteki örneği inceleyiniz.

 

[ahmetozbey]

sizide meşgul ediyorum kusura bakmayın.
ismi değişen sayfaya ayrı butonla gitmek istiyorum.