Çalışma kitabındaki tüm sayfaları listeleme

[chevas]

Ã?ncelikle hepinize selamlar,

Yapmak istediğim bir çalışma sayfasındaki birçok sayfanın isimlerini ve her sayfanın bir hücresini alarak başka bir çalışma sayfasına aktarmak
örnek vermem gerekirse,

ali (Sayfa1) 3 (j3 satırı)
can(sayfa2) 8 (j3 satırı)
Þimdiden herkese teşekkürlerimi sunarım.

 

[Levent Menteşoğlu]

Aşağıdaki kodu deneyin.

[vb:1:1987903dd7]Sub listele()
For a = 1 To Sheets.Count
c = c + 1
Cells(c, 1) = Sheets(a).Name
Cells(c, 2) = Sheets(a).[j3]
Next
End Sub
[/vb:1:1987903dd7]

 

[medfad]

Merhaba
arama yaparken bu sayfaya rastladım. listenen sayfa isimlerine link vermek de mümkün müdür?

 

[Levent Menteşoğlu]

Aşağıdaki linkte makro ile köprü oluşturulmasına dair bir örnek mevcuttur, sanıyorum size fikir verecektir.

http://www.excel.web.tr/viewtopic.php?p=68225#68225