Alt alta iki listbox

[ssesli]

merhaba;

userform içerisinde iki adet listboxım var. 1. sinde sayfa isimleri çıksın istiyorum. bunu başardım. önemli olan bu listbox üzerinde çift tıkladığım sayfa adının içerisindeki B sütününda bulunan hiperlinkli isimlerin 2. listboxsa sıralanması ve böylelikle de o sayfalara bir düğme yardımıyla ulaşabilmem. acaba böyle birşey mümkünmü sayın hocalarım......?

 

[Levent Menteşoğlu]

Elbette mümkün ama net cevap için bir dosya eklemenizi öneriyorum.

 

[ssesli]

sayın leventm dosyanın benzer şekli aşağıdadır.

 

[ssesli]

sayın hocalarım,herhalde bir çözüm bulamadınız

 

[ferdisevir]

Buyrun Cevap

sayın hocalarım,herhalde bir çözüm bulamadınız

listbox2 nın double click yerine aşağıdaki kodları yazınız

On Error Resume Next
Sheets(ListBox1.Value).Select
ListBox2.Clear
For a = 6 To 16
ListBox2.AddItem Cells(a, 2).Hyperlinks.Item(1).Address
Next a