Soru Listbox ile sayfalar arası geçiş

[NADİR YILDIZ]

arkadaşalar sayfalar arası geçiş butonuna basınca listbox açılarak ilgili sayfaya nasıl geçebilirim.ekteki örnekteki gibi kendi çalışmama ekleyemedim

 

[Muzaffer Ali]

Merhaba.

Bir form ekleyin ve forma bir listbox ekleyin
Aşağıdaki kodu formun kod sayfasına kopyalayın.

Private Sub ListBox1_Click()
    Sheets(ListBox1.Text).Select
End Sub

Private Sub UserForm_Initialize()
    Dim oSh As Object
    For Each oSh In ThisWorkbook.Sheets
        ListBox1.AddItem oSh.Name
    Next
End Sub

 

[NADİR YILDIZ]

Sayın muzaffer teşekkür ederim

zaten sıkıntı burada o formları ekleyemedim.
kodlar gönderdiğim örnekte var.ama sonuç alamadım
kendi örneğime uyarlayamadım.
rica etsem benim dosyama uyarlarmısınız

iyi çalışmalar

 

[Muzaffer Ali]

Buyurun.

 

[NADİR YILDIZ]

Muzaffer bey teşekkürler
Hakkınızı helal edin iyi çalışmalar

 

[Muzaffer Ali]

Rica ederim. Helal olsun. Kolay gelsin.