Fill fonksiyonu sayesinde sheetleri atlatabilmek

[showmethetrick]

Merhabalar

"=Sheet3!A$15" şeklinde yazılmış bir fonksiyonu CTRL+R ile Fill ettiğimiz durumda Columnların ++ olarak B, C, D olarak arttığını gozlemleriz.

Bu cellden, aşağıya dogru CTRL+D yaptığımız durumda, $A$15 in fixlenmiş, rowlar arttıkca Sheetlerin artmasını yani

"=Sheet3!$A$15
=Sheet4!$A$15
=Sheet5!$A$15
=Sheet6!$A$15"

olmasını istiyorum.
Bunu yapabileceğim bir fonksiyon var mıdır? yoksa bunu yapabilmemiz için bir makro mu yazmamızz gerekmektedir?

Yapmak istediğim şey ise
elimde 100 sheetlik bir dosya var ve her sheette aynı cellerde bulunan bilgileri tek bir sheet içerisinde sırali bir şekilde saklamak istiyorum...

Yardımlarınız için şimdiden teşekkürler.....

 

[mehmett]

Fonksiyonun bulunduğu satırın numarasından faydalanabilirsiniz.

Örneğin;

=Sheet3!$A$15

Bu fonkisyon 3. satırda ise fonksiyonda geçen 3 rakamı yerine Satır() fonksiyonunu kullanabilirsiniz. 5. satırda ise Satır()-2 kullanmanız gerekir.

Daha sonra tüm fonksiyonu Dolaylı fonksiyonu içine alarak sonuca ulaşırsınız.

Sonuçta fonksiyonumuz şöyle olacak.

=DOLAYLI("Sayfa"&SATIR()&"!A15")

Örnek dosya ektedir.

 

[ileriexcel]

Bende makrolu bir çözüm önereyim.
Tüm sayfalardaki A15 hücresinde bulunan verileri veri sayfasının A Kolonuna sıralar.
Sub test()
Set s1 = Sheets("veri")
say = WorksheetFunction.CountA(s1.[a1:A65536])
For i = 2 To Sheets.Count
Sheets(i).Range("a15").Copy
s = s + 1
s1.Range("a" & say + s).PasteSpecial
Next
End Sub

 

[showmethetrick]

sanırım algoritma olarak duşunursek ikiside aynı mantıkta.

ikiside işime yarıyor.

teşekkürler.